Mercurial > repos > icfp2014
view code/simple.lm @ 49:ec87d53603dd
gcc simulator now works correctly at least for the subset used by ghc.lm and has some primitive debugging facilities
author | Michael Pavone <pavone@retrodev.com> |
---|---|
date | Sun, 27 Jul 2014 13:36:56 -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] } }