* src/location.c, src/location.h, src/main.c, src/scan-code.l: Add some
missing #include's.
* src/scan-code.l (handle_action_dollar, handle_action_at): Rename
loc argument as it shadows a global.
* src/scan-gram.l: Remove stray comma that prevents boundary_set
invocation.
* src/.cvsignore: Add scan-code.c.
+2006-06-07 Joel E. Denny <jdenny@ces.clemson.edu>
+
+ Get Bison to build again when configured with --enable-gcc-warnings.
+ * src/location.c, src/location.h, src/main.c, src/scan-code.l: Add some
+ missing #include's.
+ * src/scan-code.l (handle_action_dollar, handle_action_at): Rename
+ loc argument as it shadows a global.
+ * src/scan-gram.l: Remove stray comma that prevents boundary_set
+ invocation.
+
+ * src/.cvsignore: Add scan-code.c.
+
2006-06-07 Akim Demaille <akim@epita.fr>
* src/scan-gram.l: Move the "add a trailing ; to actions" code
2006-06-07 Akim Demaille <akim@epita.fr>
* src/scan-gram.l: Move the "add a trailing ; to actions" code
Makefile.in
bison
revision.c
Makefile.in
bison
revision.c
scan-gram.c
scan-skel.c
yacc
scan-gram.c
scan-skel.c
yacc
#include <config.h>
#include "system.h"
#include <config.h>
#include "system.h"
#include "location.h"
location const empty_location;
#include "location.h"
location const empty_location;
#ifndef LOCATION_H_
# define LOCATION_H_
#ifndef LOCATION_H_
# define LOCATION_H_
# include "uniqstr.h"
/* A boundary between two characters. */
# include "uniqstr.h"
/* A boundary between two characters. */
#include "print_graph.h"
#include "reader.h"
#include "reduce.h"
#include "print_graph.h"
#include "reader.h"
#include "reduce.h"
#include "symtab.h"
#include "tables.h"
#include "uniqstr.h"
#include "symtab.h"
#include "tables.h"
#include "uniqstr.h"
#define code_wrap() 1
#define FLEX_PREFIX(Id) code_ ## Id
#define code_wrap() 1
#define FLEX_PREFIX(Id) code_ ## Id
#include "flex-scanner.h"
#include "reader.h"
#include "getargs.h"
#include "flex-scanner.h"
#include "reader.h"
#include "getargs.h"
#define YY_USER_ACTION location_compute (loc, &loc->end, yytext, yyleng);
#define YY_USER_ACTION location_compute (loc, &loc->end, yytext, yyleng);
-static void handle_action_dollar (char *cp, location loc);
-static void handle_action_at (char *cp, location loc);
+static void handle_action_dollar (char *cp, location dollar_loc);
+static void handle_action_at (char *cp, location at_loc);
static location the_location;
static location *loc = &the_location;
static location the_location;
static location *loc = &the_location;
`------------------------------------------------------------------*/
static void
`------------------------------------------------------------------*/
static void
-handle_action_dollar (char *text, location loc)
+handle_action_dollar (char *text, location dollar_loc)
{
const char *type_name = NULL;
char *cp = text + 1;
{
const char *type_name = NULL;
char *cp = text + 1;
if (*cp == '$')
{
if (!type_name)
if (*cp == '$')
{
if (!type_name)
- type_name = symbol_list_n_type_name_get (current_rule, loc, 0);
+ type_name = symbol_list_n_type_name_get (current_rule, dollar_loc, 0);
- complain_at (loc, _("$$ of `%s' has no declared type"),
+ complain_at (dollar_loc, _("$$ of `%s' has no declared type"),
current_rule->sym->tag);
if (!type_name)
type_name = "";
current_rule->sym->tag);
if (!type_name)
type_name = "";
if (1-n > max_left_semantic_context)
max_left_semantic_context = 1-n;
if (!type_name && n > 0)
if (1-n > max_left_semantic_context)
max_left_semantic_context = 1-n;
if (!type_name && n > 0)
- type_name = symbol_list_n_type_name_get (current_rule, loc, n);
+ type_name =
+ symbol_list_n_type_name_get (current_rule, dollar_loc, n);
- complain_at (loc, _("$%d of `%s' has no declared type"),
+ complain_at (dollar_loc, _("$%d of `%s' has no declared type"),
n, current_rule->sym->tag);
if (!type_name)
type_name = "";
n, current_rule->sym->tag);
if (!type_name)
type_name = "";
symbol_list_n_used_set (current_rule, n, true);
}
else
symbol_list_n_used_set (current_rule, n, true);
}
else
- complain_at (loc, _("integer out of range: %s"), quote (text));
+ complain_at (dollar_loc, _("integer out of range: %s"), quote (text));
`------------------------------------------------------*/
static void
`------------------------------------------------------*/
static void
-handle_action_at (char *text, location loc)
+handle_action_at (char *text, location at_loc)
{
char *cp = text + 1;
int rule_length = symbol_list_length (current_rule->next);
{
char *cp = text + 1;
int rule_length = symbol_list_length (current_rule->next);
- complain_at (loc, _("integer out of range: %s"), quote (text));
+ complain_at (at_loc, _("integer out of range: %s"), quote (text));
lineno = INT_MAX;
}
current_file = uniqstr_new (file);
lineno = INT_MAX;
}
current_file = uniqstr_new (file);
- boundary_set, (&scanner_cursor, current_file, lineno, 1);
+ boundary_set (&scanner_cursor, current_file, lineno, 1);