Bugfix: allow newline in regex parsing from string.

* parser.l (grammar): The newline character is incorrectly
handled by the same rule under the SREGEX and REGEX states.
In the SREGEX state, just return it as a REGCHAR, not
forgetting to increment the line number.

1 files changed, 7 insertions, 1 deletions

diff --git a/parser.l b/parser.l
index a6df6ae8..5e608c8b 100644
--- a/parser.l
+++ b/parser.l
@@ -821,12 +821,18 @@ UONLY   {U2}{U}|{U3}{U}{U}|{U4}{U}{U}{U}
   yyextra->lineno++;
 }
 
-<REGEX,SREGEX>{NL} {
+<REGEX>{NL} {
   yyextra->lineno++;
   yyerrprepf(yyg, lit("newline in regex"), nao);
   return ERRTOK;
 }
 
+<SREGEX>{NL} {
+  yyextra->lineno++;
+  yylval->chr = yytext[0];
+  return REGCHAR;
+}
+
 <REGEX,SREGEX>{REGOP} {
   yylval->chr = yytext[0];
   return yytext[0];