922a7c7c5d
Reorganizes how JIT related test files to be more clear what are related to JIT reader system tests and what use JIT from ELF objfiles. Those two approaches are quite different in GDB implementation and require very different test setup. Keeping distinction clear at the file name level makes it easier to maintain the testsuite. gdb/testsuite/ChangeLog: 2020-02-18 Mihails Strasuns <mihails.strasuns@intel.com> * gdb.base: Rename all jit related test and source files.
52 lines
1.5 KiB
Text
52 lines
1.5 KiB
Text
# Copyright 2018-2020 Free Software Foundation, Inc.
|
|
|
|
# This program is free software; you can redistribute it and/or modify
|
|
# it under the terms of the GNU General Public License as published by
|
|
# the Free Software Foundation; either version 3 of the License, or
|
|
# (at your option) any later version.
|
|
#
|
|
# This program is distributed in the hope that it will be useful,
|
|
# but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
# GNU General Public License for more details.
|
|
#
|
|
# You should have received a copy of the GNU General Public License
|
|
# along with this program. If not, see <http://www.gnu.org/licenses/>.
|
|
|
|
# Regression test for a jit.c bug. Previously it would crash if an
|
|
# inferior that used the JIT API then exec'd a program that did not
|
|
# use it.
|
|
|
|
if { ![istarget "*-linux*"] } then {
|
|
return
|
|
}
|
|
|
|
standard_testfile jit-reader-exec.c
|
|
|
|
set testfile2 "jit-reader-execd"
|
|
set srcfile2 ${testfile2}.c
|
|
set binfile2 [standard_output_file ${testfile2}]
|
|
|
|
set compile_options [list debug additional_flags=-DPROGRAM=\"$binfile2\"]
|
|
|
|
if {[gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" \
|
|
executable $compile_options] != ""} {
|
|
untested "failed to compile"
|
|
return -1
|
|
}
|
|
|
|
if {[gdb_compile "${srcdir}/${subdir}/${srcfile2}" "${binfile2}" \
|
|
executable $compile_options] != ""} {
|
|
untested "failed to compile"
|
|
return -1
|
|
}
|
|
|
|
clean_restart $binfile
|
|
|
|
if {![runto_main]} {
|
|
fail "can't run to main"
|
|
return
|
|
}
|
|
|
|
delete_breakpoints
|
|
gdb_test "continue" "Inferior .* exited normally.*"
|