renamed some labels to make combining with other functions easier (global label names!)
This commit is contained in:
parent
edb61d1b09
commit
ce44657a98
10
code/gcd.txt
10
code/gcd.txt
@ -5,7 +5,7 @@ gto
|
||||
=u
|
||||
$u
|
||||
$v
|
||||
>loop
|
||||
>gcd-loop
|
||||
gge
|
||||
$u
|
||||
=t
|
||||
@ -13,10 +13,10 @@ $v
|
||||
=u
|
||||
$t
|
||||
=v
|
||||
:loop
|
||||
:gcd-loop
|
||||
$v
|
||||
0
|
||||
>ret
|
||||
>gcd-ret
|
||||
gle
|
||||
$v
|
||||
=t
|
||||
@ -26,9 +26,9 @@ mod
|
||||
=v
|
||||
$t
|
||||
=u
|
||||
>loop
|
||||
>gcd-loop
|
||||
gto
|
||||
:ret
|
||||
:gcd-ret
|
||||
$u
|
||||
ret
|
||||
:main
|
||||
|
Loading…
x
Reference in New Issue
Block a user