Mercurial > repos > icfp2014

diff code/gqc.tp @ 67:76570158a6e9

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Small optimization, avoid redundant MOV instructions
author Michael Pavone <pavone@retrodev.com>
date Sun, 27 Jul 2014 22:34:37 -0700
parents 2a5d7308e1df
children 8a0f1447c034
line wrap: on
line diff
--- a/code/gqc.tp	Sun Jul 27 22:18:12 2014 -0700
+++ b/code/gqc.tp	Sun Jul 27 22:34:37 2014 -0700
@@ -194,10 +194,12 @@
 			compileExpr: (expr assign) syms: syms
 		}
 		dest <- info def
-		prog add: (inst: "MOV" #[
-			dest
-			v
-		])
+		if: dest != v {
+			prog add: (inst: "MOV" #[
+				dest
+				v
+			])
+		}
 		dest
 	}