diff options
| author | sewardj <unknown> | 2000-12-18 15:44:46 +0000 |
|---|---|---|
| committer | sewardj <unknown> | 2000-12-18 15:44:46 +0000 |
| commit | 79afaf6d31dafb492bfe208f313d19ab3f268aeb (patch) | |
| tree | 2f13910eada6b9920f975ef8e016d5147ec06c0d | |
| parent | 140a581052ce3644d75c47e5c20b237cdff3ee6e (diff) | |
| download | haskell-79afaf6d31dafb492bfe208f313d19ab3f268aeb.tar.gz | |
[project @ 2000-12-18 15:44:46 by sewardj]
invert sense of warnSelfImport guard
| -rw-r--r-- | ghc/compiler/rename/RnHiFiles.lhs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ghc/compiler/rename/RnHiFiles.lhs b/ghc/compiler/rename/RnHiFiles.lhs index c50d2dd539..d7ccd6edd0 100644 --- a/ghc/compiler/rename/RnHiFiles.lhs +++ b/ghc/compiler/rename/RnHiFiles.lhs @@ -152,7 +152,7 @@ tryLoadInterface doc_str mod_name from -- Check that we aren't importing ourselves. -- That only happens in Rename.checkOldIface, -- which doesn't call tryLoadInterface - warnCheckRn (moduleName this_mod == mod_name) + warnCheckRn (moduleName this_mod /= mod_name) (warnSelfImport this_mod) `thenRn_` -- READ THE MODULE IN |