ack/mach/z8000/libem/cmi4.s
1985-02-17 00:57:20 +00:00

16 lines
180 B
ArmAsm

.define cmi4
cmi4:
popl saveret, *RR14
popl RR0, *RR14
popl RR2, *RR14
subl RR2, RR0
ldk R0, $0
ldl RR2, saveret
jr LT, 1f
jp EQ, *RR2
inc R0
jp *RR2
1: dec R0
jp *RR2