Permalink
Browse files

Eliminate "r = r" in mkAssign

  • Loading branch information...
1 parent 1469a12 commit df7a20ce1e489540c7a07560b0850206244c51ae @simonmar simonmar committed Aug 7, 2012
Showing with 1 addition and 0 deletions.
  1. +1 −0 compiler/cmm/MkGraph.hs
View
1 compiler/cmm/MkGraph.hs
@@ -167,6 +167,7 @@ mkComment _ = nilOL
---------- Assignment and store
mkAssign :: CmmReg -> CmmExpr -> CmmAGraph
+mkAssign l (CmmReg r) | l == r = mkNop
mkAssign l r = mkMiddle $ CmmAssign l r
mkStore :: CmmExpr -> CmmExpr -> CmmAGraph

0 comments on commit df7a20c

Please sign in to comment.