diff options
author | Simon Peyton Jones <simonpj@microsoft.com> | 2015-04-07 14:54:56 +0100 |
---|---|---|
committer | Simon Peyton Jones <simonpj@microsoft.com> | 2015-04-07 15:10:25 +0100 |
commit | c897613bbf6336d00c9b5433268cb5813308bee9 (patch) | |
tree | 25af8bc9a0cdc2858f7aa6b2a75c7b02651ebc9f /testsuite/tests/ghci/scripts/ghci008.stdout | |
parent | 547c597112954353cef7157cb0a389bc4f6303eb (diff) | |
download | haskell-c897613bbf6336d00c9b5433268cb5813308bee9.tar.gz |
Error msg wibbles from reduced module prefixes
Diffstat (limited to 'testsuite/tests/ghci/scripts/ghci008.stdout')
-rw-r--r-- | testsuite/tests/ghci/scripts/ghci008.stdout | 70 |
1 files changed, 34 insertions, 36 deletions
diff --git a/testsuite/tests/ghci/scripts/ghci008.stdout b/testsuite/tests/ghci/scripts/ghci008.stdout index 8aec1602a6..0f9c93a4a9 100644 --- a/testsuite/tests/ghci/scripts/ghci008.stdout +++ b/testsuite/tests/ghci/scripts/ghci008.stdout @@ -1,36 +1,34 @@ -class Num a where - (+) :: a -> a -> a - ... - -- Defined in ‘GHC.Num’ -infixl 6 + -class 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’ -base-4.8.1.0:Data.OldList.isPrefixOf :: Eq a => [a] -> [a] -> Bool - -- Defined in ‘base-4.8.1.0:Data.OldList’ +class Num a where
+ (+) :: a -> a -> a
+ ...
+ -- Defined in ‘GHC.Num’
+infixl 6 +
+class Num a where
+ (+) :: a -> a -> a
+ ...
+ -- Defined in ‘GHC.Num’
+infixl 6 +
+data Complex a = !a :+ !a -- Defined in ‘Data.Complex’
+infix 6 :+
+data Complex a = !a :+ !a -- Defined in ‘Data.Complex’
+infix 6 :+
+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’
+isPrefixOf :: Eq a => [a] -> [a] -> Bool
+ -- Defined in ‘base-4.8.1.0:Data.OldList’
|