diff options
| author | Ben Gamari <bgamari.foss@gmail.com> | 2017-04-23 10:03:46 -0400 |
|---|---|---|
| committer | Ben Gamari <ben@smart-cactus.org> | 2017-04-23 11:05:48 -0400 |
| commit | f6eaf01c14960f9d600d5e4c743efc59c37bd4e3 (patch) | |
| tree | da12a6f70134c8fa0f6ae7ec17d6bfadf1aa18c0 /testsuite/tests/ghci | |
| parent | 317ceb41e1efe0566178090fa077c4e6f4f03f10 (diff) | |
| download | haskell-f6eaf01c14960f9d600d5e4c743efc59c37bd4e3.tar.gz | |
testsuite: Add test for #13591
Reviewers: austin
Subscribers: rwbarton, thomie
GHC Trac Issues: #13591
Differential Revision: https://phabricator.haskell.org/D3470
Diffstat (limited to 'testsuite/tests/ghci')
| -rw-r--r-- | testsuite/tests/ghci/scripts/T13591.script | 1 | ||||
| -rw-r--r-- | testsuite/tests/ghci/scripts/T13591A.hs | 4 | ||||
| -rw-r--r-- | testsuite/tests/ghci/scripts/T13591A.hs-boot | 2 | ||||
| -rw-r--r-- | testsuite/tests/ghci/scripts/T13591B.hs | 4 | ||||
| -rwxr-xr-x | testsuite/tests/ghci/scripts/all.T | 1 |
5 files changed, 12 insertions, 0 deletions
diff --git a/testsuite/tests/ghci/scripts/T13591.script b/testsuite/tests/ghci/scripts/T13591.script new file mode 100644 index 0000000000..1143153430 --- /dev/null +++ b/testsuite/tests/ghci/scripts/T13591.script @@ -0,0 +1 @@ +:l T13591A diff --git a/testsuite/tests/ghci/scripts/T13591A.hs b/testsuite/tests/ghci/scripts/T13591A.hs new file mode 100644 index 0000000000..4d77e903d2 --- /dev/null +++ b/testsuite/tests/ghci/scripts/T13591A.hs @@ -0,0 +1,4 @@ +module T13591A where +import Second +one :: Int +one = _ diff --git a/testsuite/tests/ghci/scripts/T13591A.hs-boot b/testsuite/tests/ghci/scripts/T13591A.hs-boot new file mode 100644 index 0000000000..7f18059c9b --- /dev/null +++ b/testsuite/tests/ghci/scripts/T13591A.hs-boot @@ -0,0 +1,2 @@ +module T13591A where +one :: Int diff --git a/testsuite/tests/ghci/scripts/T13591B.hs b/testsuite/tests/ghci/scripts/T13591B.hs new file mode 100644 index 0000000000..25f348f109 --- /dev/null +++ b/testsuite/tests/ghci/scripts/T13591B.hs @@ -0,0 +1,4 @@ +module T13591B where +import {-# SOURCE #-} First +two :: Int +two = one + 1 diff --git a/testsuite/tests/ghci/scripts/all.T b/testsuite/tests/ghci/scripts/all.T index cde72e4d2d..16c9ab27ea 100755 --- a/testsuite/tests/ghci/scripts/all.T +++ b/testsuite/tests/ghci/scripts/all.T @@ -252,3 +252,4 @@ test('T13202', normal, ghci_script, ['T13202.script']) test('T13202a', normal, ghci_script, ['T13202a.script']) test('T13466', normal, ghci_script, ['T13466.script']) test('GhciCurDir', normal, ghci_script, ['GhciCurDir.script']) +test('T13591', expect_broken(13591), ghci_script, ['T13591.script']) |