test_name	qat-is-expanded-crash-2			
test_description Moving a declaration in a system that uses qualified anchored types crashes the compiler in {CL_TYPE_A}.is_expanded in degree 4.

define		ATTRIBUTE_TYPE "TEST4"
copy_sub 	Ace $TEST Ace
copy_raw 	test.e $CLUSTER test.e
copy_raw 	test1.e $CLUSTER test1.e
copy_raw 	test2.e $CLUSTER test2.e
copy_raw 	test3.e $CLUSTER test3.e
compile_melted
compile_result 	ok

copy_raw 	test_rev2.e $CLUSTER test.e
copy_raw 	parent.e $CLUSTER parent.e
compile_melted
compile_result 	validity_error TEST VDRS(1)

copy_raw 	parent_rev2.e $CLUSTER parent.e
resume_compile
compile_result 	ok

test_end