cmi.s 266 B

12345678910111213141516171819
  1. .sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
  2. .sect .text
  3. .define cmi~
  4. .extern cmi4~,unknown~
  5. ! $Id$
  6. ! Size in r0
  7. cmi~:
  8. cmp r0,$02
  9. bne 1f
  10. mov (sp)+,r1
  11. mov (sp)+,r0
  12. sub (sp)+,r0
  13. neg r0
  14. jmp (r1)
  15. 1: cmp r0,$04
  16. bne 2f
  17. jmp cmi4~
  18. 2: jmp unknown~