Mercurial > repos > rhope
view testglobal.rhope @ 172:926b56a43f47
Fix some bugs related to inlining
author | Mike Pavone <pavone@retrodev.com> |
---|---|
date | Sun, 15 May 2011 23:31:58 -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[~] }}}}} }