syn: store lineno always, for run-time warnings

perl11 · Dec 8, 2013 · ca32c9a · ca32c9a
1 parent 1637066
commit ca32c9a
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/syn/syntax.y b/syn/syntax.y
@@ -332,7 +332,7 @@ sep = (end-of-line | comma) (space | comment | end-of-line | comma)*
 comment	= '#' (!end-of-line utf8)*
 space = ' ' | '\f' | '\v' | '\t'
 end-of-line = ( '\r\n' | '\n' | '\r' )
-  { ++G->lineno; if (P->flags & EXEC_DEBUG) { P->line = yylastline(G, thunk->begin); }}
+  { ++G->lineno; P->line = yylastline(G, thunk->begin); }
 end-of-file = !.
 
 sig = args+ end-of-file