Summary Files Commits Branches @commit @diff @stats
diff options
context:
space:
mode:
Commit10fca1f3fb363e81a8b737a690bb2752bfe61a60 (patch)
Author
 Syndamia <kamen@syndamia.com>
2025-08-03 11:38:10 +0300
Committer
 Syndamia <kamen@syndamia.com>
2025-08-03 11:38:10 +0300
Files60ede9d036f22a935bb2c793b37839c7b25e9925
c64-programs-10fca1f3fb363e81a8b737a690bb2752bfe61a60.tar
c64-programs-10fca1f3fb363e81a8b737a690bb2752bfe61a60.tar.gz
c64-programs-10fca1f3fb363e81a8b737a690bb2752bfe61a60.zip
Parent8dfce9012a7f28485ea9d4b2391c7352ce60a3f7 (diff)
fix(catalan): Replace subtrahend with arg
1 files changed, 3 insertions, 4 deletions
-rw-r--r--catalan/math.a657
diff --git a/catalan/math.a65 b/catalan/math.a65
index 7bd850a..667d651 100644
--- a/catalan/math.a65
+++ b/catalan/math.a65
@@ -41,18 +41,17 @@ diva .(
ora #0 ; Update flags, so they're accurate with the accumulator value
beq return ; if (a == 0) return a
- ldx arg ; x = arg
+ ldx arg ; x = arg
cpx #0 ; if (x == 0)
beq r_zero ; return 0
cpx #1 ; if (x == 1)
beq return ; return a
- stx subtrahend ; subtrahend = x
ldx #0 ; x = 0
loop sec ; do carry = 1
- sbc subtrahend ; a -= addend + !carry
+ sbc arg ; a -= arg + !carry
inx ; ++x
- cmp subtrahend ; while (a >= subtrahend)
+ cmp arg ; while (a >= arg)
bcs loop
return txa