Rename package key to unit ID, and installed package ID to component ID.
[ghc.git] / compiler / typecheck / TcRnMonad.hs
index 2dbabfc..4a24dd5 100644 (file)
@@ -124,7 +124,7 @@ initTc hsc_env hsc_src keep_rn_syntax mod loc do_this
                 tcg_rdr_env        = emptyGlobalRdrEnv,
                 tcg_fix_env        = emptyNameEnv,
                 tcg_field_env      = RecFields emptyNameEnv emptyNameSet,
-                tcg_default        = if modulePackageKey mod == primPackageKey
+                tcg_default        = if moduleUnitId mod == primUnitId
                                      then Just []  -- See Note [Default types]
                                      else Nothing,
                 tcg_type_env       = emptyNameEnv,