OLD | NEW |
1 # Copyright 1988, 1990-1992, 1994-2000, 2002-2003, 2007-2012 Free | 1 # Copyright 1988-2013 Free Software Foundation, Inc. |
2 # Software Foundation, Inc. | |
3 | 2 |
4 # This program is free software; you can redistribute it and/or modify | 3 # This program is free software; you can redistribute it and/or modify |
5 # it under the terms of the GNU General Public License as published by | 4 # it under the terms of the GNU General Public License as published by |
6 # the Free Software Foundation; either version 3 of the License, or | 5 # the Free Software Foundation; either version 3 of the License, or |
7 # (at your option) any later version. | 6 # (at your option) any later version. |
8 # | 7 # |
9 # This program is distributed in the hope that it will be useful, | 8 # This program is distributed in the hope that it will be useful, |
10 # but WITHOUT ANY WARRANTY; without even the implied warranty of | 9 # but WITHOUT ANY WARRANTY; without even the implied warranty of |
11 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | 10 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
12 # GNU General Public License for more details. | 11 # GNU General Public License for more details. |
(...skipping 499 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
512 # OK, we should be back in the same stack frame we started from. | 511 # OK, we should be back in the same stack frame we started from. |
513 # Do a backtrace just to confirm. | 512 # Do a backtrace just to confirm. |
514 | 513 |
515 set result [gdb_test "backtrace" \ | 514 set result [gdb_test "backtrace" \ |
516 "#0\[ \t\]+ factorial .value=120.*\r\n#1\[ \t\]+ \[0-9a-fx\]+ in factori
al .value=6..*" \ | 515 "#0\[ \t\]+ factorial .value=120.*\r\n#1\[ \t\]+ \[0-9a-fx\]+ in factori
al .value=6..*" \ |
517 "backtrace from factorial(5.1)"] | 516 "backtrace from factorial(5.1)"] |
518 if { $result != 0 } { gdb_suppress_tests } | 517 if { $result != 0 } { gdb_suppress_tests } |
519 | 518 |
520 if [target_info exists gdb,noresults] { gdb_suppress_tests } | 519 if [target_info exists gdb,noresults] { gdb_suppress_tests } |
521 gdb_continue_to_end "recursive next test" | 520 gdb_continue_to_end "recursive next test" |
522 gdb_stop_suppressing_tests; | 521 gdb_stop_suppressing_tests |
523 } | 522 } |
524 | 523 |
525 test_next_with_recursion | 524 test_next_with_recursion |
526 | 525 |
527 | 526 |
528 #******** | 527 #******** |
529 | 528 |
530 # Build a new file with optimization enabled so that we can try breakpoints | 529 # Build a new file with optimization enabled so that we can try breakpoints |
531 # on targets with optimized prologues. | 530 # on targets with optimized prologues. |
532 | 531 |
(...skipping 61 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
594 pass "run until hardware breakpoint set at small function, optimized
file (line bp_location14)" | 593 pass "run until hardware breakpoint set at small function, optimized
file (line bp_location14)" |
595 } | 594 } |
596 -re "Breakpoint $decimal, factorial \\(.*\\) .*\{\r\n$gdb_prompt" { | 595 -re "Breakpoint $decimal, factorial \\(.*\\) .*\{\r\n$gdb_prompt" { |
597 # GCC 4.3 emits bad line number information - see gcc/36748. | 596 # GCC 4.3 emits bad line number information - see gcc/36748. |
598 if { [test_compiler_info "gcc-4-3-*"] } { | 597 if { [test_compiler_info "gcc-4-3-*"] } { |
599 setup_xfail *-*-* | 598 setup_xfail *-*-* |
600 } | 599 } |
601 fail "run until hardware breakpoint set at small function, optimized
file" | 600 fail "run until hardware breakpoint set at small function, optimized
file" |
602 } | 601 } |
603 } | 602 } |
OLD | NEW |