-#ifdef linux /* old, anyway */
-lib "rt";
+#ifdef __linux__ /* old, anyway */
+#pragma lib "rt"
#endif
#include <sys/time.h>
}
// extern int gettimeofday(struct timeval *tp, struct timezone *tz);
-function psi\gettimeofday(array &$tv = NULL, array &$tz = NULL) : int {
+function psi\gettimeofday(array &$tv = NULL) : int {
let tp = calloc(1, sizeof(struct timeval));
- let tz = calloc(1, sizeof(struct timezone));
+ let tz = NULL;
return gettimeofday(tp, tz) as to_int(gettimeofday);
set $tv = to_array(*tp,
to_int(tv_sec),
to_int(tv_usec));
- set $tz = to_array(*tz,
- to_int(tz_minuteswest),
- to_int(tz_dsttime));
}
// extern char *asctime(struct tm *tm);
to_int(tms_cstime)
);
}
+
+
+function psi\tzset() : void {
+ return tzset() as void(tzset);
+}
+
+function psi\tzname() : array {
+ return tzname_get() as to_array(*tzname_get, 2, to_string(*tzname_get));
+}