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

test_name non-conforming-inheritance-is-selectable
test_description Non-conforming inheritance path is selectable.

copy_sub Ace $TEST Ace

copy_raw application.e $CLUSTER application.e
copy_raw p1.e $CLUSTER p1.e
copy_raw p2.e $CLUSTER p2.e

compile_melted
compile_result ok

execute_work NONE exec_output
execute_result ok

compare exec_output output

test_end