adi.s 285 B

123456789101112131415161718192021
  1. .sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
  2. .sect .text
  3. .define adi~
  4. .extern unknown~
  5. ! $Id$
  6. !size in r0
  7. adi~:
  8. mov (sp)+,r1
  9. cmp r0,$04
  10. bgt 1f
  11. cmp r0,$02
  12. bgt 2f
  13. add (sp)+,(sp)
  14. jmp (r1)
  15. 2: add (sp)+,02(sp)
  16. add (sp)+,02(sp)
  17. adc (sp)
  18. jmp (r1)
  19. 1:
  20. jmp unknown~