rmu4.s 295 B

1234567891011121314151617181920
  1. .sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
  2. .define .rmu4
  3. ! $Id$
  4. .rmu4:
  5. movl (sp)+,r3
  6. movl (sp)+,r2
  7. blss I1
  8. movl (sp)+,r0
  9. clrl r1
  10. ediv r2,r0,r1,r0
  11. jmp (r3)
  12. I1:
  13. movl (sp)+,r0
  14. cmpl r0,r2
  15. blssu I2
  16. subl2 r2,r0
  17. I2:
  18. jmp (r3)