I get:
Actual stdout output differs from expected:
--- ./ghci/scripts/ghci008.stdout.normalised 2008-03-10
10:49:59.000000000 +1100
+++ ./ghci/scripts/ghci008.run.stdout.normalised 2008-03-10
10:49:59.000000000 +1100
@@ -8,10 +8,12 @@
...
-- Defined in GHC.Num
infixl 6 +
-data Data.Complex.Complex a = !a Data.Complex.:+ !a
+data (RealFloat a) => Data.Complex.Complex a
+ = !a Data.Complex.:+ !a
-- Defined in Data.Complex
infix 6 Data.Complex.:+
-data Data.Complex.Complex a = !a Data.Complex.:+ !a
+data (RealFloat a) => Data.Complex.Complex a
+ = !a Data.Complex.:+ !a
-- Defined in Data.Complex
infix 6 Data.Complex.:+
class (RealFrac a, Floating a) => RealFloat a where
*** unexpected failure for ghci008(ghci)
What's up with that?
Roman
_______________________________________________
Cvs-ghc mailing list
Cvs-ghc@haskell.org
http://www.haskell.org/mailman/listinfo/cvs-ghc
