Ridiculously contrived coroutine example for Channel9

coroutine.c9s

var ho
var hi = () {
	var cont = ho
	var count = 0
	while (count != 1000) {
		"hi " + count.to_string_primitive -> $stdout
		// send count + 1 to cont, save its return address in cont
		count = (count + 1 -> cont : cont)
	}
}

var ho = (&count) -> cont {
	while (true) {
		"ho " + count.to_string_primitive -> $stdout
		// send count + 1 to cont, save its return address in cont
		count = (count + 1 -> cont : cont)
	}
}

hi()