From 2087b6e7682cee4c4a4aadc722a3d441b39f7a3b Mon Sep 17 00:00:00 2001
From: simonmar <unknown>
Date: Fri, 12 Jan 2001 15:48:09 +0000
Subject: [PATCH] [project @ 2001-01-12 15:48:09 by simonmar] I need an
 Integral CTime.  Numeric only won't do.

---
 ghc/lib/std/PrelCTypesISO.lhs |    4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/ghc/lib/std/PrelCTypesISO.lhs b/ghc/lib/std/PrelCTypesISO.lhs
index 4fa2aa7..dd2204c 100644
--- a/ghc/lib/std/PrelCTypesISO.lhs
+++ b/ghc/lib/std/PrelCTypesISO.lhs
@@ -1,5 +1,5 @@
 % -----------------------------------------------------------------------------
-% $Id: PrelCTypesISO.lhs,v 1.1 2001/01/11 17:25:57 simonmar Exp $
+% $Id: PrelCTypesISO.lhs,v 1.2 2001/01/12 15:48:09 simonmar Exp $
 %
 % (c) The FFI task force, 2000
 %
@@ -51,7 +51,7 @@ INTEGRAL_TYPE(CSigAtomic,tyConCSigAtomic,"CSigAtomic",HTYPE_SIG_ATOMIC_T)
  #-}
 
 NUMERIC_TYPE(CClock,tyConCClock,"CClock",HTYPE_CLOCK_T)
-NUMERIC_TYPE(CTime,tyConCTime,"CTime",HTYPE_TIME_T)
+INTEGRAL_TYPE(CTime,tyConCTime,"CTime",HTYPE_TIME_T)
 
 -- TODO: Instances. But which...?  :-}
 
-- 
1.7.10.4