test_name 	 current-in-self-init-attribute
test_description Current used in a self-initializing attribute should not cause a compiler crash.

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

compile_melted
compile_result ok

test_end