Future/bison
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/bison.git synced 2026-03-09 12:23:04 +00:00
Code Issues Packages Projects Releases Wiki Activity

Revamp regular expressions so that " and '

Browse Source 
do not confuse xgettext.
This commit is contained in:
Paul Eggert
2002-11-13 06:40:35 +00:00
parent 322c501d89
commit 412f8a5975
1 changed files with 14 additions and 8 deletions
Download Patch File Download Diff File Expand all files Collapse all files

22
src/scan-gram.l
View File

@@ -259,7 +259,10 @@ splice (\\[ \f\t\v]*\n)*
YY_STEP;
}
^"#line "{int}" \""[^\"]*"\"\n" handle_syncline (yytext + strlen ("#line "), yylloc); YY_STEP;
^"#line "{int}" \"".*"\"\n" {
handle_syncline (yytext + sizeof "#line " - 1, yylloc);
YY_STEP;
}
"=" return EQUAL;
":" rule_length = 0; return COLON;
@@ -450,7 +453,10 @@ splice (\\[ \f\t\v]*\n)*
\\r obstack_1grow (&string_obstack, '\r');
\\t obstack_1grow (&string_obstack, '\t');
\\v obstack_1grow (&string_obstack, '\v');
\\[\"\'?\\] obstack_1grow (&string_obstack, yytext[1]);
/* \\[\"\'?\\] would be shorter, but it confuses xgettext. */
\\("\""|"'"|"?"|"\\") obstack_1grow (&string_obstack, yytext[1]);
\\(u|U[0-9a-fA-F]{4})[0-9a-fA-F]{4} {
int c = convert_ucn_to_byte (yytext);
if (c < 0)
@@ -477,9 +483,9 @@ splice (\\[ \f\t\v]*\n)*
<SC_CHARACTER>
{
"'" YY_OBS_GROW; BEGIN c_context;
\\{splice}[\'\\] YY_OBS_GROW;
<<EOF>> unexpected_end_of_file (yylloc, "'");
"'" YY_OBS_GROW; BEGIN c_context;
\\{splice}[^$@\[\]] YY_OBS_GROW;
<<EOF>> unexpected_end_of_file (yylloc, "'");
}
@@ -490,9 +496,9 @@ splice (\\[ \f\t\v]*\n)*
<SC_STRING>
{
"\"" YY_OBS_GROW; BEGIN c_context;
\\{splice}[\"\\] YY_OBS_GROW;
<<EOF>> unexpected_end_of_file (yylloc, "\"");
"\"" YY_OBS_GROW; BEGIN c_context;
\\{splice}[^$@\[\]] YY_OBS_GROW;
<<EOF>> unexpected_end_of_file (yylloc, "\"");
}