1 files changed, 36 insertions, 0 deletions
diff --git a/testsuite/tests/ghci/scripts/ghci008.stdout b/testsuite/tests/ghci/scripts/ghci008.stdout
new file mode 100644
index 0000000000..000f254070
--- /dev/null
+++ b/testsuite/tests/ghci/scripts/ghci008.stdout
@@ -0,0 +1,36 @@
+class (Eq a, Show a) => Num a where
+  (+) :: a -> a -> a
+  ...
+  	-- Defined in GHC.Num
+infixl 6 +
+class (Eq a, Show a) => Num a where
+  (+) :: a -> a -> a
+  ...
+  	-- Defined in GHC.Num
+infixl 6 +
+data 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
+  	-- Defined in Data.Complex
+infix 6 Data.Complex.:+
+class (RealFrac a, Floating a) => RealFloat a where
+  floatRadix :: a -> Integer
+  floatDigits :: a -> Int
+  floatRange :: a -> (Int, Int)
+  decodeFloat :: a -> (Integer, Int)
+  encodeFloat :: Integer -> Int -> a
+  exponent :: a -> Int
+  significand :: a -> a
+  scaleFloat :: Int -> a -> a
+  isNaN :: a -> Bool
+  isInfinite :: a -> Bool
+  isDenormalized :: a -> Bool
+  isNegativeZero :: a -> Bool
+  isIEEE :: a -> Bool
+  atan2 :: a -> a -> a
+  	-- Defined in GHC.Float
+instance RealFloat Float -- Defined in GHC.Float
+instance RealFloat Double -- Defined in GHC.Float
+Data.List.isPrefixOf :: Eq a => [a] -> [a] -> Bool
+  	-- Defined in Data.List