/* Reported by S. Eken */
%{
- #define YYSTYPE char const *
- #define yyfalse 0
- #define yytrue 1
+ #define YYSTYPE char *
#include <ctype.h>
#include <stdio.h>
's' var 't'
{ printf ("Variable: '%s'\n", $2); }
'v' 'x' 'q'
+ { free ($2); }
| 's' var_list 't' 'e'
- { printf ("Varlist: '%s'\n", $2); }
+ { printf ("Varlist: '%s'\n", $2); free ($2); }
| 's' var 't' var_printer 'x'
+ { free ($2); }
;
var:
{ $$ = $1; }
| var ',' var_list
{
- char *s = (char *) malloc (strlen ($1) + 1 + strlen ($3) + 1);
- strcpy (s, $1);
+ char *s = (char *) realloc ($1, strlen ($1) + 1 + strlen ($3) + 1);
strcat (s, ",");
strcat (s, $3);
+ free ($3);
$$ = s;
}
;
%%
-FILE *yyin = NULL;
+FILE *input = NULL;
int
yylex (void)
{
char buf[50];
char *s;
- switch (fscanf (yyin, " %1[a-z,]", buf)) {
+ switch (fscanf (input, " %1[a-z,]", buf)) {
case 1:
return buf[0];
case EOF:
default:
break;
}
- if (fscanf (yyin, "%49s", buf) != 1)
+ if (fscanf (input, "%49s", buf) != 1)
return 0;
if (sizeof buf - 1 <= strlen (buf))
abort ();
int
main (int argc, char **argv)
{
- yyin = stdin;
- if (argc == 2 && !(yyin = fopen (argv[1], "r"))) return 3;
+ input = stdin;
+ if (argc == 2 && !(input = fopen (argv[1], "r"))) return 3;
return yyparse ();
}
]])
fprintf(stderr,"error: %s\n",s);
}
-FILE *yyin = NULL;
+FILE *input = NULL;
int P[] = { P1, P2 };
int O[] = { O1, O2 };
int yylex (void)
{
char inp[3];
- if (fscanf (yyin, "%2s", inp) == EOF)
+ if (fscanf (input, "%2s", inp) == EOF)
return 0;
switch (inp[0])
{
}
int main(int argc, char* argv[]) {
- yyin = stdin;
- if (argc == 2 && !(yyin = fopen (argv[1], "r"))) return 3;
+ input = stdin;
+ if (argc == 2 && !(input = fopen (argv[1], "r"))) return 3;
return yyparse ();
}
]])
static int
yylex (void)
{
- yylval.count = malloc (sizeof (int));
+ yylval.count = (int *) malloc (sizeof (int));
if (!yylval.count)
{
fprintf (stderr, "Test inconclusive.\n");
])
AT_COMPILE([glr-regr7])
-AT_CHECK([[exit 77; ./glr-regr7]], 2, [],
+AT_CHECK([[./glr-regr7]], 2, [],
+[memory exhausted
+])
+
+AT_CLEANUP
+
+
+## ------------------------------------------------------------------------- ##
+## Incorrect default location for empty right-hand sides. Adapted from bug ##
+## report by Claudia Hermann. ##
+## See http://lists.gnu.org/archive/html/bug-bison/2005-10/msg00069.html and ##
+## http://lists.gnu.org/archive/html/bug-bison/2005-10/msg00072.html ##
+## ------------------------------------------------------------------------- ##
+
+AT_SETUP([Incorrectly initialized location for empty right-hand side in GLR])
+
+AT_DATA_GRAMMAR([glr-regr8.y],
+[[
+%{
+ #include <stdio.h>
+ #include <stdlib.h>
+ static void yyerror (char const *);
+ static int yylex (void);
+ static void yyerror(const char *msg);
+%}
+
+%token T_CONSTANT
+%token T_PORT
+%token T_SIGNAL
+
+%glr-parser
+
+%%
+
+
+PortClause : T_PORT InterfaceDeclaration T_PORT
+ { printf("%d/%d - %d/%d - %d/%d\n",
+ @1.first_column, @1.last_column,
+ @2.first_column, @2.last_column,
+ @3.first_column, @3.last_column); }
+ ;
+
+InterfaceDeclaration : OptConstantWord %dprec 1
+ | OptSignalWord %dprec 2
+ ;
+
+OptConstantWord : /* empty */
+ | T_CONSTANT
+ ;
+
+OptSignalWord : /* empty */
+ { printf("empty: %d/%d\n", @$.first_column, @$.last_column); }
+ | T_SIGNAL
+ ;
+
+%%
+
+void yyerror(const char *msg)
+{
+ fprintf (stderr, "error\n");
+}
+
+static int lexIndex;
+
+int yylex (void)
+{
+ lexIndex += 1;
+ switch (lexIndex)
+ {
+ case 1:
+ yylloc.first_column = 1;
+ yylloc.last_column = 9;
+ return T_PORT;
+ case 2:
+ yylloc.first_column = 13;
+ yylloc.last_column = 17;
+ return T_PORT;
+ default:
+ return 0;
+ }
+}
+
+int
+main (void)
+{
+ yyparse();
+ return 0;
+}
+]])
+
+AT_CHECK([[bison -o glr-regr8.c glr-regr8.y]], 0, [],
+[glr-regr8.y: conflicts: 1 reduce/reduce
+])
+AT_COMPILE([glr-regr8])
+
+AT_CHECK([[./glr-regr8]], 0,
+[empty: 9/9
+1/9 - 9/9 - 13/17
+],
+[])
+
+AT_CLEANUP
+
+
+## ------------------------------------------------------------------------- ##
+## No users destructors if stack 0 deleted ##
+## Thanks to Joel E. Denny for this test; see ##
+## <http://lists.gnu.org/archive/html/bison-patches/2005-09/msg00109.html>. ##
+## ------------------------------------------------------------------------- ##
+
+AT_SETUP([No users destructors if stack 0 deleted])
+
+AT_DATA_GRAMMAR([glr-regr9.y],
+[[
+%{
+# include <stdio.h>
+# include <stdlib.h>
+ static void yyerror (char const *);
+ static int yylex (void);
+# define YYSTACKEXPANDABLE 0
+ static int tokens = 0;
+ static int destructors = 0;
+# define USE(Var)
+%}
+
+%glr-parser
+%union { int dummy; }
+%type <dummy> 'a'
+
+%destructor {
+ destructors += 1;
+} 'a'
+
+%%
+
+start:
+ ambig0 'a' { destructors += 2; USE ($2); }
+ | ambig1 start { destructors += 1; }
+ | ambig2 start { destructors += 1; }
+ ;
+
+ambig0: 'a' ;
+ambig1: 'a' ;
+ambig2: 'a' ;
+
+%%
+
+static int
+yylex (void)
+{
+ tokens += 1;
+ return 'a';
+}
+
+static void
+yyerror (char const *msg)
+{
+ fprintf (stderr, "%s\n", msg);
+}
+
+int
+main (void)
+{
+ int exit_status;
+ exit_status = yyparse ();
+ if (tokens != destructors)
+ {
+ fprintf (stderr, "Tokens = %d, Destructors = %d\n", tokens, destructors);
+ return 1;
+ }
+ return !exit_status;
+}
+]])
+
+AT_CHECK([[bison -o glr-regr9.c glr-regr9.y]], 0, [],
+[glr-regr9.y: conflicts: 1 reduce/reduce
+])
+AT_COMPILE([glr-regr9])
+
+AT_CHECK([[./glr-regr9]], 0, [],
[memory exhausted
])
projects / bison.git / blobdiff