--| Copyright (c) 1993-2006 University of Southern California and contributors.
--| All rights reserved.
--| Your use of this work is governed under the terms of the GNU General
--| Public License version 2.

-- This is a test control file

test_name 	 chg-expanded-source-freeze
test_description A class has an assignment where the target entity is of an expanded type and the source entity is of an expanded type which inherits (indirectly) from the target type base class, but adds some attributes.  After initial compilation where the system is melted, the type of the source entity is changed to another expanded type which is a parent of the original source entity type and the system is frozen. System execution then ends with a segmentation fault.

copy_sub 	 Ace $TEST Ace
define		 ATTRIBUTE_TYPE "TEST3"
copy_sub 	 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

define		 ATTRIBUTE_TYPE "TEST2"
copy_sub 	 test.e  $CLUSTER test.e
compile_melted
compile_result 	 ok

define		 ATTRIBUTE_TYPE "TEST1"
copy_sub 	 test.e  $CLUSTER test.e
compile_melted
compile_result   ok

execute_work	 NONE exec_output1
execute_result	 ok
compare		 exec_output1 output

define		 ATTRIBUTE_TYPE "TEST2"
copy_sub 	 test.e  $CLUSTER test.e
compile_frozen
compile_result 	 ok

c_compile_work
c_compile_result ok

execute_work	 NONE exec_output2
execute_result	 ok
compare		 exec_output2 output

test_end