[commit: ghc] wip/T14828-tests: testsuite: Add test for #14828 (e88ff20)

[git at git.haskell.org]

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

On branch  : wip/T14828-tests
Link       : http://ghc.haskell.org/trac/ghc/changeset/e88ff20c964cf43c1b70f691cdcec08d66510eb6/ghc

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

commit e88ff20c964cf43c1b70f691cdcec08d66510eb6
Author: Ben Gamari <ben at smart-cactus.org>
Date:   Tue Jan 22 16:58:04 2019 -0500

    testsuite: Add test for #14828


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

e88ff20c964cf43c1b70f691cdcec08d66510eb6
 testsuite/tests/ghci/scripts/T14828.script | 18 ++++++++++++++++++
 testsuite/tests/ghci/scripts/all.T         |  1 +
 2 files changed, 19 insertions(+)

diff --git a/testsuite/tests/ghci/scripts/T14828.script b/testsuite/tests/ghci/scripts/T14828.script
new file mode 100644
index 0000000..bb0650f
--- /dev/null
+++ b/testsuite/tests/ghci/scripts/T14828.script
@@ -0,0 +1,18 @@
+:t foldl
+:print foldl
+
+:t fmap
+:print fmap
+
+:t return
+:print return
+
+:t pure
+:print pure
+
+:m + Data.Monoid
+:p mempty
+:p mappend
+
+:m + Data.List
+:p foldl'
\ No newline at end of file
diff --git a/testsuite/tests/ghci/scripts/all.T b/testsuite/tests/ghci/scripts/all.T
index a27ab32..d07f173 100755
--- a/testsuite/tests/ghci/scripts/all.T
+++ b/testsuite/tests/ghci/scripts/all.T
@@ -295,3 +295,4 @@ test('T15941', normal, ghci_script, ['T15941.script'])
 test('T16030', normal, ghci_script, ['T16030.script'])
 test('T11606', normal, ghci_script, ['T11606.script'])
 test('T16089', normal, ghci_script, ['T16089.script'])
+test('T14828', expect_broken(14828), ghci_script, ['T14828.script'])