-2020-08-12 Gary Benson <gbenson@redhat.com>
+2020-08-13 Pedro Alves <pedro@palves.net>
+
+ * 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 <gbenson@redhat.com>
* gdb.dwarf2/dw2-op-out-param.S (.Ltext5): Fix duplicate label.
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile foo
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug]] != "" } {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile foo
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug]] != "" } {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile foo
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug]] != "" } {
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 ]] != "" } {
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 ]] != "" } {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile foo
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } {
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 ]] != "" } {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile bar
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile foo
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug]] != "" } {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile foo
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug]] != "" } {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile p
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug]] != "" } {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile foo
set cfile "inc"
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile foo
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug]] != "" } {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile foo
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
gdb_exit
gdb_start
gdb_reinitialize_dir $srcdir/$subdir
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]] != "" } {
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 ]] != "" } {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile "foo"
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug]] != "" } {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile foo
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile bias
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable \
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
gdb_exit
gdb_start
gdb_reinitialize_dir $srcdir/$subdir
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile foo_h731_021
set cfile "bar"
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile p
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile foo
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile foo
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile foo
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile foo
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile foo
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } {
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 ]] != "" } {
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 ]] != "" } {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile foo
set ofile ${binfile}.o
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile foo
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile foo
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug]] != "" } {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile foo
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile a
set cfile "foo"
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile pb16_063
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile x
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable \
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 ]] != "" } {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile foo
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable debug] != ""} {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile foo
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile p
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile foo
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } {
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 ]] != "" } {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile foo
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } {
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 ]] != "" } {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile p
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } {
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 ]] != "" } {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile fixed
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile formatted_ref
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile bla
set cfile "foo"
set csrcfile ${srcdir}/${subdir}/${testdir}/${cfile}.c
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile foo
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile foo
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile foo
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile foo
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile foo
if {[gdb_compile_ada "$srcfile" "$binfile" executable [list debug]] != "" } {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile fun_renaming
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug]] != "" } {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile foo
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug]] != "" } {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile foo
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug]] != "" } {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile foo
if {[gdb_compile_ada "$srcfile" "$binfile" executable [list debug]] != "" } {
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
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile homonym_main
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug]] != "" } {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile foo
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } {
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
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile foo
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug]] != "" } {
# You should have received a copy of the GNU General Public License
# along with this program. If not, see <http://www.gnu.org/licenses/>.
+if { [skip_ada_tests] } { return -1 }
+
standard_testfile .c
if { [prepare_for_testing "failed to prepare" ${testfile} ${srcfile}] } {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile foo
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug]] != "" } {
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 ]] != "" } {
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 ]] != "" } {
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
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile length_cond
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable debug] != "" } {
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 ]] != "" } {
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 ]] != "" } {
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 ]] != "" } {
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 ]] != "" } {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile foo
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug]] != "" } {
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 ]] != "" } {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile foo
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug]] != "" } {
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 ]] != "" } {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
if { ![gnatmake_version_at_least 8] } {
return -1
}
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]] != "" } {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile bar
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug]] != "" } {
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 ]] != "" } {
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 ]] != "" } {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile bar
load_lib mi-support.exp
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile bar
load_lib mi-support.exp
load_lib "ada.exp"
load_lib "gdb-python.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile pkg
load_lib mi-support.exp
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile foo_qb07_057
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable ""] != "" } {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile foo
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile hello
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile foo
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug]] != "" } {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile foo
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } {
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}] != ""} {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile tester
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug]] != "" } {
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
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile foo
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug]] != "" } {
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 ]] != "" } {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile dummy start
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile foo
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } {
# You should have received a copy of the GNU General Public License
# along with this program. If not, see <http://www.gnu.org/licenses/>.
+if { [skip_ada_tests] } { return -1 }
+
gdb_exit
gdb_start
gdb_reinitialize_dir $srcdir/$subdir
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 ]] != "" } {
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 ]] != "" } {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile foo
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } {
# You should have received a copy of the GNU General Public License
# along with this program. If not, see <http://www.gnu.org/licenses/>.
+if { [skip_ada_tests] } { return -1 }
+
standard_testfile .c
if {[prepare_for_testing "failed to prepare" ${testfile} ${srcfile}]} {
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]] != "" } {
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] != ""} {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile foo
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } {
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 ]] != "" } {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile foo
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile foo
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile p
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug]] != "" } {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
if { ![gnatmake_version_at_least 8] } {
return -1
}
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]] != "" } {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile foo
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile a
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile storage
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile a
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } {
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]] != "" } {
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]] != "" } {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile foo
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug]] != "" } {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile parse
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile subv
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile foo
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug]] != "" } {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile p
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile foo
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug]] != "" } {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile p
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug]] != "" } {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile foo
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug]] != "" } {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile crash
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug]] != "" } {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile foo
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile foo
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } {
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 ]] != "" } {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile assign
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug]] != "" } {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile foo
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug]] != "" } {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile unchecked_union
proc multi_line_string {str} {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile parse
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug]] != "" } {
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]] != "" } {
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]] != "" } {
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
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile proc
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable debug] != ""} {
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} {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile foo
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile vsizelim
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile foo
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } {
load_lib "ada.exp"
+if { [skip_ada_tests] } { return -1 }
+
standard_ada_testfile foo
if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } {
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]] != "" } {