lock.e 140 B

123456789101112131415
  1. #
  2. mes 2,EM_WSIZE,EM_PSIZE
  3. exp $lock
  4. pro $lock,0
  5. lol 0
  6. loc 53
  7. mon
  8. zne *1
  9. loc 0
  10. ret EM_WSIZE
  11. 1
  12. ste errno
  13. loc -1
  14. ret EM_WSIZE
  15. end