gcc/testsuite/gm2/iso/run/pass/proc_test.mod - gcc.git - Git at Google

 MODULE proc_test;

     PROCEDURE Calc () : CARDINAL;
     BEGIN
         RETURN 2;
     END Calc;

 BEGIN

 END proc_test.
	MODULE proc_test;

	PROCEDURE Calc () : CARDINAL;
	BEGIN
	RETURN 2;
	END Calc;

	BEGIN

	END proc_test.