From 02fb36f5a28f2a1e38df7beacc65c0af82562e9a Mon Sep 17 00:00:00 2001 From: Paolo Capriotti Date: Sat, 31 Mar 2012 11:13:52 +0100 Subject: [PATCH] Add testcase for #5979 --- testsuite/tests/ghci/scripts/T5979.script | 4 ++++ testsuite/tests/ghci/scripts/T5979.stderr | 4 ++++ testsuite/tests/ghci/scripts/T5979.stdout | 0 testsuite/tests/ghci/scripts/all.T | 1 + 4 files changed, 9 insertions(+) create mode 100644 testsuite/tests/ghci/scripts/T5979.script create mode 100644 testsuite/tests/ghci/scripts/T5979.stderr create mode 100644 testsuite/tests/ghci/scripts/T5979.stdout diff --git a/testsuite/tests/ghci/scripts/T5979.script b/testsuite/tests/ghci/scripts/T5979.script new file mode 100644 index 0000000000..a233d3dac4 --- /dev/null +++ b/testsuite/tests/ghci/scripts/T5979.script @@ -0,0 +1,4 @@ +:set -XPackageImports +import "nonexisting" Control.Monad.State +import "mtl" Control.Monad.State +import "mtl" Control.Monad.Reader diff --git a/testsuite/tests/ghci/scripts/T5979.stderr b/testsuite/tests/ghci/scripts/T5979.stderr new file mode 100644 index 0000000000..30bd30194f --- /dev/null +++ b/testsuite/tests/ghci/scripts/T5979.stderr @@ -0,0 +1,4 @@ + +: + Could not find module `Control.Monad.State' + It is not a module in the current program, or in any known package. diff --git a/testsuite/tests/ghci/scripts/T5979.stdout b/testsuite/tests/ghci/scripts/T5979.stdout new file mode 100644 index 0000000000..e69de29bb2 diff --git a/testsuite/tests/ghci/scripts/all.T b/testsuite/tests/ghci/scripts/all.T index a2efb2ada3..b4541d6445 100755 --- a/testsuite/tests/ghci/scripts/all.T +++ b/testsuite/tests/ghci/scripts/all.T @@ -113,3 +113,4 @@ test('T5564', normal, ghci_script, ['T5564.script']) test('Defer02', normal, ghci_script, ['Defer02.script']) test('T5820', normal, ghci_script, ['T5820.script']) test('T5836', normal, ghci_script, ['T5836.script']) +test('T5979', normal, ghci_script, ['T5979.script']) -- GitLab