shithub: mc

Info  •  Files  •  Log  •  Branches

'in' is now a warning.

--- a/parse/gram.y

+++ b/parse/gram.y

@@ -947,8 +947,10 @@

 forstmt : Tfor optexprln loopcond optexprln block

 	{$$ = mkloopstmt($1->loc, $2, $3, $4, $5);}

-	| Tfor expr Tin exprln block

-	{$$ = mkiterstmt($1->loc, $2, $4, $5);}

+	| Tfor expr Tin exprln block {

+		$$ = mkiterstmt($1->loc, $2, $4, $5);

+		fprintf(stderr, "%s:%d: deprecated for syntax. use ':' to replace 'in'\n", fname($1->loc), lnum($1->loc));

+	}

 	| Tfor expr Tcolon exprln block

 	{$$ = mkiterstmt($1->loc, $2, $4, $5);}

 	| Tfor decl Tendln loopcond optexprln block {