Mercurial > repos > icfp2014
view code/simple.lm @ 38:6b9b21456cf4
Make empty? also map to ATOM so that LM-Quiche is closer to being a proper subset of regular Quiche
author | Michael Pavone <pavone@retrodev.com> |
---|---|
date | Sat, 26 Jul 2014 13:44:45 -0700 |
parents | 84f595cff062 |
children |
line wrap: on
line source
#{ counterLoad <- 4 step <- :myState world { move <- myState value counter <- (myState tail) - 1 if: counter = 0 { move <- move + 1 counter <- counterLoad if: move = 4 { move <- 0 } else: {} } else: {} #[#[move counter] move] } main <- :initWorld mystery { print: mystery #[#[0 counterLoad] step] } }