Mercurial > repos > icfp2012

diff src/lifter.tp @ 28:7a274d6026c8

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Use built-in true and false.
author Mike Pavone <pavone@retrodev.com>
date Sat, 14 Jul 2012 19:33:35 -0700
parents 50a456168c25
children f7a1daaec925
line wrap: on
line diff
--- a/src/lifter.tp	Sat Jul 14 19:29:50 2012 -0700
+++ b/src/lifter.tp	Sat Jul 14 19:33:35 2012 -0700
@@ -1,16 +1,4 @@
 #{
-	true <- #{
-	  if:else <- :self trueblock :elseblock {
-		trueblock:
-	  }
-	}
-
-	false <- #{
-	  if:else <- :self trueblock :elseblock {
-		elseblock:
-	  }
-	}
-	
 	main <- {
 		text <- sim readFd: 0
 		playfield <- (sim state) fromStr: text