X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=Data%2FComplex.hs;h=bbc8a07db2449f75bf26c1d70c9eb6eef4b74cb2;hb=685432ac839f249ccd98bdf79fcf0c985872380b;hp=6ebbfcbaeb8ae33e105c5bf5d240360519c6ae88;hpb=9875b3cf1ada084cfa3e6c516b11e946f1d6234e;p=ghc-base.git diff --git a/Data/Complex.hs b/Data/Complex.hs index 6ebbfcb..bbc8a07 100644 --- a/Data/Complex.hs +++ b/Data/Complex.hs @@ -65,7 +65,11 @@ infix 6 :+ data (RealFloat a) => Complex a = !a :+ !a -- ^ forms a complex number from its real and imaginary -- rectangular components. +# if __GLASGOW_HASKELL__ + deriving (Eq, Show, Read, Data) +# else deriving (Eq, Show, Read) +# endif -- ----------------------------------------------------------------------------- -- Functions over Complex