mirror of
https://git.savannah.gnu.org/git/bison.git
synced 2026-03-09 20:33:03 +00:00
Implement the FIXME that ends an user action with a semicolon
if it seems necessary.
* src/scan-code.l (flex rules section): Flag cpp directive from
any `#' to the first unescaped end-of-line. Semicolon is not
needed after `;', `{', '}', or cpp directives and is needed after
any other token (whitespaces and comments have no effect).
* tests/actions.at (Fix user actions without a trailing semicolon):
New test.
* tests/input.at (AT_CHECK_UNUSED_VALUES): Add semicolons to
to make user actions complete statements.
Adjust column numbers in error messages.
* tests/regression.at (Fix user actions without a trailing semicolon):
Remove. Covered by new test.
This commit is contained in:
117
tests/actions.at
117
tests/actions.at
@@ -1300,3 +1300,120 @@ AT_CLEANUP])
|
||||
AT_CHECK_ACTION_LOCATIONS([[%initial-action]])
|
||||
AT_CHECK_ACTION_LOCATIONS([[%destructor]])
|
||||
AT_CHECK_ACTION_LOCATIONS([[%printer]])
|
||||
|
||||
|
||||
## ----------------------------------------------- ##
|
||||
## Fix user actions without a trailing semicolon. ##
|
||||
## ----------------------------------------------- ##
|
||||
|
||||
AT_SETUP([[Fix user actions without a trailing semicolon]])
|
||||
|
||||
# This feature is undocumented, but we accidentally broke it in 2.3a,
|
||||
# and there was a complaint at:
|
||||
# <http://lists.gnu.org/archive/html/bug-bison/2008-11/msg00001.html>.
|
||||
|
||||
AT_DATA([input.y],
|
||||
[[%%
|
||||
start: test2 test1 test0 testc;
|
||||
|
||||
test2
|
||||
: 'a' { semi; /* TEST:N:2 */ }
|
||||
| 'b' { if (0) {no_semi} /* TEST:N:2 */ }
|
||||
| 'c' { if (0) {semi;} /* TEST:N:2 */ }
|
||||
| 'd' { semi; no_semi /* TEST:Y:2 */ }
|
||||
| 'e' { semi(); no_semi() /* TEST:Y:2 */ }
|
||||
| 'f' { semi[]; no_semi[] /* TEST:Y:2 */ }
|
||||
| 'g' { semi++; no_semi++ /* TEST:Y:2 */ }
|
||||
| 'h' { {no_semi} no_semi /* TEST:Y:2 */ }
|
||||
| 'i' { {semi;} no_semi /* TEST:Y:2 */ }
|
||||
;
|
||||
test1
|
||||
: 'a' { semi; // TEST:N:1 ;
|
||||
} | 'b' { if (0) {no_semi} // TEST:N:1 ;
|
||||
} | 'c' { if (0) {semi;} // TEST:N:1 ;
|
||||
} | 'd' { semi; no_semi // TEST:Y:1 ;
|
||||
} | 'e' { semi(); no_semi() // TEST:Y:1 ;
|
||||
} | 'f' { semi[]; no_semi[] // TEST:Y:1 ;
|
||||
} | 'g' { semi++; no_semi++ // TEST:Y:1 ;
|
||||
} | 'h' { {no_semi} no_semi // TEST:Y:1 ;
|
||||
} | 'i' { {semi;} no_semi // TEST:Y:1 ;
|
||||
} ;
|
||||
test0
|
||||
: 'a' { semi; // TEST:N:1 {}
|
||||
} | 'b' { if (0) {no_semi} // TEST:N:1 {}
|
||||
} | 'c' { if (0) {semi;} // TEST:N:1 {}
|
||||
} | 'd' { semi; no_semi // TEST:Y:1 {}
|
||||
} | 'e' { semi(); no_semi() // TEST:Y:1 {}
|
||||
} | 'f' { semi[]; no_semi[] // TEST:Y:1 {}
|
||||
} | 'g' { semi++; no_semi++ // TEST:Y:1 {}
|
||||
} | 'h' { {no_semi} no_semi // TEST:Y:1 {}
|
||||
} | 'i' { {semi;} no_semi // TEST:Y:1 {}
|
||||
} ;
|
||||
|
||||
testc
|
||||
: 'a' {
|
||||
#define TEST_MACRO_N \
|
||||
[]"broken\" $ @ $$ @$ [];\
|
||||
string;"}
|
||||
| 'b' {
|
||||
no_semi
|
||||
#define TEST_MACRO_N \
|
||||
[]"broken\" $ @ $$ @$ [];\
|
||||
string;"}
|
||||
]])
|
||||
|
||||
AT_BISON_CHECK([[-o input.c input.y]], [0], [],
|
||||
[[input.y:8.48: warning: a `;' might be needed at the end of action code
|
||||
input.y:8.48: warning: future versions of Bison will not add the `;'
|
||||
input.y:9.48: warning: a `;' might be needed at the end of action code
|
||||
input.y:9.48: warning: future versions of Bison will not add the `;'
|
||||
input.y:10.48: warning: a `;' might be needed at the end of action code
|
||||
input.y:10.48: warning: future versions of Bison will not add the `;'
|
||||
input.y:11.48: warning: a `;' might be needed at the end of action code
|
||||
input.y:11.48: warning: future versions of Bison will not add the `;'
|
||||
input.y:12.48: warning: a `;' might be needed at the end of action code
|
||||
input.y:12.48: warning: future versions of Bison will not add the `;'
|
||||
input.y:13.48: warning: a `;' might be needed at the end of action code
|
||||
input.y:13.48: warning: future versions of Bison will not add the `;'
|
||||
input.y:20.1: warning: a `;' might be needed at the end of action code
|
||||
input.y:20.1: warning: future versions of Bison will not add the `;'
|
||||
input.y:21.1: warning: a `;' might be needed at the end of action code
|
||||
input.y:21.1: warning: future versions of Bison will not add the `;'
|
||||
input.y:22.1: warning: a `;' might be needed at the end of action code
|
||||
input.y:22.1: warning: future versions of Bison will not add the `;'
|
||||
input.y:23.1: warning: a `;' might be needed at the end of action code
|
||||
input.y:23.1: warning: future versions of Bison will not add the `;'
|
||||
input.y:24.1: warning: a `;' might be needed at the end of action code
|
||||
input.y:24.1: warning: future versions of Bison will not add the `;'
|
||||
input.y:25.1: warning: a `;' might be needed at the end of action code
|
||||
input.y:25.1: warning: future versions of Bison will not add the `;'
|
||||
input.y:31.1: warning: a `;' might be needed at the end of action code
|
||||
input.y:31.1: warning: future versions of Bison will not add the `;'
|
||||
input.y:32.1: warning: a `;' might be needed at the end of action code
|
||||
input.y:32.1: warning: future versions of Bison will not add the `;'
|
||||
input.y:33.1: warning: a `;' might be needed at the end of action code
|
||||
input.y:33.1: warning: future versions of Bison will not add the `;'
|
||||
input.y:34.1: warning: a `;' might be needed at the end of action code
|
||||
input.y:34.1: warning: future versions of Bison will not add the `;'
|
||||
input.y:35.1: warning: a `;' might be needed at the end of action code
|
||||
input.y:35.1: warning: future versions of Bison will not add the `;'
|
||||
input.y:36.1: warning: a `;' might be needed at the end of action code
|
||||
input.y:36.1: warning: future versions of Bison will not add the `;'
|
||||
]])
|
||||
AT_CHECK([[grep -c '/\* TEST:N:2 \*/ }$' input.c]], [0], [[3
|
||||
]])
|
||||
AT_CHECK([[grep -c '/\* TEST:Y:2 \*/ ;}$' input.c]], [0], [[6
|
||||
]])
|
||||
AT_CHECK([[sed -n '/TEST:N:1/{N
|
||||
s/\n/<NL>/gp}' input.c | grep -c '// TEST:N:1 [;{}]*<NL>}$']], [0], [[6
|
||||
]])
|
||||
AT_CHECK([[sed -n '/TEST:Y:1/{N
|
||||
s/\n/<NL>/gp}' input.c | grep -c '// TEST:Y:1 [;{}]*<NL>;}$']], [0], [[12
|
||||
]])
|
||||
AT_CHECK([[sed -n '/^#define TEST_MACRO_N/{N
|
||||
N
|
||||
s/\n/<NL>/gp}' input.c | grep -F -xc '#define TEST_MACRO_N \<NL>[]"broken\" $ @ $$ @$ [];\<NL>string;"}']],
|
||||
[0], [[2
|
||||
]])
|
||||
|
||||
AT_CLEANUP
|
||||
|
||||
@@ -92,16 +92,16 @@ m4_ifval($1, [
|
||||
], [_AT_UNUSED_VALUES_DECLARATIONS
|
||||
])[[%%
|
||||
start:
|
||||
'a' a { $]2[ } | 'b' b { $]2[ } | 'c' c { $]2[ } | 'd' d { $]2[ } | 'e' e { $]2[ }
|
||||
| 'f' f { $]2[ } | 'g' g { $]2[ } | 'h' h { $]2[ } | 'i' i { $]2[ } | 'j' j { $]2[ }
|
||||
| 'k' k { $]2[ } | 'l' l { $]2[ }
|
||||
'a' a { $]2[; } | 'b' b { $]2[; } | 'c' c { $]2[; } | 'd' d { $]2[; }
|
||||
| 'e' e { $]2[; } | 'f' f { $]2[; } | 'g' g { $]2[; } | 'h' h { $]2[; }
|
||||
| 'i' i { $]2[; } | 'j' j { $]2[; } | 'k' k { $]2[; } | 'l' l { $]2[; }
|
||||
;
|
||||
|
||||
a: INT | INT { } INT { } INT { };
|
||||
b: INT | /* empty */;
|
||||
c: INT | INT { $]1[ } INT { $<integer>2 } INT { $<integer>4 };
|
||||
d: INT | INT { } INT { $]1[ } INT { $<integer>2 };
|
||||
e: INT | INT { } INT { } INT { $]1[ };
|
||||
c: INT | INT { $]1[; } INT { $<integer>2; } INT { $<integer>4; };
|
||||
d: INT | INT { } INT { $]1[; } INT { $<integer>2; };
|
||||
e: INT | INT { } INT { } INT { $]1[; };
|
||||
f: INT | INT { } INT { } INT { $]$[ = $]1[ + $]3[ + $]5[; };
|
||||
g: INT | INT { $<integer>$; } INT { $<integer>$; } INT { };
|
||||
h: INT | INT { $<integer>$; } INT { $<integer>$ = $<integer>2; } INT { };
|
||||
@@ -118,18 +118,18 @@ input.y:11.10-32: warning: unused value: $]1[
|
||||
input.y:11.10-32: warning: unused value: $]3[
|
||||
input.y:11.10-32: warning: unused value: $]5[
|
||||
input.y:12.9: warning: empty rule for typed nonterminal, and no action
|
||||
]]m4_ifval($2, [[[input.y:13.14-19: warning: unset value: $$
|
||||
input.y:13.25-39: warning: unset value: $$
|
||||
]]])[[input.y:13.10-59: warning: unset value: $]$[
|
||||
input.y:13.10-59: warning: unused value: $]3[
|
||||
input.y:13.10-59: warning: unused value: $]5[
|
||||
]]m4_ifval($2, [[[input.y:13.14-20: warning: unset value: $$
|
||||
input.y:13.26-41: warning: unset value: $$
|
||||
]]])[[input.y:13.10-62: warning: unset value: $]$[
|
||||
input.y:13.10-62: warning: unused value: $]3[
|
||||
input.y:13.10-62: warning: unused value: $]5[
|
||||
]]m4_ifval($2, [[[input.y:14.14-16: warning: unset value: $$
|
||||
]]])[[input.y:14.10-47: warning: unset value: $]$[
|
||||
input.y:14.10-47: warning: unused value: $]3[
|
||||
input.y:14.10-47: warning: unused value: $]5[
|
||||
input.y:15.10-36: warning: unset value: $]$[
|
||||
input.y:15.10-36: warning: unused value: $]3[
|
||||
input.y:15.10-36: warning: unused value: $]5[
|
||||
]]])[[input.y:14.10-49: warning: unset value: $]$[
|
||||
input.y:14.10-49: warning: unused value: $]3[
|
||||
input.y:14.10-49: warning: unused value: $]5[
|
||||
input.y:15.10-37: warning: unset value: $]$[
|
||||
input.y:15.10-37: warning: unused value: $]3[
|
||||
input.y:15.10-37: warning: unused value: $]5[
|
||||
input.y:17.10-58: warning: unset value: $]$[
|
||||
input.y:17.10-58: warning: unused value: $]1[
|
||||
]]m4_ifval($2, [[[input.y:17.10-58: warning: unused value: $]2[
|
||||
|
||||
@@ -1238,27 +1238,3 @@ AT_COMPILE([[input]])
|
||||
AT_PARSER_CHECK([[./input]])
|
||||
|
||||
AT_CLEANUP
|
||||
|
||||
|
||||
|
||||
## ----------------------------------------------- ##
|
||||
## Fix user actions without a trailing semicolon. ##
|
||||
## ----------------------------------------------- ##
|
||||
|
||||
AT_SETUP([[Fix user actions without a trailing semicolon]])
|
||||
|
||||
# This feature is undocumented, but we accidentally broke it in 2.3a, and there
|
||||
# was a complaint at:
|
||||
# <http://lists.gnu.org/archive/html/bug-bison/2008-11/msg00001.html>.
|
||||
|
||||
AT_DATA([input.y],
|
||||
[[%%
|
||||
start: {asdffdsa} ;
|
||||
]])
|
||||
|
||||
AT_BISON_CHECK([[-o input.c input.y]])
|
||||
AT_CHECK([[sed -n '/asdffdsa/s/^ *//p' input.c]], [[0]],
|
||||
[[{asdffdsa;}
|
||||
]])
|
||||
|
||||
AT_CLEANUP
|
||||
|
||||
Reference in New Issue
Block a user