diff options
| author | Simon Peyton Jones <simonpj@microsoft.com> | 2015-01-16 14:17:14 +0000 |
|---|---|---|
| committer | Simon Peyton Jones <simonpj@microsoft.com> | 2015-01-16 14:17:14 +0000 |
| commit | fb7c311711c8851d0de1e40231150ad999ae9c2b (patch) | |
| tree | e3000de44d43bcdce46165fce7bd3092f9be32d5 /testsuite/tests/module | |
| parent | c71fb84b8c9ec9c1e279df8c75ceb8a537801aa1 (diff) | |
| download | haskell-fb7c311711c8851d0de1e40231150ad999ae9c2b.tar.gz | |
Repsect the package name when checking for self-import
Fixes Trac #9997.
In doing this I tripped across the specialness of "this" in
PackageImports. The magic constant (fsLit "this") is scattered across
the compiler and ought to be put in one place. But where?
Diffstat (limited to 'testsuite/tests/module')
| -rw-r--r-- | testsuite/tests/module/T9997.hs | 5 | ||||
| -rw-r--r-- | testsuite/tests/module/all.T | 1 |
2 files changed, 6 insertions, 0 deletions
diff --git a/testsuite/tests/module/T9997.hs b/testsuite/tests/module/T9997.hs new file mode 100644 index 0000000000..acc82da90b --- /dev/null +++ b/testsuite/tests/module/T9997.hs @@ -0,0 +1,5 @@ +{-# LANGUAGE PackageImports #-} +module Control.DeepSeq where + +import "deepseq" Control.DeepSeq + diff --git a/testsuite/tests/module/all.T b/testsuite/tests/module/all.T index c91d30c7b4..58632bea73 100644 --- a/testsuite/tests/module/all.T +++ b/testsuite/tests/module/all.T @@ -344,3 +344,4 @@ test('T414a', normal, compile, ['']) test('T414b', normal, compile, ['']) test('T3776', normal, compile, ['']) test('T9061', normal, compile, ['']) +test('T9997', normal, compile, ['']) |