diff options
Diffstat (limited to 'bigfloat.s')
-rw-r--r-- | bigfloat.s | 18 |
1 files changed, 10 insertions, 8 deletions
@@ -228,11 +228,15 @@ _ulong_to_big: ; high value needs to be multiplied by 65536 - lda #<BIG_64K - sta FLPTR - lda #>BIG_64K - sta FLPTR+1 - jsr FLD1P + ldx #<BIG_64K ; FR1 = 65536 + ldy #>BIG_64K + jsr FLD1R + + ;lda #<BIG_64K + ;sta FLPTR + ;lda #>BIG_64K + ;sta FLPTR+1 + ;jsr FLD1P ; old version: ; lda #<BIG_64K @@ -346,9 +350,7 @@ _bank_maxed_out: _big_cmp: sta FLPTR stx FLPTR+1 - jsr FLD0P - - jsr FMOVE ; move to FR1 (since it's the 2nd arg) + jsr FLD1P jsr popax ; get a arg |