]> git.saurik.com Git - bison.git/blame - tests/glr-regr1.at
Really remove it.
[bison.git] / tests / glr-regr1.at
CommitLineData
09903f30
PH
1# Checking GLR Parsing: Regression Test -*- Autotest -*-
2# Copyright (C) 2002 Free Software Foundation, Inc.
3
4# This program is free software; you can redistribute it and/or modify
5# it under the terms of the GNU General Public License as published by
6# the Free Software Foundation; either version 2, or (at your option)
7# any later version.
8
9# This program is distributed in the hope that it will be useful,
10# but WITHOUT ANY WARRANTY; without even the implied warranty of
11# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12# GNU General Public License for more details.
13
14# You should have received a copy of the GNU General Public License
15# along with this program; if not, write to the Free Software
16# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
17# 02111-1307, USA.
18
19AT_BANNER([[GLR Regression Test #1.]])
20
21AT_SETUP([Badly Collapsed GLR States])
22
9501dc6e 23AT_DATA_GRAMMAR([glr-regr1.y],
09903f30
PH
24[[/* Regression Test: Improper state compression */
25/* Reported by Scott McPeak */
26
27%{
c240826c 28#include <stdio.h>
09903f30
PH
29
30#define YYSTYPE int
31static YYSTYPE exprMerge (YYSTYPE x0, YYSTYPE x1);
793a58bb
AD
32int yylex (void);
33int yyerror (char const *msg);
09903f30
PH
34%}
35
36
37%glr-parser
38
39
40/* -------- productions ------ */
41%%
42
43StartSymbol: E { $$=0; } %merge <exprMerge>
44 ;
45
46E: E 'P' E { $$=1; printf("E -> E 'P' E\n"); } %merge <exprMerge>
47 | 'B' { $$=2; printf("E -> 'B'\n"); } %merge <exprMerge>
48 ;
49
50
51
52/* ---------- C code ----------- */
53%%
54
55static YYSTYPE exprMerge (YYSTYPE x0, YYSTYPE x1)
56{
793a58bb
AD
57 (void) x0;
58 (void) x1;
09903f30
PH
59 printf ("<OR>\n");
60 return 0;
61}
62
793a58bb
AD
63int
64main (void)
09903f30 65{
b0f98b10 66 return yyparse ();
09903f30
PH
67}
68
793a58bb
AD
69int
70yyerror (char const *msg)
09903f30 71{
c240826c
PE
72 fprintf (stderr, "%s\n", msg);
73 exit (4);
09903f30
PH
74}
75
76
793a58bb
AD
77int
78yylex (void)
09903f30 79{
c240826c
PE
80 for (;;)
81 {
82 int ch = getchar ();
83 if (ch == EOF)
84 return 0;
85 else if (ch == 'B' || ch == 'P')
86 return ch;
09903f30 87 }
09903f30
PH
88}
89]])
90
91AT_CHECK([[bison -o glr-regr1.c glr-regr1.y]], 0, [],
92[glr-regr1.y: warning: 1 shift/reduce conflict
93])
94AT_COMPILE([glr-regr1])
793a58bb 95AT_CHECK([[echo BPBPB | ./glr-regr1]], 0,
09903f30
PH
96[[E -> 'B'
97E -> 'B'
98E -> E 'P' E
99E -> 'B'
100E -> E 'P' E
101E -> 'B'
102E -> E 'P' E
103E -> E 'P' E
104<OR>
105]], [])
106
107AT_CLEANUP