diff options
Diffstat (limited to 'testsuite/tests/ghci.debugger/scripts')
5 files changed, 65 insertions, 63 deletions
diff --git a/testsuite/tests/ghci.debugger/scripts/break006.stderr b/testsuite/tests/ghci.debugger/scripts/break006.stderr index f1567ed7ff..16ba5ec004 100644 --- a/testsuite/tests/ghci.debugger/scripts/break006.stderr +++ b/testsuite/tests/ghci.debugger/scripts/break006.stderr @@ -1,34 +1,30 @@ <interactive>:5:1: error: - No instance for (Show t) arising from a use of ‘print’ - Cannot resolve unknown runtime type ‘t’ - Use :print or :force to determine these types - Relevant bindings include it :: t (bound at <interactive>:5:1) - These potential instances exist: - instance (Show a, Show b) => Show (Either a b) - -- Defined in ‘Data.Either’ - instance Show All -- Defined in ‘Data.Monoid’ - instance forall k (f :: k -> *) (a :: k). - Show (f a) => - Show (Alt f a) - -- Defined in ‘Data.Monoid’ - ...plus 36 others - (use -fprint-potential-instances to see them all) - In a stmt of an interactive GHCi command: print it + • No instance for (Show t) arising from a use of ‘print’ + Cannot resolve unknown runtime type ‘t’ + Use :print or :force to determine these types + Relevant bindings include it :: t (bound at <interactive>:5:1) + These potential instances exist: + instance (Show a, Show b) => Show (Either a b) + -- Defined in ‘Data.Either’ + instance Show Ordering -- Defined in ‘GHC.Show’ + instance Show Integer -- Defined in ‘GHC.Show’ + ...plus 23 others + ...plus 13 instance involving out-of-scope typess + (use -fprint-potential-instances to see them all) + • In a stmt of an interactive GHCi command: print it <interactive>:7:1: error: - No instance for (Show t) arising from a use of ‘print’ - Cannot resolve unknown runtime type ‘t’ - Use :print or :force to determine these types - Relevant bindings include it :: t (bound at <interactive>:7:1) - These potential instances exist: - instance (Show a, Show b) => Show (Either a b) - -- Defined in ‘Data.Either’ - instance Show All -- Defined in ‘Data.Monoid’ - instance forall k (f :: k -> *) (a :: k). - Show (f a) => - Show (Alt f a) - -- Defined in ‘Data.Monoid’ - ...plus 36 others - (use -fprint-potential-instances to see them all) - In a stmt of an interactive GHCi command: print it + • No instance for (Show t) arising from a use of ‘print’ + Cannot resolve unknown runtime type ‘t’ + Use :print or :force to determine these types + Relevant bindings include it :: t (bound at <interactive>:7:1) + These potential instances exist: + instance (Show a, Show b) => Show (Either a b) + -- Defined in ‘Data.Either’ + instance Show Ordering -- Defined in ‘GHC.Show’ + instance Show Integer -- Defined in ‘GHC.Show’ + ...plus 23 others + ...plus 13 instance involving out-of-scope typess + (use -fprint-potential-instances to see them all) + • In a stmt of an interactive GHCi command: print it diff --git a/testsuite/tests/ghci.debugger/scripts/break024.stdout b/testsuite/tests/ghci.debugger/scripts/break024.stdout index 62aa429cad..dc3bd73425 100644 --- a/testsuite/tests/ghci.debugger/scripts/break024.stdout +++ b/testsuite/tests/ghci.debugger/scripts/break024.stdout @@ -1,16 +1,19 @@ -Left user error (error)
-Stopped at <exception thrown>
-_exception :: e = _
-_exception = SomeException
- (IOError Nothing UserError [] "error" Nothing Nothing)
-*** Exception: user error (error)
-Stopped at <exception thrown>
-_exception :: e = _
-_exception = SomeException
- (IOError Nothing UserError [] "error" Nothing Nothing)
-*** Exception: user error (error)
-Stopped at <exception thrown>
-_exception :: e = _
-_exception = SomeException
- (IOError Nothing UserError [] "error" Nothing Nothing)
-Left user error (error)
+Left user error (error) +Stopped at <exception thrown> +_exception :: e = _ +_exception = SomeException + (GHC.IO.Exception.IOError + Nothing GHC.IO.Exception.UserError [] "error" Nothing Nothing) +*** Exception: user error (error) +Stopped at <exception thrown> +_exception :: e = _ +_exception = SomeException + (GHC.IO.Exception.IOError + Nothing GHC.IO.Exception.UserError [] "error" Nothing Nothing) +*** Exception: user error (error) +Stopped at <exception thrown> +_exception :: e = _ +_exception = SomeException + (GHC.IO.Exception.IOError + Nothing GHC.IO.Exception.UserError [] "error" Nothing Nothing) +Left user error (error) diff --git a/testsuite/tests/ghci.debugger/scripts/print019.stderr b/testsuite/tests/ghci.debugger/scripts/print019.stderr index 3c0edbde5a..fa53d94701 100644 --- a/testsuite/tests/ghci.debugger/scripts/print019.stderr +++ b/testsuite/tests/ghci.debugger/scripts/print019.stderr @@ -1,13 +1,14 @@ <interactive>:10:1: error: - No instance for (Show a1) arising from a use of ‘print’ - Cannot resolve unknown runtime type ‘a1’ - Use :print or :force to determine these types - Relevant bindings include it :: a1 (bound at <interactive>:10:1) - These potential instances exist: - instance Show TypeRep -- Defined in ‘Data.Typeable.Internal’ - instance Show Module -- Defined in ‘GHC.Show’ - instance Show Ordering -- Defined in ‘GHC.Show’ - ...plus 32 others - (use -fprint-potential-instances to see them all) - In a stmt of an interactive GHCi command: print it + • No instance for (Show a1) arising from a use of ‘print’ + Cannot resolve unknown runtime type ‘a1’ + Use :print or :force to determine these types + Relevant bindings include it :: a1 (bound at <interactive>:10:1) + These potential instances exist: + instance Show TypeRep -- Defined in ‘Data.Typeable.Internal’ + instance Show Ordering -- Defined in ‘GHC.Show’ + instance Show TyCon -- Defined in ‘GHC.Show’ + ...plus 30 others + ...plus two instance involving out-of-scope typess + (use -fprint-potential-instances to see them all) + • In a stmt of an interactive GHCi command: print it diff --git a/testsuite/tests/ghci.debugger/scripts/print028.stdout b/testsuite/tests/ghci.debugger/scripts/print028.stdout index 3e44dccbc8..93a80bc69d 100644 --- a/testsuite/tests/ghci.debugger/scripts/print028.stdout +++ b/testsuite/tests/ghci.debugger/scripts/print028.stdout @@ -1,5 +1,6 @@ -l = (_t1::[Maybe Integer])
-Just 1
-r = IORef (STRef
- (GHC.Prim.MutVar# (Just 1 : (_t2::[Maybe Integer]))))
-r = IORef (STRef (GHC.Prim.MutVar# (Just 1 : _)))
+l = (_t1::[Maybe Integer]) +Just 1 +r = GHC.IORef.IORef (GHC.STRef.STRef + (GHC.Prim.MutVar# (Just 1 : (_t2::[Maybe Integer])))) +r = GHC.IORef.IORef (GHC.STRef.STRef + (GHC.Prim.MutVar# (Just 1 : _))) diff --git a/testsuite/tests/ghci.debugger/scripts/print033.stdout b/testsuite/tests/ghci.debugger/scripts/print033.stdout index 1aa12c7465..4963c68366 100644 --- a/testsuite/tests/ghci.debugger/scripts/print033.stdout +++ b/testsuite/tests/ghci.debugger/scripts/print033.stdout @@ -1 +1,2 @@ -u = (_t1::(?callStack::CallStack) => ST s (forall s'. ST s' a)) +u = (_t1::(?callStack::GHC.Stack.Types.CallStack) => + ST s (forall s'. ST s' a)) |