class Test
	
	cue init
		base.init
		
	cue init(obj as Object)
		base.init

	def one
		.two(this)
	
	def two(obj as Object)
		assert obj is this

	def three
		Test(this)  # bug on 2006-02-25, uncaught exception

	def main
		is shared
		t as Test = Test()
		t.one
		t.three