_lseek.e 344 B

123456789101112131415161718192021222324252627282930313233
  1. #
  2. mes 2,EM_WSIZE,EM_PSIZE
  3. exp $_lseek
  4. pro $_lseek,0
  5. lal 0
  6. loi 4*EM_WSIZE
  7. loc 19
  8. mon
  9. zeq *1
  10. ste errno
  11. #if EM_WSIZE==1
  12. ldc -1
  13. loc 2
  14. loc 4
  15. cii
  16. #endif
  17. #if EM_WSIZE==2
  18. ldc -1
  19. #endif
  20. #if EM_WSIZE==4
  21. loc -1
  22. #endif
  23. 1
  24. #if EM_WSIZE==1
  25. ret 4*EM_WSIZE
  26. #endif
  27. #if EM_WSIZE==2
  28. ret 2*EM_WSIZE
  29. #endif
  30. #if EM_WSIZE==4
  31. ret EM_WSIZE
  32. #endif
  33. end