1234567891011121314151617181920212223242526272829303132333435 |
- #include "em_abs.h"
- .sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
- .define .cuf
- ! $Id$
- .cuf:
- movl (sp)+,r2
- movl (sp)+,r0
- movl (sp)+,r1
- cmpl r1,$4
- bneq Ierr
- cmpl r0,$4
- bneq Idld
- cvtld (sp)+,-(sp)
- bgeq Iout
- addd2 Itwo32F,(sp)
- Iout:
- cvtdf (sp)+,-(sp)
- jmp (r2)
- Idld:
- cmpl r0,$8
- bneq Ierr
- cvtld (sp)+,-(sp)
- bgeq Iout2
- addd2 Itwo32F,(sp)
- Iout2:
- jmp (r2)
- Ierr:
- pushl $EILLINS
- jmp .fat
- .sect .rom
- Itwo32F:
- .data1 0200,0120,00,00,00,00,00,00
|