test_name 	 multithreaded-bogus-catcall
test_description	When checking catcalls in a MT system, we might get some spurious catcalls because the arguments checked for the catcall are not properly protected.

copy_sub 	 Ace $TEST Ace
copy_raw 	 test.e  $CLUSTER test.e

compile_frozen
compile_result 	 ok

c_compile_work
c_compile_result ok

execute_work	 NONE exec_output1 100000
execute_result	 ok
compare		 exec_output1 output

test_end