1# This testcase is part of GDB, the GNU debugger. 2# 3# Copyright 2013-2016 Free Software Foundation, Inc. 4# 5# Contributed by Intel Corp. <markus.t.metzger@intel.com> 6# 7# This program is free software; you can redistribute it and/or modify 8# it under the terms of the GNU General Public License as published by 9# the Free Software Foundation; either version 3 of the License, or 10# (at your option) any later version. 11# 12# This program is distributed in the hope that it will be useful, 13# but WITHOUT ANY WARRANTY; without even the implied warranty of 14# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 15# GNU General Public License for more details. 16# 17# You should have received a copy of the GNU General Public License 18# along with this program. If not, see <http://www.gnu.org/licenses/>. 19 20# check for btrace support 21if { [skip_btrace_tests] } { return -1 } 22 23# start inferior 24standard_testfile 25 26# discard local symbols 27set ldflags "additional_flags=-Wl,-x" 28if [prepare_for_testing $testfile.exp $testfile $srcfile $ldflags] { 29 return -1 30} 31if ![runto test] { 32 return -1 33} 34 35# we want to see the full trace for this test 36gdb_test_no_output "set record function-call-history-size 0" 37 38# trace from one call of test to the next 39gdb_test_no_output "record btrace" 40gdb_continue_to_breakpoint "cont to test" ".*test.*" 41 42# show the flat branch trace 43gdb_test "record function-call-history 1" [multi_line \ 44 "1\ttest" \ 45 "2\t\\\?\\\?" \ 46 "3\t\\\?\\\?" \ 47 "4\t\\\?\\\?" \ 48 "5\ttest" \ 49 "6\tmain" \ 50 "7\ttest" \ 51 ] "flat" 52 53# show the branch trace with calls indented 54gdb_test "record function-call-history /c 1" [multi_line \ 55 "1\t test" \ 56 "2\t \\\?\\\?" \ 57 "3\t \\\?\\\?" \ 58 "4\t \\\?\\\?" \ 59 "5\t test" \ 60 "6\tmain" \ 61 "7\t test" \ 62 ] "indented" 63