view testpauseresume.rhope @ 141:f2cb85c53ced

Fix Pause/Resume and rewrite Call Async in Rhope rather than C
author Mike Pavone <pavone@retrodev.com>
date Sat, 20 Nov 2010 17:48:22 -0500
parents c14698c512f1
children
line wrap: on
line source


Foo[:out]
{
	a <- Yield[]
	Val[a]
	{ out <- Print["Foo!"] }
}

Main[:out]
{
	Call Async[Foo[?]]
	{ got char <- Get Char[] }
	Val[got char]
	{ out <- Yield[] }
}