From 270140bd2556ce2b0b9c32ecb31e1dcb3fc1887a Mon Sep 17 00:00:00 2001 From: Tom Tromey Date: Mon, 3 Dec 2012 19:59:14 +0000 Subject: * 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) : Now const. * breakpoint.c (watch_command_1): Update. * breakpoint.h (struct watchpoint) : Now const. * c-exp.y (classify_inner_name, classify_name): Make block argument const. * expprint.c (print_subexp_standard) : Make 'b' const. * expression.h (innermost_block, parse_exp_1): Update. (union exp_element) : 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) : 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) : Now const. --- gdb/ada-lang.c | 14 +++++++------- 1 file changed, 7 insertions(+), 7 deletions(-) (limited to 'gdb/ada-lang.c') diff --git a/gdb/ada-lang.c b/gdb/ada-lang.c index deefcfb..b03b2a2 100644 --- a/gdb/ada-lang.c +++ b/gdb/ada-lang.c @@ -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; -- cgit v1.1