--| 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 	 backup-directory-disaster
test_description After initial compilation, a cluster in the Ace file is changed from the form "all root_cluster" to a list of the two specific clusters in the root cluster directory.  Recompilation works fine.  However, when the Ace is then changed to indicate a new root class and and the class name inside one file is also changed, a second recompile ends with a segmentation fault in `backup_directory'.  This only happens if "automatic_backup" is true.

define_directory CLUSTER2 $CLUSTER sub
define ROOT_CLASS "TEST1"
define RECURSIVE "true"
define SUBCLUSTER ""
copy_sub 	Ace $TEST Ace
copy_sub 	test.e $CLUSTER2 test.e
copy_sub 	test1_rev1.e $CLUSTER test.e
compile_melted
compile_result ok

define RECURSIVE "false"
define SUBCLUSTER "<cluster name="subcluster" location="$CLUSTER2"/>"
copy_sub 	Ace $TEST Ace
compile_melted
compile_result 	ok

define ROOT_CLASS "TEST"
copy_sub 	Ace $TEST Ace
copy_sub 	test1_rev1.e $CLUSTER test.e
compile_melted
compile_result 	ok

test_end