ack/mach/m68k4/libem/mli.s

38 lines
368 B
ArmAsm

.define .mli
.sect .text
.sect .rom
.sect .data
.sect .bss
.sect .text
.mli:
move.l 4(sp),d1
move.l 8(sp),d0
move.l d5,-(sp)
clr d5
tst.l d0
bpl 1f
neg.l d0
not d5
1:
tst.l d1
bpl 2f
neg.l d1
not d5
2:
move.l d0,-(sp)
move.l d1,-(sp)
jsr .mlu
tst d5
beq 3f
neg.l d1
negx.l d0
3:
move.l (sp)+,d5
move.l (sp)+,a0
add.l #8,sp
jmp (a0)
.align 2