19 lines
194 B
ArmAsm
19 lines
194 B
ArmAsm
f = r5
|
|
i = r3
|
|
.globl j
|
|
.globl succ
|
|
.globl ctest,iget
|
|
.globl string
|
|
|
|
string:
|
|
tst -(sp)
|
|
jsr pc,iget
|
|
1:
|
|
mov j(f),(sp)
|
|
mov r0,-(sp)
|
|
jsr pc,ctest
|
|
mov (sp)+,r0
|
|
bcs 1b
|
|
mov (sp)+,j(f)
|
|
jmp succ
|