Files
unix-v6/source/tmg/tmgb/decmal.s
T
2018-01-27 22:35:41 +09:00

17 lines
208 B
ArmAsm

i = r3
.globl putcall,iget,kput,putdec
.globl generate,succ
.globl decimal
decimal:
mov $1f+1,r0
jsr pc,putcall
jsr pc,iget
mov (r0),r0
jsr pc,kput
jmp succ
1:
mov (i),r0
jsr pc,putdec
jmp generate