gcc/testsuite/gm2/errors/fail/unarygeneric.mod - gcc.git - Git at Google

 MODULE unarygeneric ;

 FROM SYSTEM IMPORT WORD ;

 VAR
    a, b: WORD ;
 BEGIN
    b := 1 ;
    a := -b
 END unarygeneric.
	MODULE unarygeneric ;

	FROM SYSTEM IMPORT WORD ;

	VAR
	a, b: WORD ;
	BEGIN
	b := 1 ;
	a := -b
	END unarygeneric.