Mercurial > repos > icfp2014

diff code/test.lm @ 7:afd55b32549b

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Implement support for local variables and top level functions
author Michael Pavone <pavone@retrodev.com>
date Fri, 25 Jul 2014 13:47:21 -0700
parents a9a2ad99adfb
children 494ef2e3a756
line wrap: on
line diff
--- a/code/test.lm	Fri Jul 25 11:46:34 2014 -0700
+++ b/code/test.lm	Fri Jul 25 13:47:21 2014 -0700
@@ -1,13 +1,15 @@
 #{
-	init <- {
-		#[1 2 3 4]
+	step <- :myState :world {
+		foo <- 1234
+		if: (isInteger?: 1 | [(2 + 32 * 8) 3 4]) {
+			myState <- 42
+		} else: {
+			myState <- 24
+		}
+		#[myState 1]
 	}
 	
 	main <- {
-		if: (isInteger?: 1 | [(2 + 32 * 8) 3 4]) {
-			42
-		} else: {
-			24
-		}
+		#[0 step]
 	}
 }