diff --git a/src/basic/math/b86a.add_FAC2_FAC1.s b/src/basic/math/b86a.add_FAC2_FAC1.s index fa661d15..bd4138f2 100644 --- a/src/basic/math/b86a.add_FAC2_FAC1.s +++ b/src/basic/math/b86a.add_FAC2_FAC1.s @@ -31,7 +31,7 @@ add_FAC2_FAC1: lda FAC2_exponent FADDC: tay - beq FADDC;ZERRTS + beq ZERRTS sec sbc FAC1_exponent beq FADD4 ; No shifting diff --git a/src/basic/math/b8fe.add_mantissas_FAC2_FAC1.s b/src/basic/math/b8fe.add_mantissas_FAC2_FAC1.s index 5daed3a4..2ee93514 100644 --- a/src/basic/math/b8fe.add_mantissas_FAC2_FAC1.s +++ b/src/basic/math/b8fe.add_mantissas_FAC2_FAC1.s @@ -36,6 +36,6 @@ add_mantissas_FAC2_FAC1: lda FAC1_mantissa+0 adc FAC2_mantissa+0 - sta FAC2_mantissa+0 + sta FAC1_mantissa+0 jmp shift_carry_into_FAC1