old-cross-binutils/gdb/testsuite/gdb.ada
Joel Brobecker 036e93dfda Set language for Ada minimal symbols.
This helps with the following issue: Given an Ada program defining
a global variable:

    package Pck is
       Watch : Integer := 1974;
    end Pck;

When printing the address of this variable, GDB also tries to print
the associated symbol name:

    (gdb) p watch'address
    $1 = (access integer) 0x6139d8 <pck__watch>
                                       ^^
                                       ||

The problem is that GDB prints the variable's linkage name, instead
of its natural name. This is because the language of the associated
minimal symbol never really gets set.

This patch adds handling for Ada symbols in symbol_find_demangled_name.
After this patch, we now get:

    (gdb) p watch'address
    $1 = (access integer) 0x6139d8 <pck.watch>
                                       ^
                                       |

gdb/ChangeLog:

        * symtab.c (symbol_find_demangled_name): Add handling of
        Ada symbols.

gdb/testsuite/ChangeLog:

        * gdb.ada/int_deref.exp: Add test verifying that we print
        the decoded symbol name when printing the address of Ada
        symbols.
2013-12-10 12:16:47 +01:00
..
aliased_array
array_bounds
array_return
array_subscript_addr
arrayidx
arrayparam
arrayptr [testsuite/Ada] Add testing of access to packed arrays. 2013-07-10 00:35:01 +00:00
atomic_enum
bad-task-bp-keyword
bp_enum_homonym
bp_on_var
bp_range_type
bp_reset
call_pn
catch_ex
char_enum
char_param
complete
cond_lang
dot_all Ada: Reserved word "all" should not need to be spelled in lowercase. 2013-12-03 16:04:26 +04:00
dyn_loc
enum_idx_packed
exec_changed
expr_delims
exprs
fixed_cmp
fixed_points
float_param [dwarf] Mark all functions as prototyped except C functions. 2013-05-20 09:45:13 +00:00
formatted_ref
frame_args
fullname_bp
fun_addr
fun_in_declare
funcall_param
homonym
info_exc gdb.ada/info_exc.exp,mi_exc_info.exp: Use more unique exception name. 2013-11-16 06:45:57 +04:00
info_locals_renaming
int_deref
interface
iwide
lang_switch
mi_catch_ex
mi_ex_cond Dandling memory pointers in Ada catchpoints with GDB/MI. 2013-11-11 19:19:07 +04:00
mi_exc_info gdb.ada/info_exc.exp,mi_exc_info.exp: Use more unique exception name. 2013-11-16 06:45:57 +04:00
mi_task_arg
mi_task_info
mod_from_name
nested
null_array
null_record
O2_float_param Fix DW_OP_GNU_regval_type with FP registers 2013-11-14 22:38:48 -05:00
operator_bp
optim_drec
packed_array
packed_tagged
print_chars
ptr_typedef
ptype_field
ptype_tagged_param
py_range Fix int() builtin with range type gdb.Value objects. 2013-11-19 06:44:40 +04:00
rdv_wait
rec_return
ref_param
ref_tick_size
same_enum
set_pckd_arr_elt
set_wstr
small_reg_param
start
str_ref_cmp
sym_print_name
taft_type
tagged
tagged_not_init
task_bp
tasks
tick_last_segv
type_coercion
unc_arr_ptr_in_var_rec
uninitialized_vars strip off +x bits on non-executable/script files 2013-12-07 02:03:03 -05:00
variant_record_packed_array
watch_arg
whatis_array_val
widewide
win_fu_syms
aliased_array.exp
array_bounds.exp
array_return.exp
array_subscript_addr.exp
arrayidx.exp
arrayparam.exp
arrayptr.exp [testsuite/Ada] Add testing of access to packed arrays. 2013-07-10 00:35:01 +00:00
assign_1.exp
atomic_enum.exp
bad-task-bp-keyword.exp
boolean_expr.exp
bp_enum_homonym.exp
bp_on_var.exp
bp_range_type.exp
bp_reset.exp
call_pn.exp
catch_ex.exp
char_enum.exp
char_param.exp
complete.exp
cond_lang.exp
dot_all.exp Ada: Reserved word "all" should not need to be spelled in lowercase. 2013-12-03 16:04:26 +04:00
dyn_loc.exp
enum_idx_packed.exp
exec_changed.exp
expr_delims.exp
exprs.exp
fixed_cmp.exp
fixed_points.exp
float_param.exp [dwarf] Mark all functions as prototyped except C functions. 2013-05-20 09:45:13 +00:00
formatted_ref.exp
frame_args.exp
fullname_bp.exp
fun_addr.exp
fun_in_declare.exp
funcall_param.exp
gnat_ada.gpr
homonym.exp
info_exc.exp gdb.ada/info_exc.exp,mi_exc_info.exp: Use more unique exception name. 2013-11-16 06:45:57 +04:00
info_locals_renaming.exp
info_types.c Fix formating in copyright headers. 2013-06-07 14:39:33 +00:00
info_types.exp simple test suite fix in gdb.ada 2013-07-16 18:52:18 +00:00
int_deref.exp Set language for Ada minimal symbols. 2013-12-10 12:16:47 +01:00
interface.exp
iwide.exp
lang_switch.exp
Makefile.in
mi_catch_ex.exp Adjust gdb.ada/mi_catch_ex.exp to use GDB/MI catch commands... 2013-10-11 13:49:36 +00:00
mi_ex_cond.exp Dandling memory pointers in Ada catchpoints with GDB/MI. 2013-11-11 19:19:07 +04:00
mi_exc_info.exp gdb.ada/info_exc.exp,mi_exc_info.exp: Use more unique exception name. 2013-11-16 06:45:57 +04:00
mi_task_arg.exp
mi_task_info.exp
mod_from_name.exp
nested.exp
null_array.exp
null_record.exp
O2_float_param.exp Fix DW_OP_GNU_regval_type with FP registers 2013-11-14 22:38:48 -05:00
operator_bp.exp
optim_drec.exp
packed_array.exp
packed_tagged.exp
print_chars.exp
print_pc.exp
ptr_typedef.exp
ptype_arith_binop.exp
ptype_field.exp
ptype_tagged_param.exp
py_range.exp Fix int() builtin with range type gdb.Value objects. 2013-11-19 06:44:40 +04:00
rdv_wait.exp
rec_return.exp
ref_param.exp
ref_tick_size.exp
same_enum.exp
set_pckd_arr_elt.exp
set_wstr.exp
small_reg_param.exp Fix FAIL: gdb.ada/small_reg_param.exp: continue to call_me 2013-07-10 00:10:37 +00:00
start.exp
str_ref_cmp.exp
sym_print_name.exp
taft_type.exp
tagged.exp
tagged_not_init.exp
task_bp.exp
tasks.exp
tick_last_segv.exp
type_coercion.exp
unc_arr_ptr_in_var_rec.exp
uninitialized_vars.exp
variant_record_packed_array.exp
watch_arg.exp
whatis_array_val.exp
widewide.exp
win_fu_syms.exp