27 lines
363 B
ArmAsm
27 lines
363 B
ArmAsm
.sect .text; .sect .rom; .sect .data; .sect .bss
|
|
.sect .text
|
|
.define cff
|
|
cff:
|
|
move.l (sp)+,a0
|
|
move.l (sp)+,d1
|
|
move.l (sp)+,d0
|
|
cmp.l d0,d1
|
|
beq 2f
|
|
cmp.l #4,d0
|
|
bne 1f
|
|
move.l (sp),d0
|
|
tst.l -(sp)
|
|
move.l a0,-(sp)
|
|
jsr (Fstod)
|
|
move.l d0,(4,sp)
|
|
move.l d1,(8,sp)
|
|
2:
|
|
rts
|
|
1:
|
|
move.l (sp),d0
|
|
move.l (4,sp),d1
|
|
move.l a0,(sp)
|
|
jsr (Fdtos)
|
|
move.l d0,(4,sp)
|
|
rts
|