cvf.s 308 B

1234567891011121314151617181920
  1. .define .cfi, .cif,.cfu,.cuf,.cff
  2. .sect .text
  3. .sect .rom
  4. .sect .data
  5. .sect .bss
  6. .sect .text
  7. ! this is a dummy float conversion routine
  8. .cfi:
  9. .cif:
  10. .cfu:
  11. .cuf:
  12. .cff:
  13. move.l (sp)+, a0 ! return address
  14. move.l (sp)+, d0 ! destination size
  15. sub.l (sp)+, d0 ! diff. in sizes
  16. sub.l d0, sp
  17. jmp (a0)
  18. .align 2