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
6b46a984
Commit
6b46a984
authored
Jan 13, 2005
by
simonmar
Browse files
[project @ 2005-01-13 16:32:34 by simonmar]
Small optimisation: allow lookForInline to skip over CmmNop too
parent
b3f24cf8
Changes
1
Hide whitespace changes
Inline
Side-by-side
ghc/compiler/nativeGen/AsmCodeGen.lhs
View file @
6b46a984
...
...
@@ -803,6 +803,9 @@ lookForInline u expr (stmt@(CmmAssign (CmmLocal (LocalReg u' _)) rhs) : rest)
Nothing -> Nothing
Just stmts -> Just (stmt:stmts)
lookForInline u expr (CmmNop : rest)
= lookForInline u expr rest
lookForInline u expr (stmt:stmts)
= case lookupUFM (getStmtUses stmt) u of
Just 1 -> Just (inlineStmt u expr stmt : stmts)
...
...
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