test_name 	bad-melted-infix
test_description A particular system when calling a melted infix routine would cause a crash.

copy_sub 	Ace $TEST Ace

copy_raw 	test.e $CLUSTER test.e
copy_raw 	es_string.e $CLUSTER es_string.e

compile_melted
compile_result 	ok

execute_work 	NONE 	exec_output1
execute_result 	ok
compare		exec_output1 output

compile_frozen
compile_result 	ok

c_compile_work
c_compile_result ok

execute_work 	NONE 	exec_output2
execute_result 	ok
compare		exec_output2 output

test_end