_wait.s 191 B

12345678910111213141516
  1. .sect .text; .sect .rom; .sect .data; .sect .bss
  2. .sect .text
  3. wait = 7
  4. .define __wait
  5. __wait:
  6. .data2 0x0000
  7. chmk $wait
  8. bcc 1f
  9. jmp cerror
  10. 1:
  11. tstl 4(ap)
  12. beql 1f
  13. movl r1,*4(ap)
  14. 1:
  15. ret