* ada-exp.y (write_object_renaming, write_var_or_type)

(write_ambiguous_var, write_var_from_sym): Make blocks const.
	* ada-lang.c (replace_operator_with_call)
	(find_old_style_renaming_symbol): Make blocks const.
	* ada-lang.h (ada_find_renaming_symbol): Update.
	(struct ada_symbol_info) <block>: Now const.
	* breakpoint.c (watch_command_1): Update.
	* breakpoint.h (struct watchpoint) <exp_valid_block,
	cond_exp_valid_block>: Now const.
	* c-exp.y (classify_inner_name, classify_name): Make block
	argument const.
	* expprint.c (print_subexp_standard) <OP_VAR_VALUE>: Make 'b'
	const.
	* expression.h (innermost_block, parse_exp_1): Update.
	(union exp_element) <block>: Now const.
	* gdbtypes.c (lookup_template_type, lookup_enum, lookup_union)
	(lookup_struct): Make block argument const.
	* gdbtypes.h (lookup_template_type): Update.
	* go-exp.y (classify_name, classify_packaged_name)
	(package_name_p): Make block argument const.
	* objc-lang.c (lookup_struct_typedef): Make block argument const.
	* objc-lang.h (lookup_struct_typedef): Update.
	* parse.c (parse_exp_in_context, parse_exp_1)
	(write_exp_elt_block): Make block arguments const.
	(expression_context_block, innermost_block): Now const.
	* parser-defs.h (write_exp_elt_block): Update.
	(expression_context_block, innermost_block, block_found): Now
	const.
	* printcmd.c (struct display) <block>: Now const.
	* symtab.h (lookup_struct, lookup_union, lookup_enum): Update.
	* valops.c (address_of_variable): Make block argument const.
	* value.h (value_of_variable): Update.
	* varobj.c (struct varobj_root) <valid_block>: Now const.
This commit is contained in:
Tom Tromey 2012-12-03 19:59:14 +00:00
parent e6aea42dfa
commit 270140bd25
22 changed files with 93 additions and 54 deletions

View file

@ -128,7 +128,7 @@ static struct value *resolve_subexp (struct expression **, int *, int,
struct type *);
static void replace_operator_with_call (struct expression **, int, int, int,
struct symbol *, struct block *);
struct symbol *, const struct block *);
static int possible_user_operator_p (enum exp_opcode, struct value **);
@ -150,7 +150,7 @@ static enum ada_renaming_category parse_old_style_renaming (struct type *,
const char **);
static struct symbol *find_old_style_renaming_symbol (const char *,
struct block *);
const struct block *);
static struct type *ada_lookup_struct_elt_type (struct type *, char *,
int, int, int *);
@ -3719,7 +3719,7 @@ get_selections (int *choices, int n_choices, int max_results,
static void
replace_operator_with_call (struct expression **expp, int pc, int nargs,
int oplen, struct symbol *sym,
struct block *block)
const struct block *block)
{
/* A new expression, with 6 more elements (3 for funcall, 4 for function
symbol, -oplen for operator being replaced). */
@ -4232,7 +4232,7 @@ lookup_cached_symbol (const char *name, domain_enum namespace,
static void
cache_symbol (const char *name, domain_enum namespace, struct symbol *sym,
struct block *block)
const struct block *block)
{
}
@ -4805,7 +4805,7 @@ remove_irrelevant_renamings (struct ada_symbol_info *syms,
for (i = 0; i < nsyms; i += 1)
{
struct symbol *sym = syms[i].sym;
struct block *block = syms[i].block;
const struct block *block = syms[i].block;
const char *name;
const char *suffix;
@ -7195,7 +7195,7 @@ ada_find_any_type (const char *name)
Return symbol if found, and NULL otherwise. */
struct symbol *
ada_find_renaming_symbol (struct symbol *name_sym, struct block *block)
ada_find_renaming_symbol (struct symbol *name_sym, const struct block *block)
{
const char *name = SYMBOL_LINKAGE_NAME (name_sym);
struct symbol *sym;
@ -7217,7 +7217,7 @@ ada_find_renaming_symbol (struct symbol *name_sym, struct block *block)
}
static struct symbol *
find_old_style_renaming_symbol (const char *name, struct block *block)
find_old_style_renaming_symbol (const char *name, const struct block *block)
{
const struct symbol *function_sym = block_linkage_function (block);
char *rename;