diff options
1 files changed, 10 insertions, 10 deletions
| -rw-r--r-- | catalan/math.a65 | 20 |
diff --git a/catalan/math.a65 b/catalan/math.a65 index ea45675..434fd8d 100644 --- a/catalan/math.a65 +++ b/catalan/math.a65 @@ -1,14 +1,14 @@ #ifndef CATALAN_MATH #define CATALAN_MATH -; a *= multa_arg1 +; a *= multa_arg multa .( ora #0 ; Update flags, so they're accurate with the accumulator value beq return ; if (a == 0) return a cmp #1 ; if (a == 1) - beq r_arg1 ; return arg1 + beq r_arg ; return arg - ldx arg1 ; x = arg1 + ldx arg ; x = arg cpx #0 ; if (x == 0) beq r_zero ; return 0 cpx #1 ; if (x == 1) @@ -28,20 +28,20 @@ return ora #0 ; Update flags, so they're accurate with the accumulator value r_zero lda #0 rts -r_arg1 lda arg1 +r_arg lda arg rts -+multa_arg1 -arg1 .byt 0 ++multa_arg +arg .byt 0 addend .byt 0 .) -; a /= diva_arg1 +; a /= diva_arg diva .( ora #0 ; Update flags, so they're accurate with the accumulator value beq return ; if (a == 0) return a - ldx arg1 ; x = arg1 + ldx arg ; x = arg cpx #0 ; if (x == 0) beq r_zero ; return 0 cpx #1 ; if (x == 1) @@ -61,8 +61,8 @@ return txa r_zero lda #0 rts -+diva_arg1 -arg1 .byt 0 ++diva_arg +arg .byt 0 subtrahend .byt 0 .) |