test_name 	 object-test-in-invariant
test_description Object tests use in invariants should generate correct code.

copy_raw	test.e $CLUSTER test.e
copy_sub	Ace $TEST Ace

compile_melted
compile_result	ok
execute_work	NONE exec_output
execute_result	ok
compare		exec_output output

test_end