From 7a82e90312d7a474f773fbcc58f6f215cacd945f Mon Sep 17 00:00:00 2001 From: Pedro Alves Date: Thu, 13 Aug 2020 17:34:21 +0100 Subject: [PATCH] Add skip_ada_tests to more Ada testcases This adds missing skip_ada_tests checks to Ada testcases, using the exact same pattern the existing files that do check it use. gdb/testsuite/ChangeLog: * gdb.ada/access_tagged_param.exp: Check skip_ada_tests. * gdb.ada/access_to_packed_array.exp: Likewise. * gdb.ada/access_to_unbounded_array.exp: Likewise. * gdb.ada/addr_arith.exp: Likewise. * gdb.ada/arr_acc_idx_w_gap.exp: Likewise. * gdb.ada/arr_arr.exp: Likewise. * gdb.ada/arr_enum_idx_w_gap.exp: Likewise. * gdb.ada/array_bounds.exp: Likewise. * gdb.ada/array_of_variable_length.exp: Likewise. * gdb.ada/array_ptr_renaming.exp: Likewise. * gdb.ada/array_subscript_addr.exp: Likewise. * gdb.ada/arraydim.exp: Likewise. * gdb.ada/arrayparam.exp: Likewise. * gdb.ada/arrayptr.exp: Likewise. * gdb.ada/assign_1.exp: Likewise. * gdb.ada/assign_arr.exp: Likewise. * gdb.ada/atomic_enum.exp: Likewise. * gdb.ada/attr_ref_and_charlit.exp: Likewise. * gdb.ada/bad-task-bp-keyword.exp: Likewise. * gdb.ada/bias.exp: Likewise. * gdb.ada/boolean_expr.exp: Likewise. * gdb.ada/bp_c_mixed_case.exp: Likewise. * gdb.ada/bp_enum_homonym.exp: Likewise. * gdb.ada/bp_inlined_func.exp: Likewise. * gdb.ada/bp_on_var.exp: Likewise. * gdb.ada/bp_range_type.exp: Likewise. * gdb.ada/bp_reset.exp: Likewise. * gdb.ada/call_pn.exp: Likewise. * gdb.ada/catch_assert_if.exp: Likewise. * gdb.ada/catch_ex.exp: Likewise. * gdb.ada/catch_ex_std.exp: Likewise. * gdb.ada/char_enum.exp: Likewise. * gdb.ada/char_param.exp: Likewise. * gdb.ada/complete.exp: Likewise. * gdb.ada/cond_lang.exp: Likewise. * gdb.ada/convvar_comp.exp: Likewise. * gdb.ada/dgopt.exp: Likewise. * gdb.ada/disc_arr_bound.exp: Likewise. * gdb.ada/display_nested.exp: Likewise. * gdb.ada/dot_all.exp: Likewise. * gdb.ada/dyn_loc.exp: Likewise. * gdb.ada/dyn_stride.exp: Likewise. * gdb.ada/excep_handle.exp: Likewise. * gdb.ada/expr_delims.exp: Likewise. * gdb.ada/expr_with_funcall.exp: Likewise. * gdb.ada/exprs.exp: Likewise. * gdb.ada/fin_fun_out.exp: Likewise. * gdb.ada/fixed_cmp.exp: Likewise. * gdb.ada/formatted_ref.exp: Likewise. * gdb.ada/frame_arg_lang.exp: Likewise. * gdb.ada/frame_args.exp: Likewise. * gdb.ada/fullname_bp.exp: Likewise. * gdb.ada/fun_addr.exp: Likewise. * gdb.ada/fun_in_declare.exp: Likewise. * gdb.ada/fun_overload_menu.exp: Likewise. * gdb.ada/fun_renaming.exp: Likewise. * gdb.ada/funcall_char.exp: Likewise. * gdb.ada/funcall_param.exp: Likewise. * gdb.ada/funcall_ptr.exp: Likewise. * gdb.ada/funcall_ref.exp: Likewise. * gdb.ada/homonym.exp: Likewise. * gdb.ada/info_addr_mixed_case.exp: Likewise. * gdb.ada/info_auto_lang.exp: Likewise. * gdb.ada/info_exc.exp: Likewise. * gdb.ada/info_types.exp: Likewise. * gdb.ada/int_deref.exp: Likewise. * gdb.ada/interface.exp: Likewise. * gdb.ada/iwide.exp: Likewise. * gdb.ada/lang_switch.exp: Likewise. * gdb.ada/length_cond.exp: Likewise. * gdb.ada/maint_with_ada.exp: Likewise. * gdb.ada/mi_catch_assert.exp: Likewise. * gdb.ada/mi_catch_ex.exp: Likewise. * gdb.ada/mi_catch_ex_hand.exp: Likewise. * gdb.ada/mi_dyn_arr.exp: Likewise. * gdb.ada/mi_ex_cond.exp: Likewise. * gdb.ada/mi_exc_info.exp: Likewise. * gdb.ada/mi_interface.exp: Likewise. * gdb.ada/mi_prot.exp: Likewise. * gdb.ada/mi_ref_changeable.exp: Likewise. * gdb.ada/mi_string_access.exp: Likewise. * gdb.ada/mi_task_arg.exp: Likewise. * gdb.ada/mi_task_info.exp: Likewise. * gdb.ada/mi_var_array.exp: Likewise. * gdb.ada/mi_var_union.exp: Likewise. * gdb.ada/mi_variant.exp: Likewise. * gdb.ada/minsyms.exp: Likewise. * gdb.ada/mod_from_name.exp: Likewise. * gdb.ada/nested.exp: Likewise. * gdb.ada/null_array.exp: Likewise. * gdb.ada/optim_drec.exp: Likewise. * gdb.ada/out_of_line_in_inlined.exp: Likewise. * gdb.ada/packed_array_assign.exp: Likewise. * gdb.ada/packed_tagged.exp: Likewise. * gdb.ada/pp-rec-component.exp: Likewise. * gdb.ada/print_chars.exp: Likewise. * gdb.ada/print_pc.exp: Likewise. * gdb.ada/ptr_typedef.exp: Likewise. * gdb.ada/ptype_arith_binop.exp: Likewise. * gdb.ada/ptype_array.exp: Likewise. * gdb.ada/ptype_field.exp: Likewise. * gdb.ada/ptype_tagged_param.exp: Likewise. * gdb.ada/ptype_union.exp: Likewise. * gdb.ada/py_range.exp: Likewise. * gdb.ada/py_taft.exp: Likewise. * gdb.ada/rdv_wait.exp: Likewise. * gdb.ada/rec_comp.exp: Likewise. * gdb.ada/rec_return.exp: Likewise. * gdb.ada/ref_param.exp: Likewise. * gdb.ada/ref_tick_size.exp: Likewise. * gdb.ada/rename_subscript_param.exp: Likewise. * gdb.ada/repeat_dyn.exp: Likewise. * gdb.ada/same_component_name.exp: Likewise. * gdb.ada/same_enum.exp: Likewise. * gdb.ada/scalar_storage.exp: Likewise. * gdb.ada/set_wstr.exp: Likewise. * gdb.ada/small_reg_param.exp: Likewise. * gdb.ada/str_binop_equal.exp: Likewise. * gdb.ada/str_ref_cmp.exp: Likewise. * gdb.ada/str_uninit.exp: Likewise. * gdb.ada/sub_variant.exp: Likewise. * gdb.ada/sym_print_name.exp: Likewise. * gdb.ada/taft_type.exp: Likewise. * gdb.ada/tagged.exp: Likewise. * gdb.ada/tagged_access.exp: Likewise. * gdb.ada/task_bp.exp: Likewise. * gdb.ada/task_switch_in_core.exp: Likewise. * gdb.ada/tasks.exp: Likewise. * gdb.ada/tick_last_segv.exp: Likewise. * gdb.ada/tick_length_array_enum_idx.exp: Likewise. * gdb.ada/type_coercion.exp: Likewise. * gdb.ada/unc_arr_ptr_in_var_rec.exp: Likewise. * gdb.ada/unchecked_union.exp: Likewise. * gdb.ada/uninitialized_vars.exp: Likewise. * gdb.ada/var_arr_attrs.exp: Likewise. * gdb.ada/var_arr_typedef.exp: Likewise. * gdb.ada/var_rec_arr.exp: Likewise. * gdb.ada/variant-record.exp: Likewise. * gdb.ada/variant.exp: Likewise. * gdb.ada/variant_record_packed_array.exp: Likewise. * gdb.ada/varsize_limit.exp: Likewise. * gdb.ada/whatis_array_val.exp: Likewise. * gdb.ada/widewide.exp: Likewise. * gdb.ada/win_fu_syms.exp: Likewise. --- gdb/testsuite/ChangeLog | 149 +++++++++++++++++- gdb/testsuite/gdb.ada/access_tagged_param.exp | 2 + .../gdb.ada/access_to_packed_array.exp | 2 + .../gdb.ada/access_to_unbounded_array.exp | 2 + gdb/testsuite/gdb.ada/addr_arith.exp | 2 + gdb/testsuite/gdb.ada/arr_acc_idx_w_gap.exp | 2 + gdb/testsuite/gdb.ada/arr_arr.exp | 2 + gdb/testsuite/gdb.ada/arr_enum_idx_w_gap.exp | 2 + gdb/testsuite/gdb.ada/array_bounds.exp | 2 + .../gdb.ada/array_of_variable_length.exp | 2 + gdb/testsuite/gdb.ada/array_ptr_renaming.exp | 2 + .../gdb.ada/array_subscript_addr.exp | 2 + gdb/testsuite/gdb.ada/arraydim.exp | 2 + gdb/testsuite/gdb.ada/arrayparam.exp | 2 + gdb/testsuite/gdb.ada/arrayptr.exp | 2 + gdb/testsuite/gdb.ada/assign_1.exp | 2 + gdb/testsuite/gdb.ada/assign_arr.exp | 2 + gdb/testsuite/gdb.ada/atomic_enum.exp | 2 + .../gdb.ada/attr_ref_and_charlit.exp | 2 + gdb/testsuite/gdb.ada/bad-task-bp-keyword.exp | 2 + gdb/testsuite/gdb.ada/bias.exp | 2 + gdb/testsuite/gdb.ada/boolean_expr.exp | 2 + gdb/testsuite/gdb.ada/bp_c_mixed_case.exp | 2 + gdb/testsuite/gdb.ada/bp_enum_homonym.exp | 2 + gdb/testsuite/gdb.ada/bp_inlined_func.exp | 2 + gdb/testsuite/gdb.ada/bp_on_var.exp | 2 + gdb/testsuite/gdb.ada/bp_range_type.exp | 2 + gdb/testsuite/gdb.ada/bp_reset.exp | 2 + gdb/testsuite/gdb.ada/call_pn.exp | 2 + gdb/testsuite/gdb.ada/catch_assert_if.exp | 2 + gdb/testsuite/gdb.ada/catch_ex.exp | 2 + gdb/testsuite/gdb.ada/catch_ex_std.exp | 2 + gdb/testsuite/gdb.ada/char_enum.exp | 2 + gdb/testsuite/gdb.ada/char_param.exp | 2 + gdb/testsuite/gdb.ada/complete.exp | 2 + gdb/testsuite/gdb.ada/cond_lang.exp | 2 + gdb/testsuite/gdb.ada/convvar_comp.exp | 2 + gdb/testsuite/gdb.ada/dgopt.exp | 2 + gdb/testsuite/gdb.ada/disc_arr_bound.exp | 2 + gdb/testsuite/gdb.ada/display_nested.exp | 2 + gdb/testsuite/gdb.ada/dot_all.exp | 2 + gdb/testsuite/gdb.ada/dyn_loc.exp | 2 + gdb/testsuite/gdb.ada/dyn_stride.exp | 2 + gdb/testsuite/gdb.ada/excep_handle.exp | 2 + gdb/testsuite/gdb.ada/expr_delims.exp | 2 + gdb/testsuite/gdb.ada/expr_with_funcall.exp | 2 + gdb/testsuite/gdb.ada/exprs.exp | 2 + gdb/testsuite/gdb.ada/fin_fun_out.exp | 2 + gdb/testsuite/gdb.ada/fixed_cmp.exp | 2 + gdb/testsuite/gdb.ada/formatted_ref.exp | 2 + gdb/testsuite/gdb.ada/frame_arg_lang.exp | 2 + gdb/testsuite/gdb.ada/frame_args.exp | 2 + gdb/testsuite/gdb.ada/fullname_bp.exp | 2 + gdb/testsuite/gdb.ada/fun_addr.exp | 2 + gdb/testsuite/gdb.ada/fun_in_declare.exp | 2 + gdb/testsuite/gdb.ada/fun_overload_menu.exp | 2 + gdb/testsuite/gdb.ada/fun_renaming.exp | 2 + gdb/testsuite/gdb.ada/funcall_char.exp | 2 + gdb/testsuite/gdb.ada/funcall_param.exp | 2 + gdb/testsuite/gdb.ada/funcall_ptr.exp | 2 + gdb/testsuite/gdb.ada/funcall_ref.exp | 2 + gdb/testsuite/gdb.ada/homonym.exp | 2 + .../gdb.ada/info_addr_mixed_case.exp | 2 + gdb/testsuite/gdb.ada/info_auto_lang.exp | 2 + gdb/testsuite/gdb.ada/info_exc.exp | 2 + gdb/testsuite/gdb.ada/info_types.exp | 2 + gdb/testsuite/gdb.ada/int_deref.exp | 2 + gdb/testsuite/gdb.ada/interface.exp | 2 + gdb/testsuite/gdb.ada/iwide.exp | 2 + gdb/testsuite/gdb.ada/lang_switch.exp | 2 + gdb/testsuite/gdb.ada/length_cond.exp | 2 + gdb/testsuite/gdb.ada/maint_with_ada.exp | 2 + gdb/testsuite/gdb.ada/mi_catch_assert.exp | 2 + gdb/testsuite/gdb.ada/mi_catch_ex.exp | 2 + gdb/testsuite/gdb.ada/mi_catch_ex_hand.exp | 2 + gdb/testsuite/gdb.ada/mi_dyn_arr.exp | 2 + gdb/testsuite/gdb.ada/mi_ex_cond.exp | 2 + gdb/testsuite/gdb.ada/mi_exc_info.exp | 2 + gdb/testsuite/gdb.ada/mi_interface.exp | 2 + gdb/testsuite/gdb.ada/mi_prot.exp | 2 + gdb/testsuite/gdb.ada/mi_ref_changeable.exp | 2 + gdb/testsuite/gdb.ada/mi_string_access.exp | 2 + gdb/testsuite/gdb.ada/mi_task_arg.exp | 2 + gdb/testsuite/gdb.ada/mi_task_info.exp | 2 + gdb/testsuite/gdb.ada/mi_var_array.exp | 2 + gdb/testsuite/gdb.ada/mi_var_union.exp | 2 + gdb/testsuite/gdb.ada/mi_variant.exp | 2 + gdb/testsuite/gdb.ada/minsyms.exp | 2 + gdb/testsuite/gdb.ada/mod_from_name.exp | 2 + gdb/testsuite/gdb.ada/nested.exp | 2 + gdb/testsuite/gdb.ada/null_array.exp | 2 + gdb/testsuite/gdb.ada/optim_drec.exp | 2 + .../gdb.ada/out_of_line_in_inlined.exp | 2 + gdb/testsuite/gdb.ada/packed_array_assign.exp | 2 + gdb/testsuite/gdb.ada/packed_tagged.exp | 2 + gdb/testsuite/gdb.ada/pp-rec-component.exp | 2 + gdb/testsuite/gdb.ada/print_chars.exp | 2 + gdb/testsuite/gdb.ada/print_pc.exp | 2 + gdb/testsuite/gdb.ada/ptr_typedef.exp | 2 + gdb/testsuite/gdb.ada/ptype_arith_binop.exp | 2 + gdb/testsuite/gdb.ada/ptype_array.exp | 2 + gdb/testsuite/gdb.ada/ptype_field.exp | 2 + gdb/testsuite/gdb.ada/ptype_tagged_param.exp | 2 + gdb/testsuite/gdb.ada/ptype_union.exp | 2 + gdb/testsuite/gdb.ada/py_range.exp | 2 + gdb/testsuite/gdb.ada/py_taft.exp | 2 + gdb/testsuite/gdb.ada/rdv_wait.exp | 2 + gdb/testsuite/gdb.ada/rec_comp.exp | 2 + gdb/testsuite/gdb.ada/rec_return.exp | 2 + gdb/testsuite/gdb.ada/ref_param.exp | 2 + gdb/testsuite/gdb.ada/ref_tick_size.exp | 2 + .../gdb.ada/rename_subscript_param.exp | 2 + gdb/testsuite/gdb.ada/repeat_dyn.exp | 2 + gdb/testsuite/gdb.ada/same_component_name.exp | 2 + gdb/testsuite/gdb.ada/same_enum.exp | 2 + gdb/testsuite/gdb.ada/scalar_storage.exp | 2 + gdb/testsuite/gdb.ada/set_wstr.exp | 2 + gdb/testsuite/gdb.ada/small_reg_param.exp | 2 + gdb/testsuite/gdb.ada/str_binop_equal.exp | 2 + gdb/testsuite/gdb.ada/str_ref_cmp.exp | 2 + gdb/testsuite/gdb.ada/str_uninit.exp | 2 + gdb/testsuite/gdb.ada/sub_variant.exp | 2 + gdb/testsuite/gdb.ada/sym_print_name.exp | 2 + gdb/testsuite/gdb.ada/taft_type.exp | 2 + gdb/testsuite/gdb.ada/tagged.exp | 2 + gdb/testsuite/gdb.ada/tagged_access.exp | 2 + gdb/testsuite/gdb.ada/task_bp.exp | 2 + gdb/testsuite/gdb.ada/task_switch_in_core.exp | 2 + gdb/testsuite/gdb.ada/tasks.exp | 2 + gdb/testsuite/gdb.ada/tick_last_segv.exp | 2 + .../gdb.ada/tick_length_array_enum_idx.exp | 2 + gdb/testsuite/gdb.ada/type_coercion.exp | 2 + .../gdb.ada/unc_arr_ptr_in_var_rec.exp | 2 + gdb/testsuite/gdb.ada/unchecked_union.exp | 2 + gdb/testsuite/gdb.ada/uninitialized_vars.exp | 2 + gdb/testsuite/gdb.ada/var_arr_attrs.exp | 2 + gdb/testsuite/gdb.ada/var_arr_typedef.exp | 2 + gdb/testsuite/gdb.ada/var_rec_arr.exp | 2 + gdb/testsuite/gdb.ada/variant-record.exp | 2 + gdb/testsuite/gdb.ada/variant.exp | 2 + .../gdb.ada/variant_record_packed_array.exp | 2 + gdb/testsuite/gdb.ada/varsize_limit.exp | 2 + gdb/testsuite/gdb.ada/whatis_array_val.exp | 2 + gdb/testsuite/gdb.ada/widewide.exp | 2 + gdb/testsuite/gdb.ada/win_fu_syms.exp | 2 + 145 files changed, 436 insertions(+), 1 deletion(-) diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog index d5e6bba195f..73d9de93011 100644 --- a/gdb/testsuite/ChangeLog +++ b/gdb/testsuite/ChangeLog @@ -1,4 +1,151 @@ -2020-08-12 Gary Benson +2020-08-13 Pedro Alves + + * gdb.ada/access_tagged_param.exp: Check skip_ada_tests. + * gdb.ada/access_to_packed_array.exp: Likewise. + * gdb.ada/access_to_unbounded_array.exp: Likewise. + * gdb.ada/addr_arith.exp: Likewise. + * gdb.ada/arr_acc_idx_w_gap.exp: Likewise. + * gdb.ada/arr_arr.exp: Likewise. + * gdb.ada/arr_enum_idx_w_gap.exp: Likewise. + * gdb.ada/array_bounds.exp: Likewise. + * gdb.ada/array_of_variable_length.exp: Likewise. + * gdb.ada/array_ptr_renaming.exp: Likewise. + * gdb.ada/array_subscript_addr.exp: Likewise. + * gdb.ada/arraydim.exp: Likewise. + * gdb.ada/arrayparam.exp: Likewise. + * gdb.ada/arrayptr.exp: Likewise. + * gdb.ada/assign_1.exp: Likewise. + * gdb.ada/assign_arr.exp: Likewise. + * gdb.ada/atomic_enum.exp: Likewise. + * gdb.ada/attr_ref_and_charlit.exp: Likewise. + * gdb.ada/bad-task-bp-keyword.exp: Likewise. + * gdb.ada/bias.exp: Likewise. + * gdb.ada/boolean_expr.exp: Likewise. + * gdb.ada/bp_c_mixed_case.exp: Likewise. + * gdb.ada/bp_enum_homonym.exp: Likewise. + * gdb.ada/bp_inlined_func.exp: Likewise. + * gdb.ada/bp_on_var.exp: Likewise. + * gdb.ada/bp_range_type.exp: Likewise. + * gdb.ada/bp_reset.exp: Likewise. + * gdb.ada/call_pn.exp: Likewise. + * gdb.ada/catch_assert_if.exp: Likewise. + * gdb.ada/catch_ex.exp: Likewise. + * gdb.ada/catch_ex_std.exp: Likewise. + * gdb.ada/char_enum.exp: Likewise. + * gdb.ada/char_param.exp: Likewise. + * gdb.ada/complete.exp: Likewise. + * gdb.ada/cond_lang.exp: Likewise. + * gdb.ada/convvar_comp.exp: Likewise. + * gdb.ada/dgopt.exp: Likewise. + * gdb.ada/disc_arr_bound.exp: Likewise. + * gdb.ada/display_nested.exp: Likewise. + * gdb.ada/dot_all.exp: Likewise. + * gdb.ada/dyn_loc.exp: Likewise. + * gdb.ada/dyn_stride.exp: Likewise. + * gdb.ada/excep_handle.exp: Likewise. + * gdb.ada/expr_delims.exp: Likewise. + * gdb.ada/expr_with_funcall.exp: Likewise. + * gdb.ada/exprs.exp: Likewise. + * gdb.ada/fin_fun_out.exp: Likewise. + * gdb.ada/fixed_cmp.exp: Likewise. + * gdb.ada/formatted_ref.exp: Likewise. + * gdb.ada/frame_arg_lang.exp: Likewise. + * gdb.ada/frame_args.exp: Likewise. + * gdb.ada/fullname_bp.exp: Likewise. + * gdb.ada/fun_addr.exp: Likewise. + * gdb.ada/fun_in_declare.exp: Likewise. + * gdb.ada/fun_overload_menu.exp: Likewise. + * gdb.ada/fun_renaming.exp: Likewise. + * gdb.ada/funcall_char.exp: Likewise. + * gdb.ada/funcall_param.exp: Likewise. + * gdb.ada/funcall_ptr.exp: Likewise. + * gdb.ada/funcall_ref.exp: Likewise. + * gdb.ada/homonym.exp: Likewise. + * gdb.ada/info_addr_mixed_case.exp: Likewise. + * gdb.ada/info_auto_lang.exp: Likewise. + * gdb.ada/info_exc.exp: Likewise. + * gdb.ada/info_types.exp: Likewise. + * gdb.ada/int_deref.exp: Likewise. + * gdb.ada/interface.exp: Likewise. + * gdb.ada/iwide.exp: Likewise. + * gdb.ada/lang_switch.exp: Likewise. + * gdb.ada/length_cond.exp: Likewise. + * gdb.ada/maint_with_ada.exp: Likewise. + * gdb.ada/mi_catch_assert.exp: Likewise. + * gdb.ada/mi_catch_ex.exp: Likewise. + * gdb.ada/mi_catch_ex_hand.exp: Likewise. + * gdb.ada/mi_dyn_arr.exp: Likewise. + * gdb.ada/mi_ex_cond.exp: Likewise. + * gdb.ada/mi_exc_info.exp: Likewise. + * gdb.ada/mi_interface.exp: Likewise. + * gdb.ada/mi_prot.exp: Likewise. + * gdb.ada/mi_ref_changeable.exp: Likewise. + * gdb.ada/mi_string_access.exp: Likewise. + * gdb.ada/mi_task_arg.exp: Likewise. + * gdb.ada/mi_task_info.exp: Likewise. + * gdb.ada/mi_var_array.exp: Likewise. + * gdb.ada/mi_var_union.exp: Likewise. + * gdb.ada/mi_variant.exp: Likewise. + * gdb.ada/minsyms.exp: Likewise. + * gdb.ada/mod_from_name.exp: Likewise. + * gdb.ada/nested.exp: Likewise. + * gdb.ada/null_array.exp: Likewise. + * gdb.ada/optim_drec.exp: Likewise. + * gdb.ada/out_of_line_in_inlined.exp: Likewise. + * gdb.ada/packed_array_assign.exp: Likewise. + * gdb.ada/packed_tagged.exp: Likewise. + * gdb.ada/pp-rec-component.exp: Likewise. + * gdb.ada/print_chars.exp: Likewise. + * gdb.ada/print_pc.exp: Likewise. + * gdb.ada/ptr_typedef.exp: Likewise. + * gdb.ada/ptype_arith_binop.exp: Likewise. + * gdb.ada/ptype_array.exp: Likewise. + * gdb.ada/ptype_field.exp: Likewise. + * gdb.ada/ptype_tagged_param.exp: Likewise. + * gdb.ada/ptype_union.exp: Likewise. + * gdb.ada/py_range.exp: Likewise. + * gdb.ada/py_taft.exp: Likewise. + * gdb.ada/rdv_wait.exp: Likewise. + * gdb.ada/rec_comp.exp: Likewise. + * gdb.ada/rec_return.exp: Likewise. + * gdb.ada/ref_param.exp: Likewise. + * gdb.ada/ref_tick_size.exp: Likewise. + * gdb.ada/rename_subscript_param.exp: Likewise. + * gdb.ada/repeat_dyn.exp: Likewise. + * gdb.ada/same_component_name.exp: Likewise. + * gdb.ada/same_enum.exp: Likewise. + * gdb.ada/scalar_storage.exp: Likewise. + * gdb.ada/set_wstr.exp: Likewise. + * gdb.ada/small_reg_param.exp: Likewise. + * gdb.ada/str_binop_equal.exp: Likewise. + * gdb.ada/str_ref_cmp.exp: Likewise. + * gdb.ada/str_uninit.exp: Likewise. + * gdb.ada/sub_variant.exp: Likewise. + * gdb.ada/sym_print_name.exp: Likewise. + * gdb.ada/taft_type.exp: Likewise. + * gdb.ada/tagged.exp: Likewise. + * gdb.ada/tagged_access.exp: Likewise. + * gdb.ada/task_bp.exp: Likewise. + * gdb.ada/task_switch_in_core.exp: Likewise. + * gdb.ada/tasks.exp: Likewise. + * gdb.ada/tick_last_segv.exp: Likewise. + * gdb.ada/tick_length_array_enum_idx.exp: Likewise. + * gdb.ada/type_coercion.exp: Likewise. + * gdb.ada/unc_arr_ptr_in_var_rec.exp: Likewise. + * gdb.ada/unchecked_union.exp: Likewise. + * gdb.ada/uninitialized_vars.exp: Likewise. + * gdb.ada/var_arr_attrs.exp: Likewise. + * gdb.ada/var_arr_typedef.exp: Likewise. + * gdb.ada/var_rec_arr.exp: Likewise. + * gdb.ada/variant-record.exp: Likewise. + * gdb.ada/variant.exp: Likewise. + * gdb.ada/variant_record_packed_array.exp: Likewise. + * gdb.ada/varsize_limit.exp: Likewise. + * gdb.ada/whatis_array_val.exp: Likewise. + * gdb.ada/widewide.exp: Likewise. + * gdb.ada/win_fu_syms.exp: Likewise. + +2020-08-12 Gary Benson * gdb.dwarf2/dw2-op-out-param.S (.Ltext5): Fix duplicate label. diff --git a/gdb/testsuite/gdb.ada/access_tagged_param.exp b/gdb/testsuite/gdb.ada/access_tagged_param.exp index b4c3a22e0d7..f5b9befefbf 100644 --- a/gdb/testsuite/gdb.ada/access_tagged_param.exp +++ b/gdb/testsuite/gdb.ada/access_tagged_param.exp @@ -18,6 +18,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug]] != "" } { diff --git a/gdb/testsuite/gdb.ada/access_to_packed_array.exp b/gdb/testsuite/gdb.ada/access_to_packed_array.exp index 0e1532b4280..ee11de01c1f 100644 --- a/gdb/testsuite/gdb.ada/access_to_packed_array.exp +++ b/gdb/testsuite/gdb.ada/access_to_packed_array.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug]] != "" } { diff --git a/gdb/testsuite/gdb.ada/access_to_unbounded_array.exp b/gdb/testsuite/gdb.ada/access_to_unbounded_array.exp index cc1365727c3..9830ef732b6 100644 --- a/gdb/testsuite/gdb.ada/access_to_unbounded_array.exp +++ b/gdb/testsuite/gdb.ada/access_to_unbounded_array.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug]] != "" } { diff --git a/gdb/testsuite/gdb.ada/addr_arith.exp b/gdb/testsuite/gdb.ada/addr_arith.exp index 85656bf97f5..7d82aa14923 100644 --- a/gdb/testsuite/gdb.ada/addr_arith.exp +++ b/gdb/testsuite/gdb.ada/addr_arith.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo_na07_019 if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } { diff --git a/gdb/testsuite/gdb.ada/arr_acc_idx_w_gap.exp b/gdb/testsuite/gdb.ada/arr_acc_idx_w_gap.exp index 06eebb07e77..8a57a5adc08 100644 --- a/gdb/testsuite/gdb.ada/arr_acc_idx_w_gap.exp +++ b/gdb/testsuite/gdb.ada/arr_acc_idx_w_gap.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile enum_with_gap_main if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } { diff --git a/gdb/testsuite/gdb.ada/arr_arr.exp b/gdb/testsuite/gdb.ada/arr_arr.exp index 52453e9ee63..0bcbcf933d0 100644 --- a/gdb/testsuite/gdb.ada/arr_arr.exp +++ b/gdb/testsuite/gdb.ada/arr_arr.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } { diff --git a/gdb/testsuite/gdb.ada/arr_enum_idx_w_gap.exp b/gdb/testsuite/gdb.ada/arr_enum_idx_w_gap.exp index 2de066e7961..f5936df46bb 100644 --- a/gdb/testsuite/gdb.ada/arr_enum_idx_w_gap.exp +++ b/gdb/testsuite/gdb.ada/arr_enum_idx_w_gap.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo_q418_043 if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } { diff --git a/gdb/testsuite/gdb.ada/array_bounds.exp b/gdb/testsuite/gdb.ada/array_bounds.exp index 98d2a1c427a..7d561e01b3f 100644 --- a/gdb/testsuite/gdb.ada/array_bounds.exp +++ b/gdb/testsuite/gdb.ada/array_bounds.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile bar if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } { diff --git a/gdb/testsuite/gdb.ada/array_of_variable_length.exp b/gdb/testsuite/gdb.ada/array_of_variable_length.exp index f7b254ad9e2..9eb67776299 100644 --- a/gdb/testsuite/gdb.ada/array_of_variable_length.exp +++ b/gdb/testsuite/gdb.ada/array_of_variable_length.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug]] != "" } { diff --git a/gdb/testsuite/gdb.ada/array_ptr_renaming.exp b/gdb/testsuite/gdb.ada/array_ptr_renaming.exp index e568b60b1e4..4355508a2f5 100644 --- a/gdb/testsuite/gdb.ada/array_ptr_renaming.exp +++ b/gdb/testsuite/gdb.ada/array_ptr_renaming.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug]] != "" } { diff --git a/gdb/testsuite/gdb.ada/array_subscript_addr.exp b/gdb/testsuite/gdb.ada/array_subscript_addr.exp index 4f6a4dd8093..905d931c988 100644 --- a/gdb/testsuite/gdb.ada/array_subscript_addr.exp +++ b/gdb/testsuite/gdb.ada/array_subscript_addr.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile p if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug]] != "" } { diff --git a/gdb/testsuite/gdb.ada/arraydim.exp b/gdb/testsuite/gdb.ada/arraydim.exp index 7a5e8c3e0f8..dabc6c2e2f4 100644 --- a/gdb/testsuite/gdb.ada/arraydim.exp +++ b/gdb/testsuite/gdb.ada/arraydim.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo set cfile "inc" diff --git a/gdb/testsuite/gdb.ada/arrayparam.exp b/gdb/testsuite/gdb.ada/arrayparam.exp index 717d36e768c..dc36499f33d 100644 --- a/gdb/testsuite/gdb.ada/arrayparam.exp +++ b/gdb/testsuite/gdb.ada/arrayparam.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug]] != "" } { diff --git a/gdb/testsuite/gdb.ada/arrayptr.exp b/gdb/testsuite/gdb.ada/arrayptr.exp index ed91fe079b6..94a5d876bd2 100644 --- a/gdb/testsuite/gdb.ada/arrayptr.exp +++ b/gdb/testsuite/gdb.ada/arrayptr.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } { diff --git a/gdb/testsuite/gdb.ada/assign_1.exp b/gdb/testsuite/gdb.ada/assign_1.exp index e7ec4e18863..abbfd6d7925 100644 --- a/gdb/testsuite/gdb.ada/assign_1.exp +++ b/gdb/testsuite/gdb.ada/assign_1.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + gdb_exit gdb_start gdb_reinitialize_dir $srcdir/$subdir diff --git a/gdb/testsuite/gdb.ada/assign_arr.exp b/gdb/testsuite/gdb.ada/assign_arr.exp index 75b851a391c..723c06abf21 100644 --- a/gdb/testsuite/gdb.ada/assign_arr.exp +++ b/gdb/testsuite/gdb.ada/assign_arr.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile main_p324_051 if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug]] != "" } { diff --git a/gdb/testsuite/gdb.ada/atomic_enum.exp b/gdb/testsuite/gdb.ada/atomic_enum.exp index 86890b06d83..0e9df764c84 100644 --- a/gdb/testsuite/gdb.ada/atomic_enum.exp +++ b/gdb/testsuite/gdb.ada/atomic_enum.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug additional_flags=-gnat05 ]] != "" } { diff --git a/gdb/testsuite/gdb.ada/attr_ref_and_charlit.exp b/gdb/testsuite/gdb.ada/attr_ref_and_charlit.exp index bbe7d5ece25..da65b2f9953 100644 --- a/gdb/testsuite/gdb.ada/attr_ref_and_charlit.exp +++ b/gdb/testsuite/gdb.ada/attr_ref_and_charlit.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile "foo" if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug]] != "" } { diff --git a/gdb/testsuite/gdb.ada/bad-task-bp-keyword.exp b/gdb/testsuite/gdb.ada/bad-task-bp-keyword.exp index 619eb99c268..31db417d514 100644 --- a/gdb/testsuite/gdb.ada/bad-task-bp-keyword.exp +++ b/gdb/testsuite/gdb.ada/bad-task-bp-keyword.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } { diff --git a/gdb/testsuite/gdb.ada/bias.exp b/gdb/testsuite/gdb.ada/bias.exp index e1c7dcda4ce..c7a78505c46 100644 --- a/gdb/testsuite/gdb.ada/bias.exp +++ b/gdb/testsuite/gdb.ada/bias.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile bias if {[gdb_compile_ada "${srcfile}" "${binfile}" executable \ diff --git a/gdb/testsuite/gdb.ada/boolean_expr.exp b/gdb/testsuite/gdb.ada/boolean_expr.exp index bb23fede3a1..9d363cfe8eb 100644 --- a/gdb/testsuite/gdb.ada/boolean_expr.exp +++ b/gdb/testsuite/gdb.ada/boolean_expr.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + gdb_exit gdb_start gdb_reinitialize_dir $srcdir/$subdir diff --git a/gdb/testsuite/gdb.ada/bp_c_mixed_case.exp b/gdb/testsuite/gdb.ada/bp_c_mixed_case.exp index b1c7cb2a795..16fff993de2 100644 --- a/gdb/testsuite/gdb.ada/bp_c_mixed_case.exp +++ b/gdb/testsuite/gdb.ada/bp_c_mixed_case.exp @@ -20,6 +20,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo_h731_021 set cfile "bar" diff --git a/gdb/testsuite/gdb.ada/bp_enum_homonym.exp b/gdb/testsuite/gdb.ada/bp_enum_homonym.exp index 17da469321c..1eb4cbd4aff 100644 --- a/gdb/testsuite/gdb.ada/bp_enum_homonym.exp +++ b/gdb/testsuite/gdb.ada/bp_enum_homonym.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile p if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } { diff --git a/gdb/testsuite/gdb.ada/bp_inlined_func.exp b/gdb/testsuite/gdb.ada/bp_inlined_func.exp index 9a125dc26cc..58a283033d4 100644 --- a/gdb/testsuite/gdb.ada/bp_inlined_func.exp +++ b/gdb/testsuite/gdb.ada/bp_inlined_func.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } { diff --git a/gdb/testsuite/gdb.ada/bp_on_var.exp b/gdb/testsuite/gdb.ada/bp_on_var.exp index a2804903316..8fad3c54818 100644 --- a/gdb/testsuite/gdb.ada/bp_on_var.exp +++ b/gdb/testsuite/gdb.ada/bp_on_var.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } { diff --git a/gdb/testsuite/gdb.ada/bp_range_type.exp b/gdb/testsuite/gdb.ada/bp_range_type.exp index 7caabe5e668..426d4ba8756 100644 --- a/gdb/testsuite/gdb.ada/bp_range_type.exp +++ b/gdb/testsuite/gdb.ada/bp_range_type.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } { diff --git a/gdb/testsuite/gdb.ada/bp_reset.exp b/gdb/testsuite/gdb.ada/bp_reset.exp index fc1517d65d4..039545cf61f 100644 --- a/gdb/testsuite/gdb.ada/bp_reset.exp +++ b/gdb/testsuite/gdb.ada/bp_reset.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } { diff --git a/gdb/testsuite/gdb.ada/call_pn.exp b/gdb/testsuite/gdb.ada/call_pn.exp index 7d07eba6b5a..7993e7a865d 100644 --- a/gdb/testsuite/gdb.ada/call_pn.exp +++ b/gdb/testsuite/gdb.ada/call_pn.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } { diff --git a/gdb/testsuite/gdb.ada/catch_assert_if.exp b/gdb/testsuite/gdb.ada/catch_assert_if.exp index e82034889eb..d4f752161a0 100644 --- a/gdb/testsuite/gdb.ada/catch_assert_if.exp +++ b/gdb/testsuite/gdb.ada/catch_assert_if.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile bla if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug additional_flags=-gnata ]] != "" } { diff --git a/gdb/testsuite/gdb.ada/catch_ex.exp b/gdb/testsuite/gdb.ada/catch_ex.exp index 68914139830..2bdd4b4d21f 100644 --- a/gdb/testsuite/gdb.ada/catch_ex.exp +++ b/gdb/testsuite/gdb.ada/catch_ex.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug additional_flags=-gnata ]] != "" } { diff --git a/gdb/testsuite/gdb.ada/catch_ex_std.exp b/gdb/testsuite/gdb.ada/catch_ex_std.exp index 3fae34008fd..c3339c34923 100644 --- a/gdb/testsuite/gdb.ada/catch_ex_std.exp +++ b/gdb/testsuite/gdb.ada/catch_ex_std.exp @@ -19,6 +19,8 @@ if {[skip_shlib_tests]} { load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo set ofile ${binfile}.o diff --git a/gdb/testsuite/gdb.ada/char_enum.exp b/gdb/testsuite/gdb.ada/char_enum.exp index 8ed6d2a8ffa..14cec552540 100644 --- a/gdb/testsuite/gdb.ada/char_enum.exp +++ b/gdb/testsuite/gdb.ada/char_enum.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } { diff --git a/gdb/testsuite/gdb.ada/char_param.exp b/gdb/testsuite/gdb.ada/char_param.exp index f6cabe7c32d..3d3ac6559b1 100644 --- a/gdb/testsuite/gdb.ada/char_param.exp +++ b/gdb/testsuite/gdb.ada/char_param.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug]] != "" } { diff --git a/gdb/testsuite/gdb.ada/complete.exp b/gdb/testsuite/gdb.ada/complete.exp index f2149daefec..7fbbb8530f6 100644 --- a/gdb/testsuite/gdb.ada/complete.exp +++ b/gdb/testsuite/gdb.ada/complete.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } { diff --git a/gdb/testsuite/gdb.ada/cond_lang.exp b/gdb/testsuite/gdb.ada/cond_lang.exp index c99f2f9f7ce..f2fbd92bc74 100644 --- a/gdb/testsuite/gdb.ada/cond_lang.exp +++ b/gdb/testsuite/gdb.ada/cond_lang.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile a set cfile "foo" diff --git a/gdb/testsuite/gdb.ada/convvar_comp.exp b/gdb/testsuite/gdb.ada/convvar_comp.exp index 97b0d689d15..0d1c8fa1ac2 100644 --- a/gdb/testsuite/gdb.ada/convvar_comp.exp +++ b/gdb/testsuite/gdb.ada/convvar_comp.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile pb16_063 if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } { diff --git a/gdb/testsuite/gdb.ada/dgopt.exp b/gdb/testsuite/gdb.ada/dgopt.exp index 2f03d2ab7dc..b6ff4e7073f 100644 --- a/gdb/testsuite/gdb.ada/dgopt.exp +++ b/gdb/testsuite/gdb.ada/dgopt.exp @@ -17,6 +17,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile x if {[gdb_compile_ada "${srcfile}" "${binfile}" executable \ diff --git a/gdb/testsuite/gdb.ada/disc_arr_bound.exp b/gdb/testsuite/gdb.ada/disc_arr_bound.exp index 818b58d4eb1..1056563f2f8 100644 --- a/gdb/testsuite/gdb.ada/disc_arr_bound.exp +++ b/gdb/testsuite/gdb.ada/disc_arr_bound.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo_n612_026 if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } { diff --git a/gdb/testsuite/gdb.ada/display_nested.exp b/gdb/testsuite/gdb.ada/display_nested.exp index 264400ea452..b0adf35b5be 100644 --- a/gdb/testsuite/gdb.ada/display_nested.exp +++ b/gdb/testsuite/gdb.ada/display_nested.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo if {[gdb_compile_ada "${srcfile}" "${binfile}" executable debug] != ""} { diff --git a/gdb/testsuite/gdb.ada/dot_all.exp b/gdb/testsuite/gdb.ada/dot_all.exp index 45507f294c3..9808b727a08 100644 --- a/gdb/testsuite/gdb.ada/dot_all.exp +++ b/gdb/testsuite/gdb.ada/dot_all.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } { diff --git a/gdb/testsuite/gdb.ada/dyn_loc.exp b/gdb/testsuite/gdb.ada/dyn_loc.exp index 65ae9d009bd..e828d28b1a1 100644 --- a/gdb/testsuite/gdb.ada/dyn_loc.exp +++ b/gdb/testsuite/gdb.ada/dyn_loc.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile p if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } { diff --git a/gdb/testsuite/gdb.ada/dyn_stride.exp b/gdb/testsuite/gdb.ada/dyn_stride.exp index 55ec126ded7..a1ec781aac6 100644 --- a/gdb/testsuite/gdb.ada/dyn_stride.exp +++ b/gdb/testsuite/gdb.ada/dyn_stride.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } { diff --git a/gdb/testsuite/gdb.ada/excep_handle.exp b/gdb/testsuite/gdb.ada/excep_handle.exp index bdbf79378ae..7dc52756647 100644 --- a/gdb/testsuite/gdb.ada/excep_handle.exp +++ b/gdb/testsuite/gdb.ada/excep_handle.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug additional_flags=-gnata ]] != "" } { diff --git a/gdb/testsuite/gdb.ada/expr_delims.exp b/gdb/testsuite/gdb.ada/expr_delims.exp index 507d7a43a82..727e17a86ac 100644 --- a/gdb/testsuite/gdb.ada/expr_delims.exp +++ b/gdb/testsuite/gdb.ada/expr_delims.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } { diff --git a/gdb/testsuite/gdb.ada/expr_with_funcall.exp b/gdb/testsuite/gdb.ada/expr_with_funcall.exp index 0e7161da403..74ecd9a5f76 100644 --- a/gdb/testsuite/gdb.ada/expr_with_funcall.exp +++ b/gdb/testsuite/gdb.ada/expr_with_funcall.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile expr_r821_013 if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } { diff --git a/gdb/testsuite/gdb.ada/exprs.exp b/gdb/testsuite/gdb.ada/exprs.exp index ca108ba79e0..4ee8211f720 100644 --- a/gdb/testsuite/gdb.ada/exprs.exp +++ b/gdb/testsuite/gdb.ada/exprs.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile p if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } { diff --git a/gdb/testsuite/gdb.ada/fin_fun_out.exp b/gdb/testsuite/gdb.ada/fin_fun_out.exp index c88ea0317d7..a2a5b87b0be 100644 --- a/gdb/testsuite/gdb.ada/fin_fun_out.exp +++ b/gdb/testsuite/gdb.ada/fin_fun_out.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo_o525_013 if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } { diff --git a/gdb/testsuite/gdb.ada/fixed_cmp.exp b/gdb/testsuite/gdb.ada/fixed_cmp.exp index b7f59c81354..38e41c433f4 100644 --- a/gdb/testsuite/gdb.ada/fixed_cmp.exp +++ b/gdb/testsuite/gdb.ada/fixed_cmp.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile fixed if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } { diff --git a/gdb/testsuite/gdb.ada/formatted_ref.exp b/gdb/testsuite/gdb.ada/formatted_ref.exp index 8376513a784..f8dd690fbb0 100644 --- a/gdb/testsuite/gdb.ada/formatted_ref.exp +++ b/gdb/testsuite/gdb.ada/formatted_ref.exp @@ -26,6 +26,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile formatted_ref if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } { diff --git a/gdb/testsuite/gdb.ada/frame_arg_lang.exp b/gdb/testsuite/gdb.ada/frame_arg_lang.exp index dc08d261334..9662e359524 100644 --- a/gdb/testsuite/gdb.ada/frame_arg_lang.exp +++ b/gdb/testsuite/gdb.ada/frame_arg_lang.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile bla set cfile "foo" set csrcfile ${srcdir}/${subdir}/${testdir}/${cfile}.c diff --git a/gdb/testsuite/gdb.ada/frame_args.exp b/gdb/testsuite/gdb.ada/frame_args.exp index 1aa7636728b..6c9e9875b30 100644 --- a/gdb/testsuite/gdb.ada/frame_args.exp +++ b/gdb/testsuite/gdb.ada/frame_args.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } { diff --git a/gdb/testsuite/gdb.ada/fullname_bp.exp b/gdb/testsuite/gdb.ada/fullname_bp.exp index 71ba4638994..cfd96961305 100644 --- a/gdb/testsuite/gdb.ada/fullname_bp.exp +++ b/gdb/testsuite/gdb.ada/fullname_bp.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } { diff --git a/gdb/testsuite/gdb.ada/fun_addr.exp b/gdb/testsuite/gdb.ada/fun_addr.exp index b6325a34610..a3b17d90566 100644 --- a/gdb/testsuite/gdb.ada/fun_addr.exp +++ b/gdb/testsuite/gdb.ada/fun_addr.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } { diff --git a/gdb/testsuite/gdb.ada/fun_in_declare.exp b/gdb/testsuite/gdb.ada/fun_in_declare.exp index bdb883fc40e..56b6d4c6c00 100644 --- a/gdb/testsuite/gdb.ada/fun_in_declare.exp +++ b/gdb/testsuite/gdb.ada/fun_in_declare.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } { diff --git a/gdb/testsuite/gdb.ada/fun_overload_menu.exp b/gdb/testsuite/gdb.ada/fun_overload_menu.exp index 47a25efae64..78d7e074041 100644 --- a/gdb/testsuite/gdb.ada/fun_overload_menu.exp +++ b/gdb/testsuite/gdb.ada/fun_overload_menu.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo if {[gdb_compile_ada "$srcfile" "$binfile" executable [list debug]] != "" } { diff --git a/gdb/testsuite/gdb.ada/fun_renaming.exp b/gdb/testsuite/gdb.ada/fun_renaming.exp index 0907c5ae430..991360b4eba 100644 --- a/gdb/testsuite/gdb.ada/fun_renaming.exp +++ b/gdb/testsuite/gdb.ada/fun_renaming.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile fun_renaming if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug]] != "" } { diff --git a/gdb/testsuite/gdb.ada/funcall_char.exp b/gdb/testsuite/gdb.ada/funcall_char.exp index 57729e7d211..c83833e3bb3 100644 --- a/gdb/testsuite/gdb.ada/funcall_char.exp +++ b/gdb/testsuite/gdb.ada/funcall_char.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug]] != "" } { diff --git a/gdb/testsuite/gdb.ada/funcall_param.exp b/gdb/testsuite/gdb.ada/funcall_param.exp index 7e621f1bdf7..e14058ddcee 100644 --- a/gdb/testsuite/gdb.ada/funcall_param.exp +++ b/gdb/testsuite/gdb.ada/funcall_param.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug]] != "" } { diff --git a/gdb/testsuite/gdb.ada/funcall_ptr.exp b/gdb/testsuite/gdb.ada/funcall_ptr.exp index 55479d23071..c2d65fb64c4 100644 --- a/gdb/testsuite/gdb.ada/funcall_ptr.exp +++ b/gdb/testsuite/gdb.ada/funcall_ptr.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo if {[gdb_compile_ada "$srcfile" "$binfile" executable [list debug]] != "" } { diff --git a/gdb/testsuite/gdb.ada/funcall_ref.exp b/gdb/testsuite/gdb.ada/funcall_ref.exp index b3dc093753a..1768c1d480a 100644 --- a/gdb/testsuite/gdb.ada/funcall_ref.exp +++ b/gdb/testsuite/gdb.ada/funcall_ref.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo # Note we don't test the "none" (no -fgnat-encodings option) scenario diff --git a/gdb/testsuite/gdb.ada/homonym.exp b/gdb/testsuite/gdb.ada/homonym.exp index eb9f2163616..9c88b75d1b5 100644 --- a/gdb/testsuite/gdb.ada/homonym.exp +++ b/gdb/testsuite/gdb.ada/homonym.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile homonym_main if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug]] != "" } { diff --git a/gdb/testsuite/gdb.ada/info_addr_mixed_case.exp b/gdb/testsuite/gdb.ada/info_addr_mixed_case.exp index 47353bd55cb..50a7fc9e265 100644 --- a/gdb/testsuite/gdb.ada/info_addr_mixed_case.exp +++ b/gdb/testsuite/gdb.ada/info_addr_mixed_case.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } { diff --git a/gdb/testsuite/gdb.ada/info_auto_lang.exp b/gdb/testsuite/gdb.ada/info_auto_lang.exp index 4876f3e607f..152a884d0da 100644 --- a/gdb/testsuite/gdb.ada/info_auto_lang.exp +++ b/gdb/testsuite/gdb.ada/info_auto_lang.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + # This test verifies that the commands # info [functions|variables|types] # respect the 'set language auto|ada|c' setting, whatever the language diff --git a/gdb/testsuite/gdb.ada/info_exc.exp b/gdb/testsuite/gdb.ada/info_exc.exp index 1eb468c6bb0..b559fff0aa2 100644 --- a/gdb/testsuite/gdb.ada/info_exc.exp +++ b/gdb/testsuite/gdb.ada/info_exc.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug]] != "" } { diff --git a/gdb/testsuite/gdb.ada/info_types.exp b/gdb/testsuite/gdb.ada/info_types.exp index a46cea1db3c..34e20701db0 100644 --- a/gdb/testsuite/gdb.ada/info_types.exp +++ b/gdb/testsuite/gdb.ada/info_types.exp @@ -13,6 +13,8 @@ # You should have received a copy of the GNU General Public License # along with this program. If not, see . +if { [skip_ada_tests] } { return -1 } + standard_testfile .c if { [prepare_for_testing "failed to prepare" ${testfile} ${srcfile}] } { diff --git a/gdb/testsuite/gdb.ada/int_deref.exp b/gdb/testsuite/gdb.ada/int_deref.exp index 34b233393ad..4e8cba9326e 100644 --- a/gdb/testsuite/gdb.ada/int_deref.exp +++ b/gdb/testsuite/gdb.ada/int_deref.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug]] != "" } { diff --git a/gdb/testsuite/gdb.ada/interface.exp b/gdb/testsuite/gdb.ada/interface.exp index 23e59dae3af..305cb912f9f 100644 --- a/gdb/testsuite/gdb.ada/interface.exp +++ b/gdb/testsuite/gdb.ada/interface.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug additional_flags=-gnat05 ]] != "" } { diff --git a/gdb/testsuite/gdb.ada/iwide.exp b/gdb/testsuite/gdb.ada/iwide.exp index 45c1b2a1f3e..19930fb2553 100644 --- a/gdb/testsuite/gdb.ada/iwide.exp +++ b/gdb/testsuite/gdb.ada/iwide.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile p if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug additional_flags=-gnat05 ]] != "" } { diff --git a/gdb/testsuite/gdb.ada/lang_switch.exp b/gdb/testsuite/gdb.ada/lang_switch.exp index 7d9bd617504..8db680465a5 100644 --- a/gdb/testsuite/gdb.ada/lang_switch.exp +++ b/gdb/testsuite/gdb.ada/lang_switch.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile lang_switch set cfile "foo" set csrcfile ${srcdir}/${subdir}/${testdir}/${cfile}.c diff --git a/gdb/testsuite/gdb.ada/length_cond.exp b/gdb/testsuite/gdb.ada/length_cond.exp index a030a83f45c..f4a99949874 100644 --- a/gdb/testsuite/gdb.ada/length_cond.exp +++ b/gdb/testsuite/gdb.ada/length_cond.exp @@ -18,6 +18,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile length_cond if {[gdb_compile_ada "${srcfile}" "${binfile}" executable debug] != "" } { diff --git a/gdb/testsuite/gdb.ada/maint_with_ada.exp b/gdb/testsuite/gdb.ada/maint_with_ada.exp index a3ef72c160e..33092b78991 100644 --- a/gdb/testsuite/gdb.ada/maint_with_ada.exp +++ b/gdb/testsuite/gdb.ada/maint_with_ada.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile var_arr_typedef if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } { diff --git a/gdb/testsuite/gdb.ada/mi_catch_assert.exp b/gdb/testsuite/gdb.ada/mi_catch_assert.exp index 82cc7c2acef..30543e56008 100644 --- a/gdb/testsuite/gdb.ada/mi_catch_assert.exp +++ b/gdb/testsuite/gdb.ada/mi_catch_assert.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile bla if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug additional_flags=-gnata ]] != "" } { diff --git a/gdb/testsuite/gdb.ada/mi_catch_ex.exp b/gdb/testsuite/gdb.ada/mi_catch_ex.exp index 4b3e4f6f0b1..63c6984bc66 100644 --- a/gdb/testsuite/gdb.ada/mi_catch_ex.exp +++ b/gdb/testsuite/gdb.ada/mi_catch_ex.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug additional_flags=-gnata ]] != "" } { diff --git a/gdb/testsuite/gdb.ada/mi_catch_ex_hand.exp b/gdb/testsuite/gdb.ada/mi_catch_ex_hand.exp index 59c8a100851..06e466672ea 100644 --- a/gdb/testsuite/gdb.ada/mi_catch_ex_hand.exp +++ b/gdb/testsuite/gdb.ada/mi_catch_ex_hand.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug additional_flags=-gnata ]] != "" } { diff --git a/gdb/testsuite/gdb.ada/mi_dyn_arr.exp b/gdb/testsuite/gdb.ada/mi_dyn_arr.exp index 34506ad5f2c..5c8b986e455 100644 --- a/gdb/testsuite/gdb.ada/mi_dyn_arr.exp +++ b/gdb/testsuite/gdb.ada/mi_dyn_arr.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug]] != "" } { diff --git a/gdb/testsuite/gdb.ada/mi_ex_cond.exp b/gdb/testsuite/gdb.ada/mi_ex_cond.exp index 4c7215f9bad..95b651e0455 100644 --- a/gdb/testsuite/gdb.ada/mi_ex_cond.exp +++ b/gdb/testsuite/gdb.ada/mi_ex_cond.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug additional_flags=-bargs additional_flags=-static additional_flags=-margs ]] != "" } { diff --git a/gdb/testsuite/gdb.ada/mi_exc_info.exp b/gdb/testsuite/gdb.ada/mi_exc_info.exp index b2a43b17d4f..eeb8247a3bf 100644 --- a/gdb/testsuite/gdb.ada/mi_exc_info.exp +++ b/gdb/testsuite/gdb.ada/mi_exc_info.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug]] != "" } { diff --git a/gdb/testsuite/gdb.ada/mi_interface.exp b/gdb/testsuite/gdb.ada/mi_interface.exp index e16477760f6..f948237558d 100644 --- a/gdb/testsuite/gdb.ada/mi_interface.exp +++ b/gdb/testsuite/gdb.ada/mi_interface.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug additional_flags=-gnat12 ]] != "" } { diff --git a/gdb/testsuite/gdb.ada/mi_prot.exp b/gdb/testsuite/gdb.ada/mi_prot.exp index f3b5b9c662c..fb4ca8d7ffb 100644 --- a/gdb/testsuite/gdb.ada/mi_prot.exp +++ b/gdb/testsuite/gdb.ada/mi_prot.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + if { ![gnatmake_version_at_least 8] } { return -1 } diff --git a/gdb/testsuite/gdb.ada/mi_ref_changeable.exp b/gdb/testsuite/gdb.ada/mi_ref_changeable.exp index 92af591e264..71f26c02dee 100644 --- a/gdb/testsuite/gdb.ada/mi_ref_changeable.exp +++ b/gdb/testsuite/gdb.ada/mi_ref_changeable.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo_rb20_056 if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug]] != "" } { diff --git a/gdb/testsuite/gdb.ada/mi_string_access.exp b/gdb/testsuite/gdb.ada/mi_string_access.exp index f825cdb2907..5e07f1ebcc0 100644 --- a/gdb/testsuite/gdb.ada/mi_string_access.exp +++ b/gdb/testsuite/gdb.ada/mi_string_access.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile bar if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug]] != "" } { diff --git a/gdb/testsuite/gdb.ada/mi_task_arg.exp b/gdb/testsuite/gdb.ada/mi_task_arg.exp index 7c119a4da63..2a4038d77b7 100644 --- a/gdb/testsuite/gdb.ada/mi_task_arg.exp +++ b/gdb/testsuite/gdb.ada/mi_task_arg.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile task_switch if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug additional_flags=-gnata ]] != "" } { diff --git a/gdb/testsuite/gdb.ada/mi_task_info.exp b/gdb/testsuite/gdb.ada/mi_task_info.exp index 22636e0d315..c67599e0f3e 100644 --- a/gdb/testsuite/gdb.ada/mi_task_info.exp +++ b/gdb/testsuite/gdb.ada/mi_task_info.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile task_switch if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug additional_flags=-gnata ]] != "" } { diff --git a/gdb/testsuite/gdb.ada/mi_var_array.exp b/gdb/testsuite/gdb.ada/mi_var_array.exp index 646ebd196f6..fdc2249ba02 100644 --- a/gdb/testsuite/gdb.ada/mi_var_array.exp +++ b/gdb/testsuite/gdb.ada/mi_var_array.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile bar load_lib mi-support.exp diff --git a/gdb/testsuite/gdb.ada/mi_var_union.exp b/gdb/testsuite/gdb.ada/mi_var_union.exp index 7619d86d273..f950855d871 100644 --- a/gdb/testsuite/gdb.ada/mi_var_union.exp +++ b/gdb/testsuite/gdb.ada/mi_var_union.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile bar load_lib mi-support.exp diff --git a/gdb/testsuite/gdb.ada/mi_variant.exp b/gdb/testsuite/gdb.ada/mi_variant.exp index ac9ece7303c..01c67200581 100644 --- a/gdb/testsuite/gdb.ada/mi_variant.exp +++ b/gdb/testsuite/gdb.ada/mi_variant.exp @@ -16,6 +16,8 @@ load_lib "ada.exp" load_lib "gdb-python.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile pkg load_lib mi-support.exp diff --git a/gdb/testsuite/gdb.ada/minsyms.exp b/gdb/testsuite/gdb.ada/minsyms.exp index 1bed2e40daa..5ee9ad2f6ae 100644 --- a/gdb/testsuite/gdb.ada/minsyms.exp +++ b/gdb/testsuite/gdb.ada/minsyms.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo_qb07_057 if {[gdb_compile_ada "${srcfile}" "${binfile}" executable ""] != "" } { diff --git a/gdb/testsuite/gdb.ada/mod_from_name.exp b/gdb/testsuite/gdb.ada/mod_from_name.exp index 4c9fd6f462b..dce0f3ac3a6 100644 --- a/gdb/testsuite/gdb.ada/mod_from_name.exp +++ b/gdb/testsuite/gdb.ada/mod_from_name.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } { diff --git a/gdb/testsuite/gdb.ada/nested.exp b/gdb/testsuite/gdb.ada/nested.exp index f4298fa17dc..ea4bb4de355 100644 --- a/gdb/testsuite/gdb.ada/nested.exp +++ b/gdb/testsuite/gdb.ada/nested.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile hello if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } { diff --git a/gdb/testsuite/gdb.ada/null_array.exp b/gdb/testsuite/gdb.ada/null_array.exp index ce7e496e3c7..0d8414e49a4 100644 --- a/gdb/testsuite/gdb.ada/null_array.exp +++ b/gdb/testsuite/gdb.ada/null_array.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug]] != "" } { diff --git a/gdb/testsuite/gdb.ada/optim_drec.exp b/gdb/testsuite/gdb.ada/optim_drec.exp index 584c12a2a1f..5ab8ddf0e0e 100644 --- a/gdb/testsuite/gdb.ada/optim_drec.exp +++ b/gdb/testsuite/gdb.ada/optim_drec.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } { diff --git a/gdb/testsuite/gdb.ada/out_of_line_in_inlined.exp b/gdb/testsuite/gdb.ada/out_of_line_in_inlined.exp index 141b7d839d5..684a3699245 100644 --- a/gdb/testsuite/gdb.ada/out_of_line_in_inlined.exp +++ b/gdb/testsuite/gdb.ada/out_of_line_in_inlined.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo_o224_021 if {[gdb_compile_ada "${srcfile}" "${binfile}" executable {debug optimize=-O2}] != ""} { diff --git a/gdb/testsuite/gdb.ada/packed_array_assign.exp b/gdb/testsuite/gdb.ada/packed_array_assign.exp index 3c49099d4ac..fb9fe1f2a3a 100644 --- a/gdb/testsuite/gdb.ada/packed_array_assign.exp +++ b/gdb/testsuite/gdb.ada/packed_array_assign.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile tester if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug]] != "" } { diff --git a/gdb/testsuite/gdb.ada/packed_tagged.exp b/gdb/testsuite/gdb.ada/packed_tagged.exp index ede5ca57085..b86d1135aa9 100644 --- a/gdb/testsuite/gdb.ada/packed_tagged.exp +++ b/gdb/testsuite/gdb.ada/packed_tagged.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile comp_bug # Note we don't test the "none" (no -fgnat-encodings option) scenario diff --git a/gdb/testsuite/gdb.ada/pp-rec-component.exp b/gdb/testsuite/gdb.ada/pp-rec-component.exp index a7b2e3a3316..a51ff2c7f53 100644 --- a/gdb/testsuite/gdb.ada/pp-rec-component.exp +++ b/gdb/testsuite/gdb.ada/pp-rec-component.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug]] != "" } { diff --git a/gdb/testsuite/gdb.ada/print_chars.exp b/gdb/testsuite/gdb.ada/print_chars.exp index 17c13480da4..3fa28f512d7 100644 --- a/gdb/testsuite/gdb.ada/print_chars.exp +++ b/gdb/testsuite/gdb.ada/print_chars.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug additional_flags=-gnat05 ]] != "" } { diff --git a/gdb/testsuite/gdb.ada/print_pc.exp b/gdb/testsuite/gdb.ada/print_pc.exp index 0668805d0da..7c1e04af4d9 100644 --- a/gdb/testsuite/gdb.ada/print_pc.exp +++ b/gdb/testsuite/gdb.ada/print_pc.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile dummy start if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } { diff --git a/gdb/testsuite/gdb.ada/ptr_typedef.exp b/gdb/testsuite/gdb.ada/ptr_typedef.exp index bc1a2bc410d..a826b6e6ddc 100644 --- a/gdb/testsuite/gdb.ada/ptr_typedef.exp +++ b/gdb/testsuite/gdb.ada/ptr_typedef.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } { diff --git a/gdb/testsuite/gdb.ada/ptype_arith_binop.exp b/gdb/testsuite/gdb.ada/ptype_arith_binop.exp index 470b248eed0..9812eb9c0d8 100644 --- a/gdb/testsuite/gdb.ada/ptype_arith_binop.exp +++ b/gdb/testsuite/gdb.ada/ptype_arith_binop.exp @@ -13,6 +13,8 @@ # You should have received a copy of the GNU General Public License # along with this program. If not, see . +if { [skip_ada_tests] } { return -1 } + gdb_exit gdb_start gdb_reinitialize_dir $srcdir/$subdir diff --git a/gdb/testsuite/gdb.ada/ptype_array.exp b/gdb/testsuite/gdb.ada/ptype_array.exp index 27c259b4846..4e53287261f 100644 --- a/gdb/testsuite/gdb.ada/ptype_array.exp +++ b/gdb/testsuite/gdb.ada/ptype_array.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug additional_flags=-gnat05 ]] != "" } { diff --git a/gdb/testsuite/gdb.ada/ptype_field.exp b/gdb/testsuite/gdb.ada/ptype_field.exp index 8aa6e96107a..ac04c0c6fed 100644 --- a/gdb/testsuite/gdb.ada/ptype_field.exp +++ b/gdb/testsuite/gdb.ada/ptype_field.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug additional_flags=-gnat05 ]] != "" } { diff --git a/gdb/testsuite/gdb.ada/ptype_tagged_param.exp b/gdb/testsuite/gdb.ada/ptype_tagged_param.exp index ce1570d9faf..988e472c9d6 100644 --- a/gdb/testsuite/gdb.ada/ptype_tagged_param.exp +++ b/gdb/testsuite/gdb.ada/ptype_tagged_param.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } { diff --git a/gdb/testsuite/gdb.ada/ptype_union.exp b/gdb/testsuite/gdb.ada/ptype_union.exp index c85e5f4b4b6..c37ea3eb5c8 100644 --- a/gdb/testsuite/gdb.ada/ptype_union.exp +++ b/gdb/testsuite/gdb.ada/ptype_union.exp @@ -13,6 +13,8 @@ # You should have received a copy of the GNU General Public License # along with this program. If not, see . +if { [skip_ada_tests] } { return -1 } + standard_testfile .c if {[prepare_for_testing "failed to prepare" ${testfile} ${srcfile}]} { diff --git a/gdb/testsuite/gdb.ada/py_range.exp b/gdb/testsuite/gdb.ada/py_range.exp index 521d853eb16..52c9577f796 100644 --- a/gdb/testsuite/gdb.ada/py_range.exp +++ b/gdb/testsuite/gdb.ada/py_range.exp @@ -16,6 +16,8 @@ load_lib "ada.exp" load_lib gdb-python.exp +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug]] != "" } { diff --git a/gdb/testsuite/gdb.ada/py_taft.exp b/gdb/testsuite/gdb.ada/py_taft.exp index 1181edb8833..7f49a731589 100644 --- a/gdb/testsuite/gdb.ada/py_taft.exp +++ b/gdb/testsuite/gdb.ada/py_taft.exp @@ -16,6 +16,8 @@ load_lib "ada.exp" load_lib gdb-python.exp +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile main if {[gdb_compile_ada "${srcfile}" "${binfile}" executable debug] != ""} { diff --git a/gdb/testsuite/gdb.ada/rdv_wait.exp b/gdb/testsuite/gdb.ada/rdv_wait.exp index 837edc842df..83a5f957ab2 100644 --- a/gdb/testsuite/gdb.ada/rdv_wait.exp +++ b/gdb/testsuite/gdb.ada/rdv_wait.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } { diff --git a/gdb/testsuite/gdb.ada/rec_comp.exp b/gdb/testsuite/gdb.ada/rec_comp.exp index b457d04ba2d..4e41ad9d57d 100644 --- a/gdb/testsuite/gdb.ada/rec_comp.exp +++ b/gdb/testsuite/gdb.ada/rec_comp.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile bar_o203_012 if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } { diff --git a/gdb/testsuite/gdb.ada/rec_return.exp b/gdb/testsuite/gdb.ada/rec_return.exp index f2658c7698d..22f4aa725b7 100644 --- a/gdb/testsuite/gdb.ada/rec_return.exp +++ b/gdb/testsuite/gdb.ada/rec_return.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } { diff --git a/gdb/testsuite/gdb.ada/ref_param.exp b/gdb/testsuite/gdb.ada/ref_param.exp index 4c378a57ae6..1bdfaebf9ce 100644 --- a/gdb/testsuite/gdb.ada/ref_param.exp +++ b/gdb/testsuite/gdb.ada/ref_param.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } { diff --git a/gdb/testsuite/gdb.ada/ref_tick_size.exp b/gdb/testsuite/gdb.ada/ref_tick_size.exp index 5676b8e269a..8f901e2ed64 100644 --- a/gdb/testsuite/gdb.ada/ref_tick_size.exp +++ b/gdb/testsuite/gdb.ada/ref_tick_size.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile p if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug]] != "" } { diff --git a/gdb/testsuite/gdb.ada/rename_subscript_param.exp b/gdb/testsuite/gdb.ada/rename_subscript_param.exp index 9507678a078..be40608c478 100644 --- a/gdb/testsuite/gdb.ada/rename_subscript_param.exp +++ b/gdb/testsuite/gdb.ada/rename_subscript_param.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + if { ![gnatmake_version_at_least 8] } { return -1 } diff --git a/gdb/testsuite/gdb.ada/repeat_dyn.exp b/gdb/testsuite/gdb.ada/repeat_dyn.exp index 4fbdc6b0806..702b10dfd44 100644 --- a/gdb/testsuite/gdb.ada/repeat_dyn.exp +++ b/gdb/testsuite/gdb.ada/repeat_dyn.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo_oc22_002 if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug]] != "" } { diff --git a/gdb/testsuite/gdb.ada/same_component_name.exp b/gdb/testsuite/gdb.ada/same_component_name.exp index 492549d67be..cb846046171 100644 --- a/gdb/testsuite/gdb.ada/same_component_name.exp +++ b/gdb/testsuite/gdb.ada/same_component_name.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } { diff --git a/gdb/testsuite/gdb.ada/same_enum.exp b/gdb/testsuite/gdb.ada/same_enum.exp index e6343009375..cd0899f289a 100644 --- a/gdb/testsuite/gdb.ada/same_enum.exp +++ b/gdb/testsuite/gdb.ada/same_enum.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile a if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } { diff --git a/gdb/testsuite/gdb.ada/scalar_storage.exp b/gdb/testsuite/gdb.ada/scalar_storage.exp index 720fc9ba501..b5e634c615b 100644 --- a/gdb/testsuite/gdb.ada/scalar_storage.exp +++ b/gdb/testsuite/gdb.ada/scalar_storage.exp @@ -18,6 +18,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile storage if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } { diff --git a/gdb/testsuite/gdb.ada/set_wstr.exp b/gdb/testsuite/gdb.ada/set_wstr.exp index edb521461fb..11f2f4778f3 100644 --- a/gdb/testsuite/gdb.ada/set_wstr.exp +++ b/gdb/testsuite/gdb.ada/set_wstr.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile a if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } { diff --git a/gdb/testsuite/gdb.ada/small_reg_param.exp b/gdb/testsuite/gdb.ada/small_reg_param.exp index 2dc9a972779..5737708e39f 100644 --- a/gdb/testsuite/gdb.ada/small_reg_param.exp +++ b/gdb/testsuite/gdb.ada/small_reg_param.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug optimize=-O1]] != "" } { diff --git a/gdb/testsuite/gdb.ada/str_binop_equal.exp b/gdb/testsuite/gdb.ada/str_binop_equal.exp index 166afea2327..fea0b197d7a 100644 --- a/gdb/testsuite/gdb.ada/str_binop_equal.exp +++ b/gdb/testsuite/gdb.ada/str_binop_equal.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo_p211_061 if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug]] != "" } { diff --git a/gdb/testsuite/gdb.ada/str_ref_cmp.exp b/gdb/testsuite/gdb.ada/str_ref_cmp.exp index 9f034ef86e3..b8299e27bf4 100644 --- a/gdb/testsuite/gdb.ada/str_ref_cmp.exp +++ b/gdb/testsuite/gdb.ada/str_ref_cmp.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug]] != "" } { diff --git a/gdb/testsuite/gdb.ada/str_uninit.exp b/gdb/testsuite/gdb.ada/str_uninit.exp index df2d1550a91..6d59b9e1a6c 100644 --- a/gdb/testsuite/gdb.ada/str_uninit.exp +++ b/gdb/testsuite/gdb.ada/str_uninit.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile parse if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } { diff --git a/gdb/testsuite/gdb.ada/sub_variant.exp b/gdb/testsuite/gdb.ada/sub_variant.exp index 381d138234d..af45096c374 100644 --- a/gdb/testsuite/gdb.ada/sub_variant.exp +++ b/gdb/testsuite/gdb.ada/sub_variant.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile subv if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } { diff --git a/gdb/testsuite/gdb.ada/sym_print_name.exp b/gdb/testsuite/gdb.ada/sym_print_name.exp index 141c4ebbcfd..e6465f24b8c 100644 --- a/gdb/testsuite/gdb.ada/sym_print_name.exp +++ b/gdb/testsuite/gdb.ada/sym_print_name.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug]] != "" } { diff --git a/gdb/testsuite/gdb.ada/taft_type.exp b/gdb/testsuite/gdb.ada/taft_type.exp index 9e2e46fec05..c546f1483c9 100644 --- a/gdb/testsuite/gdb.ada/taft_type.exp +++ b/gdb/testsuite/gdb.ada/taft_type.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile p if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } { diff --git a/gdb/testsuite/gdb.ada/tagged.exp b/gdb/testsuite/gdb.ada/tagged.exp index 4928c5d9bd4..fe49b149abe 100644 --- a/gdb/testsuite/gdb.ada/tagged.exp +++ b/gdb/testsuite/gdb.ada/tagged.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug]] != "" } { diff --git a/gdb/testsuite/gdb.ada/tagged_access.exp b/gdb/testsuite/gdb.ada/tagged_access.exp index 0633ef06238..460b90a5b47 100644 --- a/gdb/testsuite/gdb.ada/tagged_access.exp +++ b/gdb/testsuite/gdb.ada/tagged_access.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile p if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug]] != "" } { diff --git a/gdb/testsuite/gdb.ada/task_bp.exp b/gdb/testsuite/gdb.ada/task_bp.exp index a0b62dd4de1..d430428882a 100644 --- a/gdb/testsuite/gdb.ada/task_bp.exp +++ b/gdb/testsuite/gdb.ada/task_bp.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug]] != "" } { diff --git a/gdb/testsuite/gdb.ada/task_switch_in_core.exp b/gdb/testsuite/gdb.ada/task_switch_in_core.exp index ce543080c18..e288cc9092c 100644 --- a/gdb/testsuite/gdb.ada/task_switch_in_core.exp +++ b/gdb/testsuite/gdb.ada/task_switch_in_core.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile crash if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug]] != "" } { diff --git a/gdb/testsuite/gdb.ada/tasks.exp b/gdb/testsuite/gdb.ada/tasks.exp index edbd149f255..50b4c5fb0c9 100644 --- a/gdb/testsuite/gdb.ada/tasks.exp +++ b/gdb/testsuite/gdb.ada/tasks.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } { diff --git a/gdb/testsuite/gdb.ada/tick_last_segv.exp b/gdb/testsuite/gdb.ada/tick_last_segv.exp index 1872507d836..52222e1055c 100644 --- a/gdb/testsuite/gdb.ada/tick_last_segv.exp +++ b/gdb/testsuite/gdb.ada/tick_last_segv.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } { diff --git a/gdb/testsuite/gdb.ada/tick_length_array_enum_idx.exp b/gdb/testsuite/gdb.ada/tick_length_array_enum_idx.exp index 771c1793c5b..52715cf68e1 100644 --- a/gdb/testsuite/gdb.ada/tick_length_array_enum_idx.exp +++ b/gdb/testsuite/gdb.ada/tick_length_array_enum_idx.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo_n207_004 if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } { diff --git a/gdb/testsuite/gdb.ada/type_coercion.exp b/gdb/testsuite/gdb.ada/type_coercion.exp index 830108cf54c..b8167d3885e 100644 --- a/gdb/testsuite/gdb.ada/type_coercion.exp +++ b/gdb/testsuite/gdb.ada/type_coercion.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile assign if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug]] != "" } { diff --git a/gdb/testsuite/gdb.ada/unc_arr_ptr_in_var_rec.exp b/gdb/testsuite/gdb.ada/unc_arr_ptr_in_var_rec.exp index 3d78429559c..f7f3485161d 100644 --- a/gdb/testsuite/gdb.ada/unc_arr_ptr_in_var_rec.exp +++ b/gdb/testsuite/gdb.ada/unc_arr_ptr_in_var_rec.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug]] != "" } { diff --git a/gdb/testsuite/gdb.ada/unchecked_union.exp b/gdb/testsuite/gdb.ada/unchecked_union.exp index c85d7c33153..0f598f5465f 100644 --- a/gdb/testsuite/gdb.ada/unchecked_union.exp +++ b/gdb/testsuite/gdb.ada/unchecked_union.exp @@ -17,6 +17,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile unchecked_union proc multi_line_string {str} { diff --git a/gdb/testsuite/gdb.ada/uninitialized_vars.exp b/gdb/testsuite/gdb.ada/uninitialized_vars.exp index 9f427ccdef0..5402da915a2 100644 --- a/gdb/testsuite/gdb.ada/uninitialized_vars.exp +++ b/gdb/testsuite/gdb.ada/uninitialized_vars.exp @@ -18,6 +18,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile parse if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug]] != "" } { diff --git a/gdb/testsuite/gdb.ada/var_arr_attrs.exp b/gdb/testsuite/gdb.ada/var_arr_attrs.exp index 0b69e98d602..b2612a89f20 100644 --- a/gdb/testsuite/gdb.ada/var_arr_attrs.exp +++ b/gdb/testsuite/gdb.ada/var_arr_attrs.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo_o115_002 if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug]] != "" } { diff --git a/gdb/testsuite/gdb.ada/var_arr_typedef.exp b/gdb/testsuite/gdb.ada/var_arr_typedef.exp index 583934abab0..79c0dead025 100644 --- a/gdb/testsuite/gdb.ada/var_arr_typedef.exp +++ b/gdb/testsuite/gdb.ada/var_arr_typedef.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile var_arr_typedef if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug]] != "" } { diff --git a/gdb/testsuite/gdb.ada/var_rec_arr.exp b/gdb/testsuite/gdb.ada/var_rec_arr.exp index 80ec32616a9..c2ad97b31e2 100644 --- a/gdb/testsuite/gdb.ada/var_rec_arr.exp +++ b/gdb/testsuite/gdb.ada/var_rec_arr.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo_na09_042 # Note we don't test the "none" (no -fgnat-encodings option) scenario diff --git a/gdb/testsuite/gdb.ada/variant-record.exp b/gdb/testsuite/gdb.ada/variant-record.exp index 82b73c6a596..176984a5450 100644 --- a/gdb/testsuite/gdb.ada/variant-record.exp +++ b/gdb/testsuite/gdb.ada/variant-record.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile proc if {[gdb_compile_ada "${srcfile}" "${binfile}" executable debug] != ""} { diff --git a/gdb/testsuite/gdb.ada/variant.exp b/gdb/testsuite/gdb.ada/variant.exp index da51f7ba2e8..9f55f9b3564 100644 --- a/gdb/testsuite/gdb.ada/variant.exp +++ b/gdb/testsuite/gdb.ada/variant.exp @@ -16,6 +16,8 @@ load_lib "ada.exp" load_lib "gdb-python.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile pkg foreach_with_prefix scenario {none all minimal} { diff --git a/gdb/testsuite/gdb.ada/variant_record_packed_array.exp b/gdb/testsuite/gdb.ada/variant_record_packed_array.exp index 0530df54d4e..e10c62b7bbf 100644 --- a/gdb/testsuite/gdb.ada/variant_record_packed_array.exp +++ b/gdb/testsuite/gdb.ada/variant_record_packed_array.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } { diff --git a/gdb/testsuite/gdb.ada/varsize_limit.exp b/gdb/testsuite/gdb.ada/varsize_limit.exp index 8f5d9da358e..3d3eff0129d 100644 --- a/gdb/testsuite/gdb.ada/varsize_limit.exp +++ b/gdb/testsuite/gdb.ada/varsize_limit.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile vsizelim if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } { diff --git a/gdb/testsuite/gdb.ada/whatis_array_val.exp b/gdb/testsuite/gdb.ada/whatis_array_val.exp index b0b1160a11c..bf986c7b3b6 100644 --- a/gdb/testsuite/gdb.ada/whatis_array_val.exp +++ b/gdb/testsuite/gdb.ada/whatis_array_val.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } { diff --git a/gdb/testsuite/gdb.ada/widewide.exp b/gdb/testsuite/gdb.ada/widewide.exp index 198535c737a..5f4e5be5819 100644 --- a/gdb/testsuite/gdb.ada/widewide.exp +++ b/gdb/testsuite/gdb.ada/widewide.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } { diff --git a/gdb/testsuite/gdb.ada/win_fu_syms.exp b/gdb/testsuite/gdb.ada/win_fu_syms.exp index f27b0a82ab6..28b1ee3a6b0 100644 --- a/gdb/testsuite/gdb.ada/win_fu_syms.exp +++ b/gdb/testsuite/gdb.ada/win_fu_syms.exp @@ -15,6 +15,8 @@ load_lib "ada.exp" +if { [skip_ada_tests] } { return -1 } + standard_ada_testfile foo if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug additional_flags=-bargs additional_flags=-shared additional_flags=-margs]] != "" } { -- 2.30.2