From: sof <unknown>
Date: Mon, 1 Mar 1999 08:58:53 +0000 (+0000)
Subject: [project @ 1999-03-01 08:58:53 by sof]
X-Git-Tag: Approximately_9120_patches~6496
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=e19891658e3d0c37facd312f5a11ae665996d27b;p=ghc-hetmet.git

[project @ 1999-03-01 08:58:53 by sof]
wibble
---

diff --git a/ghc/lib/std/PrelNumExtra.lhs b/ghc/lib/std/PrelNumExtra.lhs
index 48cda70..f6163f6 100644
--- a/ghc/lib/std/PrelNumExtra.lhs
+++ b/ghc/lib/std/PrelNumExtra.lhs
@@ -722,7 +722,7 @@ showFloat x  =  showString (formatRealFloat FFGeneric Nothing x)
 
 -- These are the format types.  This type is not exported.
 
-data FFFormat = FFExponent | FFFixed | FFGeneric --no need: deriving (Eq, Ord, Show)
+data FFFormat = FFExponent | FFFixed | FFGeneric
 
 formatRealFloat :: (RealFloat a) => FFFormat -> Maybe Int -> a -> String
 formatRealFloat fmt decs x