profil.s 364 B

12345678910111213141516171819202122232425262728
  1. .define _profil
  2. .sect .text
  3. .sect .rom
  4. .sect .data
  5. .sect .bss
  6. .sect .text
  7. .extern _profil
  8. .sect .text
  9. _profil:
  10. tst.b -40(sp)
  11. link a6,#-0
  12. move.w 16(a6), d2
  13. ext.l d2
  14. move.w 14(a6), d1
  15. ext.l d1
  16. move.w 12(a6), d0
  17. ext.l d0
  18. move.l d2,-(sp)
  19. move.l d1,-(sp)
  20. move.l d0,-(sp)
  21. move.l 8(a6),-(sp)
  22. jsr __Sprofil
  23. lea 16(sp),sp
  24. unlk a6
  25. rts
  26. __Sprofil: trap #0
  27. .data2 0x2C
  28. rts