ack/mach/i80/libem/nop.s

26 lines
286 B
ArmAsm
Raw Normal View History

1985-03-18 12:46:51 +00:00
.define .nop
.nop: push b
lhld hol0+4
mov d,h
mov e,l
call prstring
lxi d,lin
call prstring
lhld hol0
call prdec
lxi d,stpr
call prstring
lxi h,0
dad sp
call prdec
lxi d,newline
call prstring
pop b
ret
lin: .asciz " lin:"
stpr: .asciz " sp:"
newline:.asciz "\n"