ret.s 296 B

123456789101112131415161718192021222324252627282930
  1. .define .ret
  2. .sect .text
  3. .sect .rom
  4. .sect .data
  5. .sect .bss
  6. .sect .text
  7. .ret:
  8. beq 3f
  9. cmp #2,d0
  10. bne 1f
  11. move (sp)+,d0
  12. bra 3f
  13. 1:
  14. cmp #4,d0
  15. bne 2f
  16. move.l (sp)+,d0
  17. bra 3f
  18. 2:
  19. cmp #8,d0
  20. bne 4f
  21. move.l (sp)+,d0
  22. move.l (sp)+,d1
  23. 3:
  24. unlk a6
  25. rts
  26. 4:
  27. move.l #EILLINS,-(sp)
  28. jmp .fatal
  29. .align 2