From dc96776f90d958bf45f33654aba61af6c64e2873 Mon Sep 17 00:00:00 2001
From: simonpj <unknown>
Date: Wed, 21 Feb 2001 17:15:45 +0000
Subject: [PATCH] [project @ 2001-02-21 17:15:45 by simonpj] Add integerTyCon
 to the ubiquitous types

---
 ghc/compiler/rename/RnEnv.lhs |    6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/ghc/compiler/rename/RnEnv.lhs b/ghc/compiler/rename/RnEnv.lhs
index 582f0aa..f87d584 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.]
-- 
1.7.10.4