]> git.saurik.com Git - bison.git/blob - tests/input.at
ada682613fe213c4bbe1f095365d834e313d2f16
[bison.git] / tests / input.at
1 # Checking the Bison scanner. -*- Autotest -*-
2
3 # Copyright (C) 2002-2011 Free Software Foundation, Inc.
4
5 # This program is free software: you can redistribute it and/or modify
6 # it under the terms of the GNU General Public License as published by
7 # the Free Software Foundation, either version 3 of the License, or
8 # (at your option) any later version.
9 #
10 # This program is distributed in the hope that it will be useful,
11 # but WITHOUT ANY WARRANTY; without even the implied warranty of
12 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 # GNU General Public License for more details.
14 #
15 # You should have received a copy of the GNU General Public License
16 # along with this program. If not, see <http://www.gnu.org/licenses/>.
17
18 AT_BANNER([[Input Processing.]])
19
20 # Mostly test that we are robust to mistakes.
21
22
23 ## ------------ ##
24 ## Invalid $n. ##
25 ## ------------ ##
26
27 AT_SETUP([Invalid $n and @n])
28
29 AT_DATA([input.y],
30 [[%%
31 exp: { $$ = $1 ; };
32 exp: { @$ = @1 ; };
33 ]])
34
35 AT_BISON_CHECK([input.y], [1], [],
36 [[input.y:2.13-14: integer out of range: `$1'
37 input.y:3.13-14: integer out of range: `@1'
38 ]])
39
40 AT_CLEANUP
41
42
43 ## -------------- ##
44 ## Type Clashes. ##
45 ## -------------- ##
46
47 AT_SETUP([Type Clashes])
48
49 AT_DATA([input.y],
50 [[%union { int bar; }
51 %token foo
52 %type <bar> exp
53 %%
54 exp: foo { $$; } foo { $2; } foo
55 | foo
56 | /* Empty. */
57 ;
58 ]])
59
60 AT_BISON_CHECK([input.y], [1], [],
61 [[input.y:5.12-13: $$ for the midrule at $2 of `exp' has no declared type
62 input.y:5.24-25: $2 of `exp' has no declared type
63 input.y:5.6-32: warning: type clash on default action: <bar> != <>
64 input.y:6.6-8: warning: type clash on default action: <bar> != <>
65 input.y:7.5: warning: empty rule for typed nonterminal, and no action
66 ]])
67
68 AT_CLEANUP
69
70
71 # _AT_UNUSED_VALUES_DECLARATIONS()
72 # --------------------------------
73 # Generate the token, type, and destructor
74 # declarations for the unused values tests.
75 m4_define([_AT_UNUSED_VALUES_DECLARATIONS],
76 [[[%token <integer> INT;
77 %type <integer> a b c d e f g h i j k l;
78 %destructor { destroy ($$); } INT a b c d e f g h i j k l;]]])
79
80
81 # AT_CHECK_UNUSED_VALUES(DECLARATIONS_AFTER, CHECK_MIDRULE_VALUES)
82 # ----------------------------------------------------------------
83 # Generate a grammar to test unused values, compile it, run it. If
84 # DECLARATIONS_AFTER is set, then the token, type, and destructor
85 # declarations are generated after the rules rather than before. If
86 # CHECK_MIDRULE_VALUES is set, then --warnings=midrule-values is set.
87 m4_define([AT_CHECK_UNUSED_VALUES],
88 [AT_DATA([input.y],
89 m4_ifval($1, [
90
91
92 ], [_AT_UNUSED_VALUES_DECLARATIONS
93 ])[[%%
94 start:
95 'a' a { $]2[; } | 'b' b { $]2[; } | 'c' c { $]2[; } | 'd' d { $]2[; }
96 | 'e' e { $]2[; } | 'f' f { $]2[; } | 'g' g { $]2[; } | 'h' h { $]2[; }
97 | 'i' i { $]2[; } | 'j' j { $]2[; } | 'k' k { $]2[; } | 'l' l { $]2[; }
98 ;
99
100 a: INT | INT { } INT { } INT { };
101 b: INT | /* empty */;
102 c: INT | INT { $]1[; } INT { $<integer>2; } INT { $<integer>4; };
103 d: INT | INT { } INT { $]1[; } INT { $<integer>2; };
104 e: INT | INT { } INT { } INT { $]1[; };
105 f: INT | INT { } INT { } INT { $]$[ = $]1[ + $]3[ + $]5[; };
106 g: INT | INT { $<integer>$; } INT { $<integer>$; } INT { };
107 h: INT | INT { $<integer>$; } INT { $<integer>$ = $<integer>2; } INT { };
108 i: INT | INT INT { } { $]$[ = $]1[ + $]2[; };
109 j: INT | INT INT { $<integer>$ = 1; } { $]$[ = $]1[ + $]2[; };
110 k: INT | INT INT { $<integer>$; } { $<integer>$ = $<integer>3; } { };
111 l: INT | INT { $<integer>$ = $<integer>1; } INT { $<integer>$ = $<integer>2 + $<integer>3; } INT { $<integer>$ = $<integer>4 + $<integer>5; };]]m4_ifval($1, [
112 _AT_UNUSED_VALUES_DECLARATIONS])
113 )
114
115 AT_BISON_CHECK(m4_ifval($2, [ --warnings=midrule-values ])[ input.y], [0], [],
116 [[input.y:11.10-32: warning: unset value: $]$[
117 input.y:11.10-32: warning: unused value: $]1[
118 input.y:11.10-32: warning: unused value: $]3[
119 input.y:11.10-32: warning: unused value: $]5[
120 input.y:12.9: warning: empty rule for typed nonterminal, and no action
121 ]]m4_ifval($2, [[[input.y:13.14-20: warning: unset value: $$
122 input.y:13.26-41: warning: unset value: $$
123 ]]])[[input.y:13.10-62: warning: unset value: $]$[
124 input.y:13.10-62: warning: unused value: $]3[
125 input.y:13.10-62: warning: unused value: $]5[
126 ]]m4_ifval($2, [[[input.y:14.14-16: warning: unset value: $$
127 ]]])[[input.y:14.10-49: warning: unset value: $]$[
128 input.y:14.10-49: warning: unused value: $]3[
129 input.y:14.10-49: warning: unused value: $]5[
130 input.y:15.10-37: warning: unset value: $]$[
131 input.y:15.10-37: warning: unused value: $]3[
132 input.y:15.10-37: warning: unused value: $]5[
133 input.y:17.10-58: warning: unset value: $]$[
134 input.y:17.10-58: warning: unused value: $]1[
135 ]]m4_ifval($2, [[[input.y:17.10-58: warning: unused value: $]2[
136 ]]])[[input.y:17.10-58: warning: unused value: $]3[
137 ]]m4_ifval($2, [[[input.y:17.10-58: warning: unused value: $]4[
138 ]]])[[input.y:17.10-58: warning: unused value: $]5[
139 input.y:18.10-72: warning: unset value: $]$[
140 input.y:18.10-72: warning: unused value: $]1[
141 input.y:18.10-72: warning: unused value: $]3[
142 ]]m4_ifval($2, [[[input.y:18.10-72: warning: unused value: $]4[
143 ]]])[[input.y:18.10-72: warning: unused value: $]5[
144 ]]m4_ifval($2, [[[input.y:20.10-55: warning: unused value: $]3[
145 ]]])[[input.y:21.10-68: warning: unset value: $]$[
146 input.y:21.10-68: warning: unused value: $]1[
147 input.y:21.10-68: warning: unused value: $]2[
148 ]]m4_ifval($2, [[[input.y:21.10-68: warning: unused value: $]4[
149 ]]]))])
150
151
152 ## --------------- ##
153 ## Unused values. ##
154 ## --------------- ##
155
156 AT_SETUP([Unused values])
157 AT_CHECK_UNUSED_VALUES
158 AT_CHECK_UNUSED_VALUES(, [1])
159 AT_CLEANUP
160
161
162 ## ------------------------------------------ ##
163 ## Unused values before symbol declarations. ##
164 ## ------------------------------------------ ##
165
166 AT_SETUP([Unused values before symbol declarations])
167 AT_CHECK_UNUSED_VALUES([1])
168 AT_CHECK_UNUSED_VALUES([1], [1])
169 AT_CLEANUP
170
171
172 ## --------------------------------------------- ##
173 ## Default %printer and %destructor redeclared. ##
174 ## --------------------------------------------- ##
175
176 AT_SETUP([Default %printer and %destructor redeclared])
177
178 AT_DATA([[input.y]],
179 [[%destructor { destroy ($$); } <*> <*>
180 %printer { destroy ($$); } <*> <*>
181
182 %destructor { destroy ($$); } <*>
183 %printer { destroy ($$); } <*>
184
185 %destructor { destroy ($$); } <> <>
186 %printer { destroy ($$); } <> <>
187
188 %destructor { destroy ($$); } <>
189 %printer { destroy ($$); } <>
190
191 %%
192
193 start: ;
194
195 %destructor { destroy ($$); } <*>;
196 %printer { destroy ($$); } <*>;
197
198 %destructor { destroy ($$); } <>;
199 %printer { destroy ($$); } <>;
200 ]])
201
202 AT_BISON_CHECK([input.y], [1], [],
203 [[input.y:1.13-29: redeclaration for default tagged %destructor
204 input.y:1.13-29: previous declaration
205 input.y:2.10-26: redeclaration for default tagged %printer
206 input.y:2.10-26: previous declaration
207 input.y:4.13-29: redeclaration for default tagged %destructor
208 input.y:1.13-29: previous declaration
209 input.y:5.10-26: redeclaration for default tagged %printer
210 input.y:2.10-26: previous declaration
211 input.y:7.13-29: redeclaration for default tagless %destructor
212 input.y:7.13-29: previous declaration
213 input.y:8.10-26: redeclaration for default tagless %printer
214 input.y:8.10-26: previous declaration
215 input.y:10.13-29: redeclaration for default tagless %destructor
216 input.y:7.13-29: previous declaration
217 input.y:11.10-26: redeclaration for default tagless %printer
218 input.y:8.10-26: previous declaration
219 input.y:17.13-29: redeclaration for default tagged %destructor
220 input.y:4.13-29: previous declaration
221 input.y:18.10-26: redeclaration for default tagged %printer
222 input.y:5.10-26: previous declaration
223 input.y:20.13-29: redeclaration for default tagless %destructor
224 input.y:10.13-29: previous declaration
225 input.y:21.10-26: redeclaration for default tagless %printer
226 input.y:11.10-26: previous declaration
227 ]])
228
229 AT_CLEANUP
230
231
232 ## ---------------------------------------------- ##
233 ## Per-type %printer and %destructor redeclared. ##
234 ## ---------------------------------------------- ##
235
236 AT_SETUP([Per-type %printer and %destructor redeclared])
237
238 AT_DATA([[input.y]],
239 [[%destructor { destroy ($$); } <field1> <field2>
240 %printer { destroy ($$); } <field1> <field2>
241
242 %destructor { destroy ($$); } <field1> <field1>
243 %printer { destroy ($$); } <field2> <field2>
244
245 %%
246
247 start: ;
248
249 %destructor { destroy ($$); } <field2> <field1>;
250 %printer { destroy ($$); } <field2> <field1>;
251 ]])
252
253 AT_BISON_CHECK([input.y], [1], [],
254 [[input.y:4.13-29: %destructor redeclaration for <field1>
255 input.y:1.13-29: previous declaration
256 input.y:4.13-29: %destructor redeclaration for <field1>
257 input.y:4.13-29: previous declaration
258 input.y:5.10-26: %printer redeclaration for <field2>
259 input.y:2.10-26: previous declaration
260 input.y:5.10-26: %printer redeclaration for <field2>
261 input.y:5.10-26: previous declaration
262 input.y:11.13-29: %destructor redeclaration for <field1>
263 input.y:4.13-29: previous declaration
264 input.y:11.13-29: %destructor redeclaration for <field2>
265 input.y:1.13-29: previous declaration
266 input.y:12.10-26: %printer redeclaration for <field1>
267 input.y:2.10-26: previous declaration
268 input.y:12.10-26: %printer redeclaration for <field2>
269 input.y:5.10-26: previous declaration
270 ]])
271
272 AT_CLEANUP
273
274
275 ## ---------------------------------------- ##
276 ## Unused values with default %destructor. ##
277 ## ---------------------------------------- ##
278
279 AT_SETUP([Unused values with default %destructor])
280
281 AT_DATA([[input.y]],
282 [[%destructor { destroy ($$); } <>
283 %type <tag> tagged
284
285 %%
286
287 start: end end tagged tagged { $<tag>1; $3; } ;
288 end: { } ;
289 tagged: { } ;
290 ]])
291
292 AT_BISON_CHECK([input.y], [0], [],
293 [[input.y:6.8-45: warning: unset value: $$
294 input.y:6.8-45: warning: unused value: $2
295 input.y:7.6-8: warning: unset value: $$
296 ]])
297
298 AT_DATA([[input.y]],
299 [[%destructor { destroy ($$); } <*>
300 %type <tag> tagged
301
302 %%
303
304 start: end end tagged tagged { $<tag>1; $3; } ;
305 end: { } ;
306 tagged: { } ;
307 ]])
308
309 AT_BISON_CHECK([input.y], [0], [],
310 [[input.y:6.8-45: warning: unused value: $4
311 input.y:8.9-11: warning: unset value: $$
312 ]])
313
314 AT_CLEANUP
315
316
317 ## ----------------------------------------- ##
318 ## Unused values with per-type %destructor. ##
319 ## ----------------------------------------- ##
320
321 AT_SETUP([Unused values with per-type %destructor])
322
323 AT_DATA([[input.y]],
324 [[%destructor { destroy ($$); } <field1>
325 %type <field1> start end
326
327 %%
328
329 start: end end { $1; } ;
330 end: { } ;
331 ]])
332
333 AT_BISON_CHECK([input.y], [0], [],
334 [[input.y:6.8-22: warning: unset value: $$
335 input.y:6.8-22: warning: unused value: $2
336 input.y:7.6-8: warning: unset value: $$
337 ]])
338
339 AT_CLEANUP
340
341
342 ## ---------------------- ##
343 ## Incompatible Aliases. ##
344 ## ---------------------- ##
345
346 AT_SETUP([Incompatible Aliases])
347
348 AT_DATA([input.y],
349 [[%token foo "foo"
350
351 %type <bar> foo
352 %printer {bar} foo
353 %destructor {bar} foo
354 %left foo
355
356 %type <baz> "foo"
357 %printer {baz} "foo"
358 %destructor {baz} "foo"
359 %left "foo"
360
361 %%
362 exp: foo;
363 ]])
364
365 AT_BISON_CHECK([input.y], [1], [],
366 [[input.y:8.7-11: %type redeclaration for foo
367 input.y:3.7-11: previous declaration
368 input.y:10.13-17: %destructor redeclaration for foo
369 input.y:5.13-17: previous declaration
370 input.y:9.10-14: %printer redeclaration for foo
371 input.y:4.10-14: previous declaration
372 input.y:11.1-5: %left redeclaration for foo
373 input.y:6.1-5: previous declaration
374 ]])
375
376 AT_CLEANUP
377
378
379
380 ## ----------------------- ##
381 ## Torturing the Scanner. ##
382 ## ----------------------- ##
383
384 # Be sure to compile and run, so that the C compiler checks what
385 # we do.
386
387 AT_SETUP([Torturing the Scanner])
388
389
390 AT_DATA([input.y], [])
391 AT_BISON_CHECK([input.y], [1], [],
392 [[input.y:1.1: syntax error, unexpected end of file
393 ]])
394
395
396 AT_DATA([input.y],
397 [{}
398 ])
399 AT_BISON_CHECK([input.y], [1], [],
400 [[input.y:1.1-2: syntax error, unexpected {...}
401 ]])
402
403
404 AT_DATA_GRAMMAR([input.y],
405 [[%{
406 /* This is seen in GCC: a %{ and %} in middle of a comment. */
407 const char *foo = "So %{ and %} can be here too.";
408
409 #if 0
410 /* These examples test Bison while not stressing C compilers too much.
411 Many C compilers mishandle backslash-newlines, so this part of the
412 test is inside "#if 0". The comment and string are written so that
413 the "#endif" will be seen regardless of the C compiler bugs that we
414 know about, namely:
415
416 HP C (as of late 2002) mishandles *\[newline]\[newline]/ within a
417 comment.
418
419 The Apple Darwin compiler (as of late 2002) mishandles
420 \\[newline]' within a character constant.
421
422 */
423
424 /\
425 * A comment with backslash-newlines in it. %} *\
426 \
427 /
428 /* { Close the above comment, if the C compiler mishandled it. */
429
430 char str[] = "\\
431 " A string with backslash-newlines in it %{ %} \\
432 \
433 "";
434
435 char apostrophe = '\'';
436 #endif
437
438 #include <stdio.h>
439 #include <stdlib.h>
440 %}
441 /* %{ and %} can be here too. */
442
443 %{
444 /* Exercise pre-prologue dependency to %union. */
445 typedef int value;
446 %}
447
448 /* Exercise M4 quoting: '@:>@@:>@', 0. */
449
450 /* Also exercise %union. */
451 %union
452 {
453 value ival; /* A comment to exercise an old bug. */
454 };
455
456
457 /* Exercise post-prologue dependency to %union. */
458 %{
459 static YYSTYPE value_as_yystype (value val);
460
461 /* Exercise quotes in declarations. */
462 char quote[] = "@:>@@:>@,";
463 %}
464
465 %{
466 static void yyerror (const char *s);
467 static int yylex (void);
468 %}
469
470 %type <ival> '@<:@'
471
472 /* Exercise quotes in strings. */
473 %token FAKE "fake @<:@@:>@ \a\b\f\n\r\t\v\"\'\?\\\u005B\U0000005c ??!??'??(??)??-??/??<??=??> \x1\1"
474
475 %%
476 /* Exercise M4 quoting: '@:>@@:>@', @<:@, 1. */
477 exp: '@<:@' '\1' two '$' '@' '{' oline output.or.oline.opt
478 {
479 /* Exercise quotes in braces. */
480 char tmp[] = "@<:@%c@:>@,\n";
481 printf (tmp, $1);
482 }
483 ;
484
485 two: '\x000000000000000000000000000000000000000000000000000000000000000000002';
486 oline: '@' 'o' 'l' 'i' 'n' 'e' '@' '_' '_' 'o' 'l' 'i' 'n' 'e' '_' '_';
487 output.or.oline.opt: ;|oline;;|output;;;
488 output: '#' 'o' 'u' 't' 'p' 'u' 't' ' ';
489 %%
490 /* Exercise M4 quoting: '@:>@@:>@', @<:@, 2. */
491
492 static YYSTYPE
493 value_as_yystype (value val)
494 {
495 YYSTYPE res;
496 res.ival = val;
497 return res;
498 }
499
500 static int
501 yylex (void)
502 {
503 static char const input[] = "@<:@\1\2$@{@oline@__@&t@oline__\
504 #output "; /* "
505 */
506 static size_t toknum;
507 if (! (toknum < sizeof input))
508 abort ();
509 yylval = value_as_yystype (input[toknum]);
510 return input[toknum++];
511 }
512
513 static void
514 yyerror (const char *msg)
515 {
516 fprintf (stderr, "%s\n", msg);
517 }
518 ]])
519
520 # Pacify Emacs'font-lock-mode: "
521
522 AT_DATA([main.c],
523 [[typedef int value;
524 #include "input.h"
525
526 int yyparse (void);
527
528 int
529 main (void)
530 {
531 return yyparse ();
532 }
533 ]])
534
535 AT_BISON_CHECK([-d -v -o input.c input.y])
536 AT_COMPILE([input.o], [-c input.c])
537 AT_COMPILE([main.o], [-c main.c])
538 AT_COMPILE([input], [input.o main.o])
539 AT_PARSER_CHECK([./input], 0,
540 [[[@<:@],
541 ]])
542
543 AT_CLEANUP
544
545
546 ## ---------------------- ##
547 ## Typed symbol aliases. ##
548 ## ---------------------- ##
549
550 AT_SETUP([Typed symbol aliases])
551
552 # Bison 2.0 broke typed symbol aliases - ensure they work.
553
554 AT_DATA_GRAMMAR([input.y],
555 [[%union
556 {
557 int val;
558 };
559 %token <val> MY_TOKEN "MY TOKEN"
560 %type <val> exp
561 %%
562 exp: "MY TOKEN";
563 %%
564 ]])
565
566 AT_BISON_CHECK([-o input.c input.y])
567
568 AT_CLEANUP
569
570
571 ## --------- ##
572 ## Require. ##
573 ## --------- ##
574
575 m4_define([AT_CHECK_REQUIRE],
576 [AT_SETUP([Require $1])
577 AT_DATA_GRAMMAR([input.y],
578 [[%require "$1";
579 %%
580 empty_file:;
581 ]])
582 AT_BISON_CHECK([-o input.c input.y], $2, [], ignore)
583 AT_CLEANUP
584 ])
585
586 AT_CHECK_REQUIRE(1.0, 0)
587 AT_CHECK_REQUIRE(AT_PACKAGE_VERSION, 0)
588 ## FIXME: Some day augment this version number.
589 AT_CHECK_REQUIRE(100.0, 63)
590
591
592 ## ------------------------------------- ##
593 ## String aliases for character tokens. ##
594 ## ------------------------------------- ##
595
596 AT_SETUP([String aliases for character tokens])
597
598 # Bison once thought a character token and its alias were different
599 # symbols with the same user token number.
600
601 AT_DATA_GRAMMAR([input.y],
602 [[%token 'a' "a"
603 %%
604 start: 'a';
605 %%
606 ]])
607
608 AT_BISON_CHECK([-o input.c input.y])
609
610 AT_CLEANUP
611
612
613 ## -------------- ##
614 ## Symbol names. ##
615 ## -------------- ##
616
617 AT_SETUP([Symbols])
618
619 AT_DATA_GRAMMAR([input.y],
620 [[%token WITH-DASH
621 %token WITHOUT_DASH "WITHOUT-DASH"
622 %token WITH.PERIOD
623 %token WITHOUT_PERIOD "WITHOUT.PERIOD"
624 %code {
625 void yyerror (char const *);
626 int yylex (void);
627 }
628 %%
629 start: with-dash without_dash with.period without_period;
630 with-dash: WITH-DASH;
631 without_dash: "WITHOUT-DASH";
632 with.period: WITH.PERIOD;
633 without_period: "WITHOUT.PERIOD";
634 %%
635 ]])
636
637 # POSIX Yacc accept periods, but not dashes.
638 AT_BISON_CHECK([--yacc input.y], [1], [],
639 [[input.y:9.8-16: POSIX Yacc forbids dashes in symbol names: WITH-DASH
640 input.y:18.8-16: POSIX Yacc forbids dashes in symbol names: with-dash
641 ]])
642
643 # So warn about them.
644 AT_BISON_CHECK([-Wyacc input.y], [], [],
645 [[input.y:9.8-16: warning: POSIX Yacc forbids dashes in symbol names: WITH-DASH
646 input.y:18.8-16: warning: POSIX Yacc forbids dashes in symbol names: with-dash
647 ]])
648
649 # Dashes are fine for GNU Bison.
650 AT_BISON_CHECK([-o input.c input.y])
651
652 # Make sure we don't export silly token identifiers with periods or dashes.
653 AT_COMPILE([input.o], [-c input.c])
654
655
656 # Periods are genuine letters, they can start identifiers.
657 # Digits and dashes cannot.
658 AT_DATA_GRAMMAR([input.y],
659 [[%token .GOOD
660 -GOOD
661 1NV4L1D
662 -123
663 %%
664 start: .GOOD GOOD
665 ]])
666 AT_BISON_CHECK([-o input.c input.y], [1], [],
667 [[input.y:10.10: invalid character: `-'
668 input.y:11.10-16: invalid identifier: `1NV4L1D'
669 input.y:12.10: invalid character: `-'
670 ]])
671
672 AT_CLEANUP
673
674
675 ## ----------------- ##
676 ## Numbered tokens. ##
677 ## ----------------- ##
678
679 AT_SETUP([Numbered tokens])
680
681 AT_DATA_GRAMMAR([redecl.y],
682 [[%token DECIMAL_1 11259375
683 HEXADECIMAL_1 0xabcdef
684 HEXADECIMAL_2 0xFEDCBA
685 DECIMAL_2 16702650
686 %%
687 start: DECIMAL_1 HEXADECIMAL_2;
688 ]])
689
690 AT_BISON_CHECK([redecl.y], [1], [],
691 [[redecl.y:10.10-22: user token number 11259375 redeclaration for HEXADECIMAL_1
692 redecl.y:9.8-16: previous declaration for DECIMAL_1
693 redecl.y:12.10-18: user token number 16702650 redeclaration for DECIMAL_2
694 redecl.y:11.10-22: previous declaration for HEXADECIMAL_2
695 ]])
696
697 AT_DATA_GRAMMAR([too-large.y],
698 [[%token TOO_LARGE_DEC 999999999999999999999
699 TOO_LARGE_HEX 0xFFFFFFFFFFFFFFFFFFF
700 %%
701 start: TOO_LARGE_DEC TOO_LARGE_HEX
702 %%
703 ]])
704
705 AT_BISON_CHECK([too-large.y], [1], [],
706 [[too-large.y:9.22-42: integer out of range: `999999999999999999999'
707 too-large.y:10.24-44: integer out of range: `0xFFFFFFFFFFFFFFFFFFF'
708 ]])
709
710 AT_CLEANUP
711
712
713 ## --------------------- ##
714 ## Unclosed constructs. ##
715 ## --------------------- ##
716
717 AT_SETUP([Unclosed constructs])
718
719 # Bison's scan-gram.l once forgot to STRING_FINISH some unclosed
720 # constructs, so they were prepended to whatever it STRING_GROW'ed
721 # next. It also threw them away rather than returning them to the
722 # parser. The effect was confusing subsequent error messages.
723
724 AT_DATA([input.y],
725 [[%token A "a
726 %token B "b"
727 %token AB "ab" // Used to complain that "ab" was already used.
728 %token C '1
729 %token TWO "2"
730 %token TICK_TWELVE "'12" // Used to complain that "'12" was already used.
731
732 %%
733
734 start: ;
735
736 // Used to report a syntax error because it didn't see any kind of symbol
737 // identifier.
738 %type <f> 'a
739 ;
740 %type <f> "a
741 ;
742 // Used to report a syntax error because it didn't see braced code.
743 %destructor { free ($$)
744 ]])
745
746 AT_BISON_CHECK([-o input.c input.y], 1, [],
747 [[input.y:1.10-2.0: missing `"' at end of line
748 input.y:4.10-5.0: missing `'' at end of line
749 input.y:14.11-15.0: missing `'' at end of line
750 input.y:16.11-17.0: missing `"' at end of line
751 input.y:19.13-20.0: missing `}' at end of file
752 input.y:20.1: syntax error, unexpected end of file
753 ]])
754
755 AT_CLEANUP
756
757
758 ## ------------------------- ##
759 ## %start after first rule. ##
760 ## ------------------------- ##
761
762 AT_SETUP([%start after first rule])
763
764 # Bison once complained that a %start after the first rule was a
765 # redeclaration of the start symbol.
766
767 AT_DATA([input.y],
768 [[%%
769 false_start: ;
770 start: false_start ;
771 %start start;
772 ]])
773
774 AT_BISON_CHECK([-o input.c input.y])
775
776 AT_CLEANUP
777
778
779 ## --------------------- ##
780 ## %prec takes a token. ##
781 ## --------------------- ##
782
783 AT_SETUP([%prec takes a token])
784
785 # Bison once allowed %prec sym where sym was a nonterminal.
786
787 AT_DATA([input.y],
788 [[%%
789 start: PREC %prec PREC ;
790 PREC: ;
791 ]])
792
793 AT_BISON_CHECK([input.y], [1], [],
794 [[input.y:3.1-4: rule given for PREC, which is a token
795 ]])
796
797 AT_CLEANUP
798
799
800 ## ------------------------------- ##
801 ## %prec's token must be defined. ##
802 ## ------------------------------- ##
803
804 AT_SETUP([[%prec's token must be defined]])
805
806 # According to POSIX, a %prec token must be defined separately.
807
808 AT_DATA([[input.y]],
809 [[%%
810 start: %prec PREC ;
811 ]])
812
813 AT_BISON_CHECK([[input.y]], [[0]], [],
814 [[input.y:2.8-17: warning: token for %prec is not defined: PREC
815 ]])
816
817 AT_CLEANUP
818
819
820 ## -------------------------------- ##
821 ## Reject unused %code qualifiers. ##
822 ## -------------------------------- ##
823
824 AT_SETUP([Reject unused %code qualifiers])
825
826 AT_DATA([input-c.y],
827 [[%code q {}
828 %code bad {}
829 %code bad {}
830 %code format {}
831 %%
832 start: ;
833 ]])
834 AT_BISON_CHECK([[input-c.y]], [[1]], [],
835 [[input-c.y:1.7: %code qualifier `q' is not used
836 input-c.y:2.7-9: %code qualifier `bad' is not used
837 input-c.y:3.7-9: %code qualifier `bad' is not used
838 input-c.y:4.7-12: %code qualifier `format' is not used
839 ]])
840
841 AT_DATA([input-c-glr.y],
842 [[%code q {}
843 %code bad {}
844 %code bad {}
845 %%
846 start: ;
847 ]])
848 AT_BISON_CHECK([[input-c-glr.y]], [[1]], [],
849 [[input-c-glr.y:1.7: %code qualifier `q' is not used
850 input-c-glr.y:2.7-9: %code qualifier `bad' is not used
851 input-c-glr.y:3.8-10: %code qualifier `bad' is not used
852 ]])
853
854 AT_DATA([input-c++.y],
855 [[%code q {}
856 %code bad {}
857 %code q {}
858 %%
859 start: ;
860 ]])
861 AT_BISON_CHECK([[input-c++.y]], [[1]], [],
862 [[input-c++.y:1.7: %code qualifier `q' is not used
863 input-c++.y:2.7-9: %code qualifier `bad' is not used
864 input-c++.y:3.8: %code qualifier `q' is not used
865 ]])
866
867 AT_DATA([input-c++-glr.y],
868 [[%code bad {}
869 %code q {}
870 %code q {}
871 %%
872 start: ;
873 ]])
874 AT_BISON_CHECK([[input-c++-glr.y]], [[1]], [],
875 [[input-c++-glr.y:1.7-9: %code qualifier `bad' is not used
876 input-c++-glr.y:2.7: %code qualifier `q' is not used
877 input-c++-glr.y:3.7: %code qualifier `q' is not used
878 ]])
879
880 AT_DATA([special-char-@@.y],
881 [[%code bad {}
882 %code q {}
883 %code q {}
884 %%
885 start: ;
886 ]])
887 AT_BISON_CHECK([[special-char-@@.y]], [[1]], [],
888 [[special-char-@@.y:1.7-9: %code qualifier `bad' is not used
889 special-char-@@.y:2.7: %code qualifier `q' is not used
890 special-char-@@.y:3.7: %code qualifier `q' is not used
891 ]])
892
893 AT_DATA([special-char-@:>@.y],
894 [[%code bad {}
895 %code q {}
896 %code q {}
897 %%
898 start: ;
899 ]])
900 AT_BISON_CHECK([[special-char-@:>@.y]], [[1]], [],
901 [[special-char-@:>@.y:1.7-9: %code qualifier `bad' is not used
902 special-char-@:>@.y:2.7: %code qualifier `q' is not used
903 special-char-@:>@.y:3.7: %code qualifier `q' is not used
904 ]])
905
906 AT_CLEANUP
907
908
909 ## ---------------- ##
910 ## %define errors. ##
911 ## ---------------- ##
912
913 AT_SETUP([%define errors])
914
915 AT_DATA([input-redefined.y],
916 [[%define var "value1"
917 %define var "value1"
918 %define var "value2"
919 %define special1 "@:>@"
920 %define special2 "@<:@"
921 %%
922 start: ;
923 ]])
924
925 AT_BISON_CHECK([[input-redefined.y]], [[1]], [],
926 [[input-redefined.y:2.9-11: %define variable `var' redefined
927 input-redefined.y:1.9-11: previous definition
928 input-redefined.y:3.10-12: %define variable `var' redefined
929 input-redefined.y:2.9-11: previous definition
930 ]])
931
932 AT_DATA([input-unused.y],
933 [[%define var "value"
934 %%
935 start: ;
936 ]])
937
938 AT_BISON_CHECK([[input-unused.y]], [[1]], [],
939 [[input-unused.y:1.9-11: %define variable `var' is not used
940 ]])
941
942 AT_CLEANUP
943
944
945 ## ----------------------------------- ##
946 ## %define, --define, --force-define. ##
947 ## ----------------------------------- ##
948
949 AT_SETUP([[%define, --define, --force-define]])
950
951 AT_DATA([[skel.c]],
952 [[m4@&t@_divert_push(0)@
953 @output(b4_parser_file_name@)@
954 [var-dd: ]b4_percent_define_get([[var-dd]])[
955 var-ff: ]b4_percent_define_get([[var-ff]])[
956 var-dfg: ]b4_percent_define_get([[var-dfg]])[
957 var-fd: ]b4_percent_define_get([[var-fd]])
958 m4@&t@_divert_pop(0)
959 ]])
960 AT_DATA([[input.y]],
961 [[%define var-dfg "gram"
962 %%
963 start: ;
964 ]])
965 AT_BISON_CHECK([[-Dvar-dd=cmd-d1 -Dvar-dd=cmd-d2 \
966 -Fvar-ff=cmd-f1 -Fvar-ff=cmd-f2 \
967 -Dvar-dfg=cmd-d -Fvar-dfg=cmd-f \
968 -Fvar-fd=cmd-f -Dvar-fd=cmd-d \
969 --skeleton ./skel.c input.y]])
970 AT_CHECK([[cat input.tab.c]], [[0]],
971 [[var-dd: cmd-d2
972 var-ff: cmd-f2
973 var-dfg: cmd-f
974 var-fd: cmd-d
975 ]])
976
977 AT_DATA([[input-dg.y]],
978 [[%define var "gram"
979 %%
980 start: ;
981 ]])
982 AT_BISON_CHECK([[-Dvar=cmd-d input-dg.y]], [[1]], [],
983 [[input-dg.y:1.9-11: %define variable `var' redefined
984 <command line>:2: previous definition
985 ]])
986
987 AT_DATA([[input-unused.y]],
988 [[%%
989 start: ;
990 ]])
991 AT_BISON_CHECK([[-Dunused-d -Funused-f input-unused.y]], [[1]], [],
992 [[<command line>:2: %define variable `unused-d' is not used
993 <command line>:3: %define variable `unused-f' is not used
994 ]])
995
996 AT_CLEANUP
997
998 ## --------------------------- ##
999 ## %define Boolean variables. ##
1000 ## --------------------------- ##
1001
1002 AT_SETUP([[%define Boolean variables]])
1003
1004 AT_DATA([Input.y],
1005 [[%language "Java"
1006 %define public "maybe"
1007 %define parser_class_name "Input"
1008 %%
1009 start: ;
1010 ]])
1011
1012 AT_BISON_CHECK([[Input.y]], [1], [],
1013 [[Input.y:2.9-14: invalid value for %define Boolean variable `public'
1014 ]])
1015
1016 AT_CLEANUP
1017
1018 ## ------------------------ ##
1019 ## %define enum variables. ##
1020 ## ------------------------ ##
1021
1022 AT_SETUP([[%define enum variables]])
1023
1024 # Front-end.
1025 AT_DATA([[input.y]],
1026 [[%define lr.default-reductions bogus
1027 %%
1028 start: ;
1029 ]])
1030 AT_BISON_CHECK([[input.y]], [[1]], [[]],
1031 [[input.y:1.9-29: invalid value for %define variable `lr.default-reductions': `bogus'
1032 input.y:1.9-29: accepted value: `most'
1033 input.y:1.9-29: accepted value: `consistent'
1034 input.y:1.9-29: accepted value: `accepting'
1035 ]])
1036
1037 # Back-end.
1038 AT_DATA([[input.y]],
1039 [[%define api.push-pull neither
1040 %%
1041 start: ;
1042 ]])
1043 AT_BISON_CHECK([[input.y]], [1], [],
1044 [[input.y:1.9-21: invalid value for %define variable `api.push-pull': `neither'
1045 input.y:1.9-21: accepted value: `pull'
1046 input.y:1.9-21: accepted value: `push'
1047 input.y:1.9-21: accepted value: `both'
1048 ]])
1049
1050 AT_CLEANUP
1051
1052 ## -------------------------------- ##
1053 ## %define backward compatibility. ##
1054 ## -------------------------------- ##
1055
1056 AT_SETUP([[%define backward compatibility]])
1057
1058 # The error messages tell us whether underscores in these variables are
1059 # being converted to dashes.
1060
1061 AT_DATA([[input.y]],
1062 [[%define api.push_pull "neither"
1063 %%
1064 start: ;
1065 ]])
1066 AT_BISON_CHECK([[input.y]], [1], [],
1067 [[input.y:1.9-21: invalid value for %define variable `api.push-pull': `neither'
1068 input.y:1.9-21: accepted value: `pull'
1069 input.y:1.9-21: accepted value: `push'
1070 input.y:1.9-21: accepted value: `both'
1071 ]])
1072
1073 AT_DATA([[input.y]],
1074 [[%define lr.keep_unreachable_states maybe
1075 %%
1076 start: ;
1077 ]])
1078 AT_BISON_CHECK([[input.y]], [1], [],
1079 [[input.y:1.9-34: invalid value for %define Boolean variable `lr.keep-unreachable-states'
1080 ]])
1081
1082 AT_DATA([[input.y]],
1083 [[%define namespace "foo"
1084 %define api.namespace "foo"
1085 %%
1086 start: ;
1087 ]])
1088 AT_BISON_CHECK([[input.y]], [1], [],
1089 [[input.y:2.9-21: %define variable `api.namespace' redefined
1090 input.y:1.9-17: previous definition
1091 ]])
1092
1093 AT_DATA([[input.y]],
1094 [[%define foo_bar "baz"
1095 %%
1096 start: ;
1097 ]])
1098 AT_BISON_CHECK([[input.y]], [[1]], [],
1099 [[input.y:1.9-15: %define variable `foo_bar' is not used
1100 ]])
1101
1102 AT_CLEANUP
1103
1104 ## ------------------------- ##
1105 ## Unused %define api.pure. ##
1106 ## ------------------------- ##
1107
1108 AT_SETUP([[Unused %define api.pure]])
1109
1110 # AT_CHECK_API_PURE(DECLS, VALUE)
1111 # -------------------------------
1112 # Make sure Bison reports that `%define api.pure VALUE' is unused when DECLS
1113 # are specified.
1114 m4_define([AT_CHECK_API_PURE],
1115 [
1116 AT_DATA([[input.y]],
1117 [[%define api.pure ]$2[
1118 ]$1[
1119 %%
1120 start: ;
1121 ]])
1122
1123 AT_BISON_CHECK([[input.y]], [[1]], [],
1124 [[input.y:1.9-16: %define variable `api.pure' is not used
1125 ]])
1126 ])
1127
1128 AT_CHECK_API_PURE([[%language "c++" %defines]], [[]])
1129 AT_CHECK_API_PURE([[%language "c++" %defines]], [[false]])
1130 AT_CHECK_API_PURE([[%language "c++" %defines %glr-parser]], [[""]])
1131 AT_CHECK_API_PURE([[%language "c++" %defines %glr-parser]], [[false]])
1132 AT_CHECK_API_PURE([[%language "java"]], [[true]])
1133 AT_CHECK_API_PURE([[%language "java"]], [[false]])
1134
1135 AT_CLEANUP
1136
1137 ## -------------------------------- ##
1138 ## C++ namespace reference errors. ##
1139 ## -------------------------------- ##
1140
1141 AT_SETUP([[C++ namespace reference errors]])
1142
1143 # AT_CHECK_NAMESPACE_ERROR(NAMESPACE-DECL, ERROR, [ERROR], ...)
1144 # -------------------------------------------------------------
1145 # Make sure Bison reports all ERROR's for %define namespace "NAMESPACE-DECL".
1146 m4_define([AT_CHECK_NAMESPACE_ERROR],
1147 [
1148 AT_DATA([[input.y]],
1149 [[%language "C++"
1150 %defines
1151 %define api.namespace "]$1["
1152 %%
1153 start: ;
1154 ]])
1155
1156 AT_BISON_CHECK([[input.y]], [1], [],
1157 [m4_foreach([b4_arg], m4_dquote(m4_shift($@)),
1158 [[input.y:3.9-21: ]b4_arg[
1159 ]])])
1160 ])
1161
1162 AT_CHECK_NAMESPACE_ERROR([[]],
1163 [[namespace reference is empty]])
1164 AT_CHECK_NAMESPACE_ERROR([[ ]],
1165 [[namespace reference is empty]])
1166 AT_CHECK_NAMESPACE_ERROR([[foo::::bar]],
1167 [[namespace reference has consecutive "::"]])
1168 AT_CHECK_NAMESPACE_ERROR([[foo:: ::bar]],
1169 [[namespace reference has consecutive "::"]])
1170 AT_CHECK_NAMESPACE_ERROR([[::::bar]],
1171 [[namespace reference has consecutive "::"]])
1172 AT_CHECK_NAMESPACE_ERROR([[:: ::bar]],
1173 [[namespace reference has consecutive "::"]])
1174 AT_CHECK_NAMESPACE_ERROR([[foo::bar:: ::]],
1175 [[namespace reference has consecutive "::"]],
1176 [[namespace reference has a trailing "::"]])
1177 AT_CHECK_NAMESPACE_ERROR([[foo::bar::]],
1178 [[namespace reference has a trailing "::"]])
1179 AT_CHECK_NAMESPACE_ERROR([[foo::bar:: ]],
1180 [[namespace reference has a trailing "::"]])
1181 AT_CHECK_NAMESPACE_ERROR([[::]],
1182 [[namespace reference has a trailing "::"]])
1183
1184 AT_CLEANUP
1185
1186 ## ------------------------ ##
1187 ## Bad character literals. ##
1188 ## ------------------------ ##
1189
1190 # Bison used to accept character literals that were empty or contained
1191 # too many characters.
1192
1193 # FIXME: AT_DATA or some variant of AT_DATA may eventually permit
1194 # the final newline to be omitted. See the threads starting at
1195 # <http://lists.gnu.org/archive/html/bison-patches/2009-07/msg00019.html>.
1196
1197 AT_SETUP([[Bad character literals]])
1198
1199 AT_DATA([empty.y],
1200 [[%%
1201 start: '';
1202 start: '
1203 ]])
1204 AT_CHECK([[perl -e "print 'start: \'';" >> empty.y || exit 77]])
1205
1206 AT_BISON_CHECK([empty.y], [1], [],
1207 [[empty.y:2.8-9: warning: empty character literal
1208 empty.y:3.8-4.0: warning: empty character literal
1209 empty.y:3.8-4.0: missing `'' at end of line
1210 empty.y:4.8: warning: empty character literal
1211 empty.y:4.8: missing `'' at end of file
1212 ]])
1213
1214 AT_DATA([two.y],
1215 [[%%
1216 start: 'ab';
1217 start: 'ab
1218 ]])
1219 AT_CHECK([[perl -e "print 'start: \'ab';" >> two.y || exit 77]])
1220
1221 AT_BISON_CHECK([two.y], [1], [],
1222 [[two.y:2.8-11: warning: extra characters in character literal
1223 two.y:3.8-4.0: warning: extra characters in character literal
1224 two.y:3.8-4.0: missing `'' at end of line
1225 two.y:4.8-10: warning: extra characters in character literal
1226 two.y:4.8-10: missing `'' at end of file
1227 ]])
1228
1229 AT_DATA([three.y],
1230 [[%%
1231 start: 'abc';
1232 start: 'abc
1233 ]])
1234 AT_CHECK([[perl -e "print 'start: \'abc';" >> three.y || exit 77]])
1235
1236 AT_BISON_CHECK([three.y], [1], [],
1237 [[three.y:2.8-12: warning: extra characters in character literal
1238 three.y:3.8-4.0: warning: extra characters in character literal
1239 three.y:3.8-4.0: missing `'' at end of line
1240 three.y:4.8-11: warning: extra characters in character literal
1241 three.y:4.8-11: missing `'' at end of file
1242 ]])
1243
1244 AT_CLEANUP
1245
1246 ## ------------------------- ##
1247 ## Bad escapes in literals. ##
1248 ## ------------------------- ##
1249
1250 AT_SETUP([[Bad escapes in literals]])
1251
1252 AT_DATA([input.y],
1253 [[%%
1254 start: '\777' '\0' '\xfff' '\x0'
1255 '\uffff' '\u0000' '\Uffffffff' '\U00000000'
1256 '\ ' '\A';
1257 ]])
1258
1259 # It is not easy to create special characters, we cannot even trust tr.
1260 # Beside we cannot even expect "echo '\0'" to output two characters
1261 # (well three with \n): at least Bash 3.2 converts the two-character
1262 # sequence "\0" into a single NUL character.
1263 AT_CHECK([[perl -e 'print "start: \"\\\t\\\f\\\0\\\1\" ;";' >> input.y \
1264 || exit 77]])
1265
1266 AT_BISON_CHECK([input.y], [1], [],
1267 [[input.y:2.9-12: invalid number after \-escape: 777
1268 input.y:2.8-13: warning: empty character literal
1269 input.y:2.16-17: invalid number after \-escape: 0
1270 input.y:2.15-18: warning: empty character literal
1271 input.y:2.21-25: invalid number after \-escape: xfff
1272 input.y:2.20-26: warning: empty character literal
1273 input.y:2.29-31: invalid number after \-escape: x0
1274 input.y:2.28-32: warning: empty character literal
1275 input.y:3.9-14: invalid number after \-escape: uffff
1276 input.y:3.8-15: warning: empty character literal
1277 input.y:3.18-23: invalid number after \-escape: u0000
1278 input.y:3.17-24: warning: empty character literal
1279 input.y:3.27-36: invalid number after \-escape: Uffffffff
1280 input.y:3.26-37: warning: empty character literal
1281 input.y:3.40-49: invalid number after \-escape: U00000000
1282 input.y:3.39-50: warning: empty character literal
1283 input.y:4.9-10: invalid character after \-escape: ` '
1284 input.y:4.8-11: warning: empty character literal
1285 input.y:4.14-15: invalid character after \-escape: A
1286 input.y:4.13-16: warning: empty character literal
1287 input.y:5.9-16: invalid character after \-escape: \t
1288 input.y:5.17: invalid character after \-escape: \f
1289 input.y:5.18: invalid character after \-escape: \0
1290 input.y:5.19: invalid character after \-escape: \001
1291 ]])
1292
1293 AT_CLEANUP
1294
1295 ## ------------------------- ##
1296 ## LAC: Errors for %define. ##
1297 ## ------------------------- ##
1298
1299 AT_SETUP([[LAC: Errors for %define]])
1300
1301 AT_DATA([[input.y]],
1302 [[%%
1303 start: ;
1304 ]])
1305
1306 # parse.lac.* options are useless if LAC isn't actually activated.
1307 AT_BISON_CHECK([[-Dparse.lac.es-capacity-initial=1 input.y]],
1308 [[1]], [],
1309 [[<command line>:2: %define variable `parse.lac.es-capacity-initial' is not used
1310 ]])
1311 AT_BISON_CHECK([[-Dparse.lac.memory-trace=full input.y]],
1312 [[1]], [],
1313 [[<command line>:2: %define variable `parse.lac.memory-trace' is not used
1314 ]])
1315
1316 AT_CLEANUP