gcc/testsuite/algol68/execute/assignation-int-1.a68 - gcc.git - Git at Google

 # { dg-options "-fstropping=upper" }  #
 BEGIN INT i;
       i := 20;
       ASSERT (i = 20)
 END
	# { dg-options "-fstropping=upper" } #
	BEGIN INT i;
	i := 20;
	ASSERT (i = 20)
	END