test_name 	 real64-constant-zero
test_description A REAL_64 constant with value 0 should work

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

compile_melted
compile_result   ok


execute_work     NONE exec_output_m
execute_result   ok
compare		 exec_output_m output

compile_frozen
compile_result   ok

c_compile_work
c_compile_result ok

execute_work     NONE exec_output_w
execute_result   ok
compare		 exec_output_w output

test_end