test_name inline-agent-from-scratch-bug
test_description When an inline agent is compiled in a class, but the compilation has an error in a different class, it messes up the inline agent for that class and it crashes at degree -1.

define BAD_CODE "print (i)"
define NEW_CODE ""
copy_sub Ace $TEST Ace
copy_sub test.e $CLUSTER test.e
copy_sub a.e $CLUSTER a.e

compile_melted
compile_result validity_error A VEEN

define BAD_CODE "print (b)"
define NEW_CODE "f is external "C" end"
copy_sub test.e $CLUSTER test.e
copy_sub a.e $CLUSTER a.e

resume_compile
compile_result validity_error A VEEN

define BAD_CODE ""
copy_sub a.e $CLUSTER a.e

resume_compile
compile_result ok

test_end