Mercurial > repos > rhope
view testglobal.rhope @ 177:e57c151f351e
Get bytecode engine working well enough for naive fib
author | Mike Pavone <pavone@retrodev.com> |
---|---|
date | Sun, 12 Jun 2011 03:49:51 -0700 |
parents | a68e6828d896 |
children |
line wrap: on
line source
Globals Increment { Num <- 0 } Do Incr[:out] uses Increment { out <- Increment::Num Increment::Num <- [Increment::Num]+[1] } Main[:out] { Do Incr[] { Print[~] { Do Incr[] { Print[~] { Do Incr[] { out <- Print[~] }}}}} }