From: sof <unknown>
Date: Sun, 19 Sep 1999 19:22:14 +0000 (+0000)
Subject: [project @ 1999-09-19 19:22:14 by sof]
X-Git-Tag: Approximately_9120_patches~5766
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=fe35817c32de0418cd43a75ea2a55056dd16a303;p=ghc-hetmet.git

[project @ 1999-09-19 19:22:14 by sof]
Have sizeof_time_t report the size in *words*
---

diff --git a/ghc/lib/std/cbits/timezone.c b/ghc/lib/std/cbits/timezone.c
index b03f2df..2866508 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)