demo4.g

来自「这是一个Linux下的集成开发环境」· G 代码 · 共 15 行

subseq foo()
	{
	whenever self->doit do
		self->done( self.doit + 3 )
	}

a := foo()
b := foo()

whenever b->done, a->done do
	print b.done, a.done

b->doit( 5 )
a->doit( 9 )