Commit da651729 authored by Simon Peyton Jones's avatar Simon Peyton Jones
Browse files

Comment only

parent df2e8675
...@@ -390,7 +390,7 @@ tryToInline dflags live node assigs = go usages node [] assigs ...@@ -390,7 +390,7 @@ tryToInline dflags live node assigs = go usages node [] assigs
occurs_once = not (l `elemRegSet` live) occurs_once = not (l `elemRegSet` live)
&& lookupUFM usages l == Just 1 && lookupUFM usages l == Just 1
inl_node = mapExpDeep inline node inl_node = mapExpDeep inline node -- mapExpDeep is where the inlining actually takes place!
where inline (CmmReg (CmmLocal l')) | l == l' = rhs where inline (CmmReg (CmmLocal l')) | l == l' = rhs
inline (CmmRegOff (CmmLocal l') off) | l == l' inline (CmmRegOff (CmmLocal l') off) | l == l'
= cmmOffset dflags rhs off = cmmOffset dflags rhs off
......
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