From 538da6cb2ff0450900e3a33cb285c942b079fe5d Mon Sep 17 00:00:00 2001
From: simonmar <unknown>
Date: Wed, 19 Sep 2001 14:06:03 +0000
Subject: [PATCH] [project @ 2001-09-19 14:06:03 by simonmar] on second
 thoughts, don't specialise if it isn't worth it

---
 ghc/lib/std/Complex.lhs |    4 +---
 1 file changed, 1 insertion(+), 3 deletions(-)

diff --git a/ghc/lib/std/Complex.lhs b/ghc/lib/std/Complex.lhs
index 78d8a74..b7849d2 100644
--- a/ghc/lib/std/Complex.lhs
+++ b/ghc/lib/std/Complex.lhs
@@ -1,5 +1,5 @@
 % -----------------------------------------------------------------------------
-% $Id: Complex.lhs,v 1.6 2001/09/19 14:05:01 simonmar Exp $
+% $Id: Complex.lhs,v 1.7 2001/09/19 14:06:03 simonmar Exp $
 %
 % (c) The University of Glasgow, 1994-2000
 %
@@ -55,8 +55,6 @@ data  (RealFloat a)     => Complex a = !a :+ !a  deriving (Eq, Read, Show)
 %*********************************************************
 
 \begin{code}
-{-# SPECIALISE realPart :: Complex Double -> Double #-}
-{-# SPECIALISE imagPart :: Complex Double -> Double #-}
 realPart, imagPart :: (RealFloat a) => Complex a -> a
 realPart (x :+ _) =  x
 imagPart (_ :+ y) =  y
-- 
1.7.10.4