Skip to content
GitLab
Projects
Groups
Snippets
/
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Sign in / Register
Toggle navigation
Menu
Open sidebar
Glasgow Haskell Compiler
GHC
Commits
4ad8b119
Commit
4ad8b119
authored
Oct 11, 2004
by
simonpj
Browse files
[project @ 2004-10-11 12:44:23 by simonpj]
Fix typo; fixes simpl007
parent
0688d49e
Changes
1
Hide whitespace changes
Inline
Side-by-side
ghc/compiler/simplCore/Simplify.lhs
View file @
4ad8b119
...
...
@@ -1502,7 +1502,7 @@ simplAlt env handled_cons case_bndr' (DataAlt con, vs, rhs) cont'
simplBinders env tvs `thenSmpl` \ (env1, tvs') ->
let
pat_res_ty = dataConResTy con (mkTyVarTys tvs')
tv_subst = getTvSubst env
tv_subst = getTvSubst env
1
in
case coreRefineTys tvs' tv_subst pat_res_ty (idType case_bndr') of {
Nothing -- Dead code; for now, I'm just going to put in an
...
...
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