--| 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 bogus-vd27 test_description After initial compilation, a rename subclause of an inheritance clause is deleted (introducing a VRFA violation) then added back copy_sub Ace $TEST Ace copy_raw test.e $CLUSTER test.e define RENAME "rename m as n end" copy_sub test1.e $CLUSTER test1.e copy_raw test2.e $CLUSTER test2.e compile_melted compile_result ok define RENAME "" copy_sub test1.e $CLUSTER test1.e compile_melted compile_result validity_error TEST VRFA define RENAME "rename m as n end" copy_sub test1.e $CLUSTER test1.e resume_compile compile_result ok test_end