ack/mach/sun3/libce/mlf8.s

16 lines
257 B
ArmAsm
Raw Normal View History

1989-03-22 15:06:05 +00:00
.sect .text; .sect .rom; .sect .data; .sect .bss
.sect .text
.define mlf8
mlf8:
move.l (sp)+,a1
lea (8,sp),a0
move.l (a0),d0
move.l (4,a0),d1
move.l (sp)+,(a0)
move.l (sp)+,(4,a0)
move.l a1,-(sp)
jsr (Fmuld)
move.l d0,(4,sp)
move.l d1,(8,sp)
rts