From 81250fdaf47c574877341882df11e1c147e2bac4 Mon Sep 17 00:00:00 2001 From: Ulrich Weigand Date: Tue, 30 Oct 2007 21:39:15 +0000 Subject: [PATCH] 2007-10-30 Markus Deuling * ada-lang.c (ada_language_arch_info): Replace current_gdbarch by gdbarch. --- gdb/ChangeLog | 5 +++++ gdb/ada-lang.c | 24 ++++++++++++------------ 2 files changed, 17 insertions(+), 12 deletions(-) diff --git a/gdb/ChangeLog b/gdb/ChangeLog index 20aba85d20..07301396b8 100644 --- a/gdb/ChangeLog +++ b/gdb/ChangeLog @@ -1,3 +1,8 @@ +2007-10-30 Markus Deuling + + * ada-lang.c (ada_language_arch_info): Replace current_gdbarch by + gdbarch. + 2007-10-30 Daniel Jacobowitz * ppc-sysv-tdep.c (ppc_sysv_abi_push_dummy_call): Check the selected diff --git a/gdb/ada-lang.c b/gdb/ada-lang.c index 04135fe48c..53f32f27ca 100644 --- a/gdb/ada-lang.c +++ b/gdb/ada-lang.c @@ -10327,24 +10327,24 @@ enum ada_primitive_types { }; static void -ada_language_arch_info (struct gdbarch *current_gdbarch, +ada_language_arch_info (struct gdbarch *gdbarch, struct language_arch_info *lai) { - const struct builtin_type *builtin = builtin_type (current_gdbarch); + const struct builtin_type *builtin = builtin_type (gdbarch); lai->primitive_type_vector - = GDBARCH_OBSTACK_CALLOC (current_gdbarch, nr_ada_primitive_types + 1, + = GDBARCH_OBSTACK_CALLOC (gdbarch, nr_ada_primitive_types + 1, struct type *); lai->primitive_type_vector [ada_primitive_type_int] = init_type (TYPE_CODE_INT, - gdbarch_int_bit (current_gdbarch) / TARGET_CHAR_BIT, + gdbarch_int_bit (gdbarch) / TARGET_CHAR_BIT, 0, "integer", (struct objfile *) NULL); lai->primitive_type_vector [ada_primitive_type_long] = init_type (TYPE_CODE_INT, - gdbarch_long_bit (current_gdbarch) / TARGET_CHAR_BIT, + gdbarch_long_bit (gdbarch) / TARGET_CHAR_BIT, 0, "long_integer", (struct objfile *) NULL); lai->primitive_type_vector [ada_primitive_type_short] = init_type (TYPE_CODE_INT, - gdbarch_short_bit (current_gdbarch) / TARGET_CHAR_BIT, + gdbarch_short_bit (gdbarch) / TARGET_CHAR_BIT, 0, "short_integer", (struct objfile *) NULL); lai->string_char_type = lai->primitive_type_vector [ada_primitive_type_char] = @@ -10352,27 +10352,27 @@ ada_language_arch_info (struct gdbarch *current_gdbarch, 0, "character", (struct objfile *) NULL); lai->primitive_type_vector [ada_primitive_type_float] = init_type (TYPE_CODE_FLT, - gdbarch_float_bit (current_gdbarch)/ TARGET_CHAR_BIT, + gdbarch_float_bit (gdbarch)/ TARGET_CHAR_BIT, 0, "float", (struct objfile *) NULL); lai->primitive_type_vector [ada_primitive_type_double] = init_type (TYPE_CODE_FLT, - gdbarch_double_bit (current_gdbarch) / TARGET_CHAR_BIT, + gdbarch_double_bit (gdbarch) / TARGET_CHAR_BIT, 0, "long_float", (struct objfile *) NULL); lai->primitive_type_vector [ada_primitive_type_long_long] = init_type (TYPE_CODE_INT, - gdbarch_long_long_bit (current_gdbarch) / TARGET_CHAR_BIT, + gdbarch_long_long_bit (gdbarch) / TARGET_CHAR_BIT, 0, "long_long_integer", (struct objfile *) NULL); lai->primitive_type_vector [ada_primitive_type_long_double] = init_type (TYPE_CODE_FLT, - gdbarch_double_bit (current_gdbarch) / TARGET_CHAR_BIT, + gdbarch_double_bit (gdbarch) / TARGET_CHAR_BIT, 0, "long_long_float", (struct objfile *) NULL); lai->primitive_type_vector [ada_primitive_type_natural] = init_type (TYPE_CODE_INT, - gdbarch_int_bit (current_gdbarch) / TARGET_CHAR_BIT, + gdbarch_int_bit (gdbarch) / TARGET_CHAR_BIT, 0, "natural", (struct objfile *) NULL); lai->primitive_type_vector [ada_primitive_type_positive] = init_type (TYPE_CODE_INT, - gdbarch_int_bit (current_gdbarch) / TARGET_CHAR_BIT, + gdbarch_int_bit (gdbarch) / TARGET_CHAR_BIT, 0, "positive", (struct objfile *) NULL); lai->primitive_type_vector [ada_primitive_type_void] = builtin->builtin_void; -- 2.11.0