1
0
mirror of https://github.com/KarolS/millfork.git synced 2024-08-13 02:28:59 +00:00

Fix emitting constant decimal expressions

This commit is contained in:
Karol Stasiak 2018-07-03 01:45:20 +02:00
parent da023daadc
commit be04c9b195

View File

@ -153,7 +153,7 @@ abstract class AbstractAssembler[T <: AbstractCode](private val program: Program
var result = 0L var result = 0L
var multiplier = 1L var multiplier = 1L
while (x > 0) { while (x > 0) {
result += multiplier * (a % 16L) result += multiplier * (x % 16L)
x /= 16L x /= 16L
multiplier *= 10L multiplier *= 10L
} }
@ -166,7 +166,7 @@ abstract class AbstractAssembler[T <: AbstractCode](private val program: Program
var result = 0L var result = 0L
var multiplier = 1L var multiplier = 1L
while (x > 0) { while (x > 0) {
result += multiplier * (a % 10L) result += multiplier * (x % 10L)
x /= 10L x /= 10L
multiplier *= 16L multiplier *= 16L
} }