--| 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 	 inherit-array-of-expanded
test_description A class has two attributes of type `expanded TEST1 [STRING]'.  TEST1 is a generic class with parent `ARRAY [expanded TEST1 [G]]'.  The system compiles fine, but dies with an exception trace when executed. Turning off garbage collection allows the program to run correctly.

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
compile_frozen
compile_result 	 ok

c_compile_work
c_compile_result ok

execute_work	 NONE exec_output1
execute_result	 ok
compare		 exec_output1 output

setenv EIF_FULL_COLLECTION_PERIOD 0
setenv EIF_FULL_COALESCE_PERIOD 0
setenv EIF_MEMORY_CHUNK 0
setenv EIF_MEMORY_SCAVENGE 0

execute_work	 NONE exec_output2
execute_result	 ok
compare		 exec_output2 output

test_end