Test Trac #8535
authorSimon Peyton Jones <simonpj@microsoft.com>
Mon, 18 Nov 2013 10:50:08 +0000 (10:50 +0000)
committerSimon Peyton Jones <simonpj@microsoft.com>
Mon, 18 Nov 2013 10:51:05 +0000 (10:51 +0000)
testsuite/tests/ghci/scripts/T8535.script [new file with mode: 0644]
testsuite/tests/ghci/scripts/T8535.stdout [new file with mode: 0644]
testsuite/tests/ghci/scripts/all.T

diff --git a/testsuite/tests/ghci/scripts/T8535.script b/testsuite/tests/ghci/scripts/T8535.script
new file mode 100644 (file)
index 0000000..bd41a8a
--- /dev/null
@@ -0,0 +1,2 @@
+import Data.Monoid
+:info (->)
diff --git a/testsuite/tests/ghci/scripts/T8535.stdout b/testsuite/tests/ghci/scripts/T8535.stdout
new file mode 100644 (file)
index 0000000..dbc88e1
--- /dev/null
@@ -0,0 +1,4 @@
+data (->) a b  -- Defined in ‛GHC.Prim’
+instance Monad ((->) r) -- Defined in ‛GHC.Base’
+instance Functor ((->) r) -- Defined in ‛GHC.Base’
+instance Monoid b => Monoid (a -> b) -- Defined in ‛Data.Monoid’
index 9c6ad0c..966ea90 100755 (executable)
@@ -158,4 +158,5 @@ test('T8215', normal, ghci_script, ['T8215.script'])
 test('T8357', normal, ghci_script, ['T8357.script'])
 test('T8383', normal, ghci_script, ['T8383.script'])
 test('T8469', normal, ghci_script, ['T8469.script'])
-test('T8485', normal, ghci_script, ['T8485.script'])
\ No newline at end of file
+test('T8485', normal, ghci_script, ['T8485.script'])
+test('T8535', normal, ghci_script, ['T8535.script'])