diff options
| author | Matthew Pickering <matthewtpickering@gmail.com> | 2017-05-04 14:15:43 -0400 |
|---|---|---|
| committer | Ben Gamari <ben@smart-cactus.org> | 2017-05-04 18:20:45 -0400 |
| commit | 1829d265662ca8d052df3e5df1aa1137b19e39ce (patch) | |
| tree | bfccc2863d63608bc5307634cdafb7304f742bba /testsuite/tests/module | |
| parent | 74f31539ce48a218922368ca62e1c3c6023f27a8 (diff) | |
| download | haskell-1829d265662ca8d052df3e5df1aa1137b19e39ce.tar.gz | |
Implement sequential name lookup properly
Previously we would run all the monadic actions and then
combine their results. This caused problems if later actions
raised errors but earlier lookups suceeded. We only want to run later
lookups if the earlier ones fail.
Fixes #13622
Reviewers: RyanGlScott, austin, bgamari, simonpj
Reviewed By: simonpj
Subscribers: simonpj, rwbarton, thomie
GHC Trac Issues: #13622
Differential Revision: https://phabricator.haskell.org/D3515
Diffstat (limited to 'testsuite/tests/module')
| -rw-r--r-- | testsuite/tests/module/T13622.hs | 5 | ||||
| -rw-r--r-- | testsuite/tests/module/all.T | 1 |
2 files changed, 6 insertions, 0 deletions
diff --git a/testsuite/tests/module/T13622.hs b/testsuite/tests/module/T13622.hs new file mode 100644 index 0000000000..037283ee57 --- /dev/null +++ b/testsuite/tests/module/T13622.hs @@ -0,0 +1,5 @@ +module Bug (Bits(Bits)) where + +import qualified Data.Bits as Bits + +newtype Bits = Bits Int diff --git a/testsuite/tests/module/all.T b/testsuite/tests/module/all.T index 6d05c77a9e..5404f19e4a 100644 --- a/testsuite/tests/module/all.T +++ b/testsuite/tests/module/all.T @@ -283,4 +283,5 @@ test('T11970A', [], multimod_compile, ['T11970A','-Wunused-imports']) test('T11970B', normal, compile_fail, ['']) test('MultiExport', normal, compile, ['']) test('T13528', normal, compile, ['']) +test('T13622', normal, compile, ['']) |