gcc/testsuite/gm2/iso/fail/badarray.mod - gcc.git - Git at Google

 MODULE badarray ;

 VAR
    c: CARDINAL ;
 BEGIN
    c[1] := 5
 END badarray.
	MODULE badarray ;

	VAR
	c: CARDINAL ;
	BEGIN
	c[1] := 5
	END badarray.