From b29036f8cc0dd5097a71206bfce49de038e18ca1 Mon Sep 17 00:00:00 2001 From: FeralChild64 Date: Mon, 10 Feb 2020 17:35:04 +0100 Subject: [PATCH] some code for floating point addition --- c64/basic/,stubs_math/b86a.add_FAC2_FAC1.s | 33 ++++++++++++++++++++++ 1 file changed, 33 insertions(+) diff --git a/c64/basic/,stubs_math/b86a.add_FAC2_FAC1.s b/c64/basic/,stubs_math/b86a.add_FAC2_FAC1.s index f8aaf267..bf18b367 100644 --- a/c64/basic/,stubs_math/b86a.add_FAC2_FAC1.s +++ b/c64/basic/,stubs_math/b86a.add_FAC2_FAC1.s @@ -21,4 +21,37 @@ // XXX provide implementation add_FAC2_FAC1: + + // Check if FAC2 is 0; if so, leave FAC1 without changes + + lda FAC2_exponent + beq add_FAC2_FAC1_done + + // If FAC1 is 0, just copy FAC2 to FAC1 + + lda FAC1_exponent + beq_16 mov_FAC2_FAC1 + + // Make sure the exponents are aligned + + jsr add_align_exponents + + // Check whether signs are the same + + lda FAC1_sign + eor FAC2_sign + + bmi add_FAC2_FAC1_sub // branch if signs are opposite + + + + + +add_FAC2_FAC1_sub: + STUB_IMPLEMENTATION() + + +add_FAC2_FAC1_done: + + rts \ No newline at end of file