From 6590d4a250f804999b8d2e1453afffac268818c6 Mon Sep 17 00:00:00 2001 From: Guido van Rossum Date: Thu, 4 Apr 1991 10:49:03 +0000 Subject: Hack for THINK C time function. Made more functions externally visible. --- Modules/timemodule.c | 16 +++++++++++----- 1 file changed, 11 insertions(+), 5 deletions(-) diff --git a/Modules/timemodule.c b/Modules/timemodule.c index 765c40a..b98e140 100644 --- a/Modules/timemodule.c +++ b/Modules/timemodule.c @@ -48,11 +48,19 @@ time_time(self, args) object *self; object *args; { - long secs; + time_t secs; if (!getnoarg(args)) return NULL; secs = time((time_t *)NULL); - return newintobject(secs); +#ifdef THINK_C +#ifndef THINK_C_3_0 +/* Difference in origin between Mac and Unix clocks: */ +#define TIMEDIFF ((time_t) \ + (((1970-1904)*365L + (1970-1904)/4) * 24 * 3600)) + secs -= TIMEDIFF; +#endif +#endif + return newintobject((long)secs); } static jmp_buf sleep_intr; @@ -164,7 +172,6 @@ inittime() #define MacTicks (* (long *)0x16A) -static sleep(msecs) int msecs; { @@ -177,7 +184,6 @@ sleep(msecs) } } -static millisleep(msecs) long msecs; { @@ -190,7 +196,7 @@ millisleep(msecs) } } -static long +long millitimer() { return MacTicks * 50 / 3; /* MacTicks * 1000 / 60 */ -- cgit v0.12