custom 2.0 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869
  1. CONST
  2. (* Ubuntu 18.04 /usr/include/i386-linux-gnu/bits/stat.h *)
  3. _STAT_VER_LINUX* = 3;
  4. TYPE
  5. off64_t* = LONGINT;
  6. blkcnt64_t* = LONGINT;
  7. ino64_t* = LONGINT;
  8. (* Ubuntu 18.04 /usr/include/i386-linux-gnu/bits/stat.h: *)
  9. stat64_t* = RECORD [untagged]
  10. st_dev*: dev_t;
  11. __pad1: int; (* unsigned int *)
  12. __st_ino: ino_t;
  13. st_mode*: mode_t;
  14. st_nlink*: nlink_t;
  15. st_uid*: uid_t;
  16. st_gid*: gid_t;
  17. st_rdev*: dev_t;
  18. __pad2: int; (* unsigned int *)
  19. st_size*: off64_t;
  20. st_blksize*: blksize_t;
  21. st_blocks*: blkcnt64_t;
  22. st_atim*: timespec_t;
  23. st_mtim*: timespec_t;
  24. st_ctim*: timespec_t;
  25. st_ino*: ino64_t;
  26. END;
  27. (* Ubuntu 17.10 /usr/include/i386-linux-gnu/bits/types/sigval_t.h: *)
  28. sigval_t* = RECORD [union]
  29. sival_int*: int;
  30. sival_ptr*: PtrVoid
  31. END;
  32. (* Ubuntu 17.10 /usr/include/i386-linux-gnu/sys/ucontext.h: *)
  33. greg_t* = int;
  34. gregset_t* = ARRAY [untagged] 19 OF greg_t;
  35. fpregset_t* = POINTER [untagged] TO fpstate;
  36. fpreg* = RECORD [untagged]
  37. significand*: ARRAY [untagged] 4 OF SHORTINT; (* unsigned short int *)
  38. exponent*: SHORTINT; (* unsigned short int *)
  39. END;
  40. fpstate* = RECORD [untagged]
  41. cw*: INTEGER; (* unsigned long int *)
  42. sw*: INTEGER; (* unsigned long int *)
  43. tag*: INTEGER; (* unsigned long int *)
  44. ipoff*: INTEGER; (* unsigned long int *)
  45. cssel*: INTEGER; (* unsigned long int *)
  46. dataoff*: INTEGER; (* unsigned long int *)
  47. datasel*: INTEGER; (* unsigned long int *)
  48. _st: ARRAY [untagged] 8 OF fpreg;
  49. status*: INTEGER; (* unsigned long int *)
  50. END;
  51. VAR
  52. timezone*: INTEGER; (* seconds from GMT *)
  53. (*
  54. stdin*, stdout*, stderr* : PtrFILE;
  55. *)
  56. PROCEDURE [ccall] __errno_location*(): PtrVoid;
  57. PROCEDURE [ccall] __xstat* (version: int; filename: PtrSTR; VAR buf: stat_t): int;
  58. PROCEDURE [ccall] __xstat64* (version: int; filename: PtrSTR; VAR buf: stat64_t): int;
  59. PROCEDURE [ccall] lseek64* (fd: int; offset: off64_t; whence: int): off64_t;
  60. PROCEDURE [ccall] sigsetjmp* ["__sigsetjmp"] (VAR env: sigjmp_buf; savemask: int): int;