diff options
-rw-r--r-- | testsuite/tests/ghci/scripts/T14828.script | 18 | ||||
-rwxr-xr-x | testsuite/tests/ghci/scripts/all.T | 1 |
2 files changed, 19 insertions, 0 deletions
diff --git a/testsuite/tests/ghci/scripts/T14828.script b/testsuite/tests/ghci/scripts/T14828.script new file mode 100644 index 0000000000..bb0650fbd6 --- /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 2cb93b8aac..575d9ebafc 100755 --- a/testsuite/tests/ghci/scripts/all.T +++ b/testsuite/tests/ghci/scripts/all.T @@ -291,3 +291,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']) |