Skip to content
GitLab
Projects
Groups
Snippets
/
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Sign in / Register
Toggle navigation
Menu
Open sidebar
jberryman
GHC
Commits
8ec76b05
Commit
8ec76b05
authored
Jan 27, 2005
by
simonpj
Browse files
[project @ 2005-01-27 15:53:38 by simonpj]
Comments
parent
2ec5498e
Changes
1
Hide whitespace changes
Inline
Side-by-side
ghc/compiler/iface/TcIface.lhs
View file @
8ec76b05
...
...
@@ -121,9 +121,11 @@ importDecl :: Name -> IfM lcl (MaybeErr Message TyThing)
-- Get the TyThing for this Name from an interface file
importDecl name
| Just thing <- wiredInNameTyThing_maybe name
-- This case only happens for tuples, because we pre-populate the eps_PTE
-- with other wired-in things. We can't do that for tuples because we
-- This case definitely happens for tuples, because we
-- don't know how many of them we'll find
-- It also now happens for all other wired in things. We used
-- to pre-populate the eps_PTE with other wired-in things, but
-- we don't seem to do that any more. I guess it keeps the PTE smaller?
= do { updateEps_ (\ eps -> eps { eps_PTE = extendTypeEnv (eps_PTE eps) thing })
; return (Succeeded thing) }
...
...
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new file
.
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment