From fe35817c32de0418cd43a75ea2a55056dd16a303 Mon Sep 17 00:00:00 2001
From: sof <unknown>
Date: Sun, 19 Sep 1999 19:22:14 +0000
Subject: [PATCH] [project @ 1999-09-19 19:22:14 by sof] Have sizeof_time_t
report the size in *words*
---
ghc/lib/std/cbits/timezone.c | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/ghc/lib/std/cbits/timezone.c b/ghc/lib/std/cbits/timezone.c
index b03f2df5f3eb..2866508ca7dd 100644
--- a/ghc/lib/std/cbits/timezone.c
+++ b/ghc/lib/std/cbits/timezone.c
@@ -1,7 +1,7 @@
/*
* (c) The GRASP/AQUA Project, Glasgow University, 1994-1998
*
- * $Id: timezone.c,v 1.4 1999/09/12 14:26:32 sof Exp $
+ * $Id: timezone.c,v 1.5 1999/09/19 19:22:14 sof Exp $
*
* Timezone Runtime Support
*/
@@ -29,7 +29,7 @@ StgInt prim_SETZONE ( StgAddr x, StgAddr y )
StgInt sizeof_word ( void ) { return (sizeof(unsigned int)); }
StgInt sizeof_struct_tm ( void ) { return (sizeof(struct tm)); }
-StgInt sizeof_time_t ( void ) { return (sizeof(time_t)); }
+StgInt sizeof_time_t ( void ) { return (sizeof(time_t) / sizeof(int)); }
char*
get_ZONE (StgAddr x)
--
GitLab