[moka]

Global list:TList = New TList
Type TType
	Field varr:%
	Function create_v:TType() 
		Local cre:TType = New TType
		list.AddLast(cre)
		Return cre
	End Function
End Type

Local obj:TType=TType.create_v()

obj.varr:+1