[commit: testsuite] master: Error message wibbles (e00c604)

[git at git.haskell.org]

Repository : ssh://git@git.haskell.org/testsuite

On branch  : master
Link       : http://ghc.haskell.org/trac/ghc/changeset/e00c604a37fa30c337ac4c03da53d1fbbfab52fd/testsuite

>---------------------------------------------------------------

commit e00c604a37fa30c337ac4c03da53d1fbbfab52fd
Author: Simon Peyton Jones <simonpj at microsoft.com>
Date:   Mon Nov 25 15:09:22 2013 +0000

    Error message wibbles


>---------------------------------------------------------------

e00c604a37fa30c337ac4c03da53d1fbbfab52fd
 tests/ghci.debugger/scripts/break012.stdout |    2 +-
 tests/ghci.debugger/scripts/print027.stdout |   12 ++++++------
 tests/ghci.debugger/scripts/print033.stdout |    2 +-
 3 files changed, 8 insertions(+), 8 deletions(-)

diff --git a/tests/ghci.debugger/scripts/break012.stdout b/tests/ghci.debugger/scripts/break012.stdout
index 90e228c..70fa0f3 100644
--- a/tests/ghci.debugger/scripts/break012.stdout
+++ b/tests/ghci.debugger/scripts/break012.stdout
@@ -11,6 +11,6 @@ b :: a2 -> a2
 c :: ()
 d :: a -> a -> a
 a = (_t1::t)
-b = (_t2::forall a2. a2 -> a2)
+b = (_t2::a2 -> a2)
 c = (_t3::())
 d = (_t4::a -> a -> a)
diff --git a/tests/ghci.debugger/scripts/print027.stdout b/tests/ghci.debugger/scripts/print027.stdout
index 38c46a9..5db2183 100644
--- a/tests/ghci.debugger/scripts/print027.stdout
+++ b/tests/ghci.debugger/scripts/print027.stdout
@@ -1,6 +1,6 @@
-+ = (_t1::forall a. Num a => a -> a -> a)
-print = (_t2::forall a. Show a => a -> IO ())
-log = (_t3::forall a. Floating a => a -> a)
-head = (_t4::forall a. [a] -> a)
-tail = (_t5::forall a. [a] -> [a])
-fst = (_t6::forall a b. (a, b) -> a)
++ = (_t1::Num a => a -> a -> a)
+print = (_t2::Show a1 => a1 -> IO ())
+log = (_t3::Floating a2 => a2 -> a2)
+head = (_t4::[a3] -> a3)
+tail = (_t5::[a4] -> [a4])
+fst = (_t6::(a5, b) -> a5)
diff --git a/tests/ghci.debugger/scripts/print033.stdout b/tests/ghci.debugger/scripts/print033.stdout
index e60df09..62b39bb 100644
--- a/tests/ghci.debugger/scripts/print033.stdout
+++ b/tests/ghci.debugger/scripts/print033.stdout
@@ -1 +1 @@
-u = (_t1::forall s a. ST s (forall s'. ST s' a))
+u = (_t1::ST s (forall s'. ST s' a))