28 lines
168 B
ArmAsm
28 lines
168 B
ArmAsm
.globl succ
|
|
.globl .ng,.nt,.cm
|
|
|
|
/ !
|
|
|
|
.nt:
|
|
tst (sp)
|
|
beq 1f
|
|
clr (sp)
|
|
br 9f
|
|
1:
|
|
mov $1,(sp)
|
|
br 9f
|
|
|
|
/unary -
|
|
|
|
.ng:
|
|
neg (sp)
|
|
br 9f
|
|
|
|
/ ~
|
|
|
|
.cm:
|
|
com (sp)
|
|
|
|
9:
|
|
jmp succ
|