diff options
| author | simonpj <unknown> | 2001-02-21 17:15:45 +0000 |
|---|---|---|
| committer | simonpj <unknown> | 2001-02-21 17:15:45 +0000 |
| commit | dc96776f90d958bf45f33654aba61af6c64e2873 (patch) | |
| tree | e9bcd2b8af31b08410edae9341a0303f79c4a4c0 | |
| parent | aadb2bf04603e88c0e458e71e26a69776ec823d0 (diff) | |
| download | haskell-dc96776f90d958bf45f33654aba61af6c64e2873.tar.gz | |
[project @ 2001-02-21 17:15:45 by simonpj]
Add integerTyCon to the ubiquitous types
| -rw-r--r-- | ghc/compiler/rename/RnEnv.lhs | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/ghc/compiler/rename/RnEnv.lhs b/ghc/compiler/rename/RnEnv.lhs index 582f0aad62..f87d58448e 100644 --- a/ghc/compiler/rename/RnEnv.lhs +++ b/ghc/compiler/rename/RnEnv.lhs @@ -35,7 +35,7 @@ import NameSet import OccName ( OccName, occNameUserString, occNameFlavour ) import Module ( ModuleName, moduleName, mkVanillaModule, mkSysModuleNameFS, moduleNameFS, WhereFrom(..) ) -import TysWiredIn ( unitTyCon, intTyCon, boolTyCon ) +import TysWiredIn ( unitTyCon, intTyCon, boolTyCon, integerTyCon ) import Type ( funTyCon ) import PrelNames ( mkUnboundName, syntaxList, SyntaxMap, vanillaSyntaxMap, derivingOccurrences, @@ -399,8 +399,8 @@ ubiquitousNames -- Virtually every program has error messages in it somewhere `plusFV` - mkFVs (map getName [unitTyCon, funTyCon, boolTyCon, intTyCon]) - -- Add occurrences for Int, and (), because they + mkFVs (map getName [unitTyCon, funTyCon, boolTyCon, intTyCon, integerTyCon]) + -- Add occurrences for Integer, and (), because they -- are the types to which ambigious type variables may be defaulted by -- the type checker; so they won't always appear explicitly. -- [The () one is a GHC extension for defaulting CCall results.] |