class TEST2
feature
	value: STRING
		once ("OBJECT")
			Result := "Weasel"
		end
		

end