class TEST1 [G->PROXY]
create
	make
feature

	make
		do
		end

	new_object (a_tuple: like {G}.creation_objects; a_agent: PROCEDURE [ANY, TUPLE [like {G}.proxy]])
		do
		end

end