Commit 08896210 authored by simonpj@microsoft.com's avatar simonpj@microsoft.com

Comments only

parent a174d117
......@@ -378,6 +378,8 @@ simplNonRecX env bndr new_rhs thing_inside
-- If a,b occur once we can avoid constructing the let binding for them.
| preInlineUnconditionally env NotTopLevel bndr new_rhs
= thing_inside (extendIdSubst env bndr (DoneEx new_rhs))
-- NB: completeLazyBind uses postInlineUnconditionally; no need to do that here
-}
| otherwise
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment