lock.s 173 B

12345678910111213141516
  1. #include "sys.h"
  2. .define _lock
  3. .extern _errno
  4. _lock:
  5. mov 2(sp),0f+2
  6. sys indir; .data2 0f
  7. bcc 1f
  8. mov r0,_errno
  9. mov $-1,r0
  10. 1:
  11. rts pc
  12. .sect .data
  13. 0:
  14. sys lock
  15. .data2 0