Validate fails

[Roman Leshchinskiy]

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