diff options
author | Thomas Schilling <nominolo@googlemail.com> | 2008-07-20 17:24:01 +0000 |
---|---|---|
committer | Thomas Schilling <nominolo@googlemail.com> | 2008-07-20 17:24:01 +0000 |
commit | 1d2f5511ad8f33a4702ee7670193a525e9a9d757 (patch) | |
tree | 389fa190d72dacde37a3e94069f156654635fbd8 /compiler/simplCore/SimplEnv.lhs | |
parent | 432b38b66700d243369df5b76e5c5c01b5e197ff (diff) | |
download | haskell-1d2f5511ad8f33a4702ee7670193a525e9a9d757.tar.gz |
Fix Haddock errors.
Diffstat (limited to 'compiler/simplCore/SimplEnv.lhs')
-rw-r--r-- | compiler/simplCore/SimplEnv.lhs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/simplCore/SimplEnv.lhs b/compiler/simplCore/SimplEnv.lhs index d592e7c470..169902a11b 100644 --- a/compiler/simplCore/SimplEnv.lhs +++ b/compiler/simplCore/SimplEnv.lhs @@ -268,7 +268,7 @@ addNewInScopeIds env@(SimplEnv { seInScope = in_scope, seIdSubst = id_subst }) v -- Why delete? Consider -- let x = a*b in (x, \x -> x+3) -- We add [x |-> a*b] to the substitution, but we must - -- *delete* it from the substitution when going inside + -- _delete_ it from the substitution when going inside -- the (\x -> ...)! modifyInScope :: SimplEnv -> CoreBndr -> CoreBndr -> SimplEnv |