Mercurial > repos > rhope

view testglobal.rhope @ 148:f582fd6c75ee

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Fixed framework port, works for said.rhope example
author Mike Pavone <pavone@retrodev.com>
date Mon, 22 Nov 2010 01:37:05 -0500
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[~] }}}}}
}