X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fruntime%2Ftime.c;h=7b4b167e7a825b0a7cc1703db54bc97b0c662dce;hb=dd54f9e004a0a83d1328e94648f48dcc27e0be5b;hp=59a6fff118ad33e31f6841e899cecf2b5ad3811e;hpb=6584a2c88efaa6931083721adae2f9f10e0fefd5;p=sbcl.git

diff --git a/src/runtime/time.c b/src/runtime/time.c
index 59a6fff..7b4b167 100644
--- a/src/runtime/time.c
+++ b/src/runtime/time.c
@@ -18,6 +18,11 @@
 #include "sbcl.h"
 #include "runtime.h"
 
+#ifdef LISP_FEATURE_HPUX
+struct tm *gmtime_r(const time_t *timer, struct tm *result);
+struct tm *localtime_r(const time_t *timer, struct tm *result);
+#endif
+
 void get_timezone(time_t when, int *secwest, boolean *dst)
 {
     struct tm ltm, gtm;
@@ -32,7 +37,7 @@ void get_timezone(time_t when, int *secwest, boolean *dst)
      * The Windows versions also don't support times before the
      * epoch, so we kludge it. */
     if (when < 0)
-        when = -when;
+        when = 0;
     ltm = *localtime(&when);
     gtm = *gmtime(&when);
 #else