Commit 001d6ffd authored by Ian Lynagh's avatar Ian Lynagh
Browse files

Fix syntax error

parent e943c43f
......@@ -344,7 +344,7 @@ shortcutBranches dflags tops
mapping = foldr plusUFM emptyUFM mappings
build_mapping top@(CmmData _ _) = (top, emptyUFM)
build_mapping (CmmProc info lbl params []) $
build_mapping (CmmProc info lbl params [])
= (CmmProc info lbl params [], emptyUFM)
build_mapping (CmmProc info lbl params (head:blocks))
= (CmmProc info lbl params (head:others), mapping)
......
Supports Markdown
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