fix for multiplication by 10
This commit is contained in:
1 parent
d8bb2ba403
commit
55f1a1ae8a
1 file changed
+1
-10
@@ -8,16 +8,7 @@
|
|||||||
|
|
||||||
mul10_FAC1_mul2:
|
mul10_FAC1_mul2:
|
||||||
|
|
||||||
// First handle the mantissa
|
// Increment the exponent
|
||||||
|
|
||||||
asl FACOV
|
|
||||||
rol FAC1_mantissa+3
|
|
||||||
rol FAC1_mantissa+2
|
|
||||||
rol FAC1_mantissa+1
|
|
||||||
rol FAC1_mantissa+0
|
|
||||||
bcc !+
|
|
||||||
|
|
||||||
// We need to increment the exponent
|
|
||||||
|
|
||||||
inc FAC1_exponent
|
inc FAC1_exponent
|
||||||
bcs_16 set_FAC1_max
|
bcs_16 set_FAC1_max
|
||||||
|
|||||||
Reference in new issue
Block a user