summaryrefslogtreecommitdiff
path: root/testsuite/tests/ghci.debugger
diff options
context:
space:
mode:
authorSimon Peyton Jones <simonpj@microsoft.com>2013-11-25 15:09:22 +0000
committerSimon Peyton Jones <simonpj@microsoft.com>2013-11-28 16:02:00 +0000
commitcefe67b0eb6532e77d134e215c7fb1f56b6c7a22 (patch)
treed120ae8ceff6e7b9808af80dd45e49cefe541ada /testsuite/tests/ghci.debugger
parentd79ecb44500f0d4a577e3de87e4ae9f084b54f34 (diff)
downloadhaskell-cefe67b0eb6532e77d134e215c7fb1f56b6c7a22.tar.gz
Error message wibbles
Diffstat (limited to 'testsuite/tests/ghci.debugger')
-rw-r--r--testsuite/tests/ghci.debugger/scripts/break012.stdout2
-rw-r--r--testsuite/tests/ghci.debugger/scripts/print027.stdout12
-rw-r--r--testsuite/tests/ghci.debugger/scripts/print033.stdout2
3 files changed, 8 insertions, 8 deletions
diff --git a/testsuite/tests/ghci.debugger/scripts/break012.stdout b/testsuite/tests/ghci.debugger/scripts/break012.stdout
index 90e228c293..70fa0f37b9 100644
--- a/testsuite/tests/ghci.debugger/scripts/break012.stdout
+++ b/testsuite/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/testsuite/tests/ghci.debugger/scripts/print027.stdout b/testsuite/tests/ghci.debugger/scripts/print027.stdout
index 38c46a9118..5db21839ae 100644
--- a/testsuite/tests/ghci.debugger/scripts/print027.stdout
+++ b/testsuite/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/testsuite/tests/ghci.debugger/scripts/print033.stdout b/testsuite/tests/ghci.debugger/scripts/print033.stdout
index e60df0905a..62b39bbaea 100644
--- a/testsuite/tests/ghci.debugger/scripts/print033.stdout
+++ b/testsuite/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))