diff options
| author | Tom de Vries <tdevries@suse.de> | 2018-08-04 21:42:53 +0000 |
|---|---|---|
| committer | Tom de Vries <vries@gcc.gnu.org> | 2018-08-04 21:42:53 +0000 |
| commit | 3d3e5ba2622feb993d38d805c73fbcae8397a943 (patch) | |
| tree | 523148ccfaedeace4389cfc8254eea86885f3fc4 | |
| parent | 099400909ed214b5fbf04404bbbc823fdb355b96 (diff) | |
| download | gcc-3d3e5ba2622feb993d38d805c73fbcae8397a943.zip gcc-3d3e5ba2622feb993d38d805c73fbcae8397a943.tar.gz gcc-3d3e5ba2622feb993d38d805c73fbcae8397a943.tar.bz2 | |
[testsuite, guality] Use absolute line number in pass/fail line
2018-08-04 Tom de Vries <tdevries@suse.de>
* lib/gcc-gdb-test.exp: Use absolute line number in pass/fail line.
From-SVN: r263311
| -rw-r--r-- | gcc/testsuite/ChangeLog | 4 | ||||
| -rw-r--r-- | gcc/testsuite/lib/gcc-gdb-test.exp | 13 |
2 files changed, 11 insertions, 6 deletions
diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index 8bf5eaf..a1f3b5b 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,3 +1,7 @@ +2018-08-04 Tom de Vries <tdevries@suse.de> + + * lib/gcc-gdb-test.exp: Use absolute line number in pass/fail line. + 2018-08-04 Andreas Schwab <schwab@linux-m68k.org> * gcc.dg/guality/const-volatile.c: Remove duplicate test diff --git a/gcc/testsuite/lib/gcc-gdb-test.exp b/gcc/testsuite/lib/gcc-gdb-test.exp index b13d3ec..0066e15 100644 --- a/gcc/testsuite/lib/gcc-gdb-test.exp +++ b/gcc/testsuite/lib/gcc-gdb-test.exp @@ -54,18 +54,19 @@ proc gdb-test { useline args } { set var $arg1 } - set gdb_name $::env(GUALITY_GDB_NAME) - set testname "$testcase line [lindex $args 0] [lindex $args 1] == [lindex $args 2]" - set output_file "[file rootname [file tail $prog]].exe" - set cmd_file "[file rootname [file tail $prog]].gdb" - - set fd [open $cmd_file "w"] set line [lindex $args 0] if { [string range $line 0 0] == "@" } { set line [string range $line 1 end] } else { set line [get-absolute-line $useline $line] } + + set gdb_name $::env(GUALITY_GDB_NAME) + set testname "$testcase line $line [lindex $args 1] == [lindex $args 2]" + set output_file "[file rootname [file tail $prog]].exe" + set cmd_file "[file rootname [file tail $prog]].gdb" + + set fd [open $cmd_file "w"] puts $fd "break $line" puts $fd "run" puts $fd "$command $var" |