xref: /netbsd-src/external/gpl3/gdb/dist/gdb/testsuite/gdb.reverse/finish-reverse-bkpt.exp (revision dd3ee07da436799d8de85f3055253118b76bf345)
1# Copyright 2008-2020 Free Software Foundation, Inc.
2
3# This program is free software; you can redistribute it and/or modify
4# it under the terms of the GNU General Public License as published by
5# the Free Software Foundation; either version 3 of the License, or
6# (at your option) any later version.
7#
8# This program is distributed in the hope that it will be useful,
9# but WITHOUT ANY WARRANTY; without even the implied warranty of
10# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
11# GNU General Public License for more details.
12#
13# You should have received a copy of the GNU General Public License
14# along with this program.  If not, see <http://www.gnu.org/licenses/>.
15
16# This file is part of the GDB testsuite.
17#
18# 'reverse-finish' used to have a bug where user breakpoints set at
19# the functions entry would be ignored.  Make sure the bug doesn't
20# reappear.
21
22if ![supports_reverse] {
23    return
24}
25
26standard_testfile finish-reverse.c
27
28if { [prepare_for_testing "failed to prepare" "$testfile" $srcfile] } {
29    return -1
30}
31
32if ![runto_main] then {
33    fail "can't run to main"
34    return 0
35}
36
37if [supports_process_record] {
38    # Activate process record/replay
39    gdb_test_no_output "record" "turn on process record"
40}
41
42set breakloc [gdb_get_line_number "VOID FUNC" "$srcfile"]
43gdb_test "tbreak void_func" \
44    "Temporary breakpoint $decimal at .*$srcfile, line $breakloc\." \
45    "set breakpoint on void_func"
46gdb_continue_to_breakpoint "void_func" ".*$srcfile:$breakloc.*"
47
48# We stop at the brekapoint on void_func, but breakpoint on
49# *void_func will be set at the same place if function void_func doesn't
50# have prologue.  One step forward to avoid this.
51gdb_test "si"
52
53gdb_test "break \*void_func" \
54    "Breakpoint $decimal at .*" \
55    "set breakpoint at void_func's entry"
56
57gdb_test "reverse-finish" \
58    ".*Breakpoint .*, void_func.*" \
59    "reverse-finish from void_func trips breakpoint at entry"
60
61gdb_test "frame" "#0  void_func.*" "no spurious proceed after breakpoint stop"
62