src/cpfront/osx/powerpc/Posix/Mod/Ctime.cp

   1 MODULE PosixCtime ['time.h'];
   2
   3   (* generated by genposix.sh, do not modify *)
   4
   5   IMPORT SYSTEM, PosixCtypes, PosixCsys_types, PosixClocale;
   6
   7   TYPE
   8     char* = PosixCtypes.char;
   9     signed_char* = PosixCtypes.signed_char;
  10     unsigned_char* = PosixCtypes.unsigned_char;
  11     short* = PosixCtypes.short;
  12     short_int* = PosixCtypes.short_int;
  13     signed_short* = PosixCtypes.signed_short;
  14     signed_short_int* = PosixCtypes.signed_short_int;
  15     unsigned_short* = PosixCtypes.unsigned_short;
  16     unsigned_short_int* = PosixCtypes.unsigned_short_int;
  17     int* = PosixCtypes.int;
  18     signed* = PosixCtypes.signed;
  19     signed_int* = PosixCtypes.signed_int;
  20     unsigned* = PosixCtypes.unsigned;
  21     unsigned_int* = PosixCtypes.unsigned_int;
  22     long* = PosixCtypes.long;
  23     long_int* = PosixCtypes.long_int;
  24     signed_long* = PosixCtypes.signed_long;
  25     signed_long_int* = PosixCtypes.signed_long_int;
  26     unsigned_long* = PosixCtypes.unsigned_long;
  27     unsigned_long_int* = PosixCtypes.unsigned_long_int;
  28     long_long* = PosixCtypes.long_long;
  29     long_long_int* = PosixCtypes.long_long_int;
  30     signed_long_long* = PosixCtypes.signed_long_long;
  31     signed_long_long_int* = PosixCtypes.signed_long_long_int;
  32     unsigned_long_long* = PosixCtypes.unsigned_long_long;
  33     unsigned_long_long_int* = PosixCtypes.unsigned_long_long_int;
  34     float* = PosixCtypes.float;
  35     double* = PosixCtypes.double;
  36     long_double* = PosixCtypes.long_double;
  37
  38   TYPE
  39     clock_t* = PosixCsys_types.clock_t;
  40     size_t* = PosixCsys_types.size_t;
  41     time_t* = PosixCsys_types.time_t;
  42     pid_t* = PosixCsys_types.pid_t;
  43
  44   TYPE
  45     locale_t* = PosixClocale.locale_t;
  46
  47   TYPE
  48     Pstruct_tm* = POINTER TO struct_tm;
  49     struct_tm* ['struct tm'] = RECORD [noalign] (* 44 *)
  50       tm_sec*: int; (* 0+4 *)
  51       tm_min*: int; (* 4+4 *)
  52       tm_hour*: int; (* 8+4 *)
  53       tm_mday*: int; (* 12+4 *)
  54       tm_mon*: int; (* 16+4 *)
  55       tm_year*: int; (* 20+4 *)
  56       tm_wday*: int; (* 24+4 *)
  57       tm_yday*: int; (* 28+4 *)
  58       tm_isdst*: int; (* 32+4 *)
  59     END;
  60
  61   TYPE
  62     Pstruct_timespec* = POINTER TO struct_timespec;
  63     struct_timespec* ['struct timespec'] = RECORD [noalign] (* 8 *)
  64       tv_sec*: time_t; (* 0+4 *)
  65       tv_nsec*: long; (* 4+4 *)
  66     END;
  67
  68   CONST
  69     CLOCKS_PER_SEC* = 1000000;
  70
  71   PROCEDURE [ccall] asctime* (IN tm: struct_tm): POINTER TO ARRAY [untagged] OF SHORTCHAR;
  72   PROCEDURE [ccall] asctime_r* (IN tm: struct_tm; buf: POINTER TO ARRAY [untagged] OF SHORTCHAR): POINTER TO ARRAY [untagged] OF SHORTCHAR;
  73   PROCEDURE [ccall] clock* (): clock_t;
  74   PROCEDURE [ccall] ctime* (VAR timep: time_t): POINTER TO ARRAY [untagged] OF SHORTCHAR;
  75   PROCEDURE [ccall] ctime_r* (VAR timep: time_t; buf: POINTER TO ARRAY [untagged] OF SHORTCHAR): POINTER TO ARRAY [untagged] OF SHORTCHAR;
  76   PROCEDURE [ccall] difftime* (time0, time1: time_t): double;
  77   PROCEDURE [ccall] getdate* (IN string: ARRAY [untagged] OF SHORTCHAR): Pstruct_tm;
  78   PROCEDURE [ccall] gmtime* (VAR timep: time_t): Pstruct_tm;
  79   PROCEDURE [ccall] gmtime_r* (VAR timep: time_t; VAR result: struct_tm): Pstruct_tm;
  80   PROCEDURE [ccall] localtime* (VAR timep: time_t): Pstruct_tm;
  81   PROCEDURE [ccall] localtime_r* (VAR timep: time_t; VAR result: struct_tm): Pstruct_tm;
  82   PROCEDURE [ccall] mktime* (VAR tm: struct_tm): time_t;
  83   PROCEDURE [ccall] nanosleep* (IN [nil] rqtp: struct_timespec; VAR [nil] rmtp: struct_timespec): int;
  84   PROCEDURE [ccall] strftime* (VAR s: ARRAY [untagged] OF SHORTCHAR; max: size_t; IN format: ARRAY [untagged] OF SHORTCHAR; IN tm: struct_tm): size_t;
  85   PROCEDURE [ccall] strftime_l* (VAR s: ARRAY [untagged] OF SHORTCHAR; max: size_t; IN format: ARRAY [untagged] OF SHORTCHAR; IN tm: struct_tm; locale: locale_t): size_t;
  86   PROCEDURE [ccall] strptime* (IN s, format: ARRAY [untagged] OF SHORTCHAR; VAR tm: struct_tm): POINTER TO ARRAY [untagged] OF SHORTCHAR;
  87   PROCEDURE [ccall] time* (VAR [nil] tloc: time_t): time_t;
  88   PROCEDURE [ccall] tzset* ;
  89
  90 END PosixCtime.