Dl.txt 611 B

1234567891011121314151617181920212223242526272829303132
  1. MODULE LinDl ["libc.so.7"];
  2. (*
  3. A. V. Shiryaev, 2012.11
  4. FreeBSD 9.0
  5. 32-bit
  6. *)
  7. CONST
  8. NULL* = 0H;
  9. (* from FreeBSD 9.0 /usr/include/dlfcn.h *)
  10. RTLD_LAZY* = 1;
  11. RTLD_NOW* = 2;
  12. RTLD_GLOBAL* = 100H;
  13. RTLD_LOCAL* = 000H;
  14. RTLD_TRACE* = 200H;
  15. TYPE
  16. PtrVoid* = INTEGER;
  17. HANDLE* = PtrVoid;
  18. PtrSTR* = POINTER TO ARRAY [untagged] OF SHORTCHAR;
  19. PROCEDURE [ccall] dlopen* (file: PtrSTR; mode: INTEGER): HANDLE;
  20. PROCEDURE [ccall] dlclose* (handle: HANDLE): INTEGER;
  21. PROCEDURE [ccall] dlsym* (handle: HANDLE; symbol: PtrSTR): HANDLE;
  22. PROCEDURE [ccall] dlerror* (): PtrSTR;
  23. END LinDl.