diff --git a/compiler/res/prog8lib/c64/floats.asm b/compiler/res/prog8lib/c64/floats.asm index 4bc585875..72d7470dd 100644 --- a/compiler/res/prog8lib/c64/floats.asm +++ b/compiler/res/prog8lib/c64/floats.asm @@ -96,8 +96,8 @@ stack_uw2float .proc .pend stack_float2w .proc ; also used for float2b - jsr MOVFM stx P8ZP_SCRATCH_REG + jsr pop_float_fac1 jsr AYINT ldx P8ZP_SCRATCH_REG lda $64 @@ -109,8 +109,8 @@ stack_float2w .proc ; also used for float2b .pend stack_float2uw .proc ; also used for float2ub - jsr MOVFM stx P8ZP_SCRATCH_REG + jsr pop_float_fac1 jsr GETADR ldx P8ZP_SCRATCH_REG sta P8ESTACK_HI,x diff --git a/examples/cube3d-float.p8 b/examples/cube3d-float.p8 index 728f4a8e9..a40cee432 100644 --- a/examples/cube3d-float.p8 +++ b/examples/cube3d-float.p8 @@ -4,10 +4,6 @@ ; Note: this program is compatible with C64 and CX16. -; TODO why has the prg become bigger since register args? -; TODO doesn't work properly anymore - - main { ; vertices diff --git a/examples/cube3d-gfx.p8 b/examples/cube3d-gfx.p8 index 8d650202d..570f60dce 100644 --- a/examples/cube3d-gfx.p8 +++ b/examples/cube3d-gfx.p8 @@ -3,9 +3,6 @@ ; Note: this program is compatible with C64 and CX16. -; TODO why has the prg become bigger since register args? - - main { ; vertices diff --git a/examples/cube3d.p8 b/examples/cube3d.p8 index a062b5840..dd8abda45 100644 --- a/examples/cube3d.p8 +++ b/examples/cube3d.p8 @@ -2,8 +2,6 @@ %import syslib %import textio -; TODO why has the prg become bigger since register args? - main { ; vertices diff --git a/examples/swirl-float.p8 b/examples/swirl-float.p8 index c9e9b885b..dd3622a77 100644 --- a/examples/swirl-float.p8 +++ b/examples/swirl-float.p8 @@ -5,7 +5,6 @@ ; Note: this program is compatible with C64 and CX16. ; TODO why has the prg become bigger since register args? -; TODO doesn't work properly anymore main { diff --git a/examples/turtle-gfx.p8 b/examples/turtle-gfx.p8 index bbe421e8a..688eadbed 100644 --- a/examples/turtle-gfx.p8 +++ b/examples/turtle-gfx.p8 @@ -3,8 +3,6 @@ %import graphics %zeropage floatsafe -; TODO doesn't work anymore - main { sub start() {