diff options
author | Tom de Vries <tdevries@suse.de> | 2018-07-01 18:28:24 +0000 |
---|---|---|
committer | Tom de Vries <vries@gcc.gnu.org> | 2018-07-01 18:28:24 +0000 |
commit | 518ab2a0ecc0c3cacb73d8e054e71b78c492e36b (patch) | |
tree | 41593d851455c6e04b8e5e8ee9878be77c94e4c9 /gcc | |
parent | 81d3b8f7029f8790211628e308a766783193a8ef (diff) | |
download | gcc-518ab2a0ecc0c3cacb73d8e054e71b78c492e36b.zip gcc-518ab2a0ecc0c3cacb73d8e054e71b78c492e36b.tar.gz gcc-518ab2a0ecc0c3cacb73d8e054e71b78c492e36b.tar.bz2 |
[testsuite/guality] Use @main as bp loc instead of line nrs in const-volatile.c
2018-07-01 Tom de Vries <tdevries@suse.de>
* lib/gcc-gdb-test.exp (gdb-test): Handle '@' prefix in line number
argument.
* gcc.dg/guality/const-volatile.c: Replace gdb-test line nrs 50 and 58
with @main.
From-SVN: r262288
Diffstat (limited to 'gcc')
-rw-r--r-- | gcc/testsuite/ChangeLog | 7 | ||||
-rw-r--r-- | gcc/testsuite/gcc.dg/guality/const-volatile.c | 44 | ||||
-rw-r--r-- | gcc/testsuite/lib/gcc-gdb-test.exp | 7 |
3 files changed, 35 insertions, 23 deletions
diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index b8b00f5..df7edd9 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,5 +1,12 @@ 2018-07-01 Tom de Vries <tdevries@suse.de> + * lib/gcc-gdb-test.exp (gdb-test): Handle '@' prefix in line number + argument. + * gcc.dg/guality/const-volatile.c: Replace gdb-test line nrs 50 and 58 + with @main. + +2018-07-01 Tom de Vries <tdevries@suse.de> + * gcc.dg/guality/prevent-optimization.h (VOLATILE): Define. * gcc.dg/guality/vla-1.c (f1): Mark local vla a as VOLATILE. diff --git a/gcc/testsuite/gcc.dg/guality/const-volatile.c b/gcc/testsuite/gcc.dg/guality/const-volatile.c index d657f48..3bfca0d 100644 --- a/gcc/testsuite/gcc.dg/guality/const-volatile.c +++ b/gcc/testsuite/gcc.dg/guality/const-volatile.c @@ -62,33 +62,33 @@ main (int argc, char **argv) return f (argv[0], &dummy, as) - 1; } -/* { dg-final { gdb-test 50 "type:main" "int (int, char **)" } } */ +/* { dg-final { gdb-test "@main" "type:main" "int (int, char **)" } } */ -/* { dg-final { gdb-test 50 "type:i" "int" } } */ -/* { dg-final { gdb-test 50 "type:ci" "const int" } } */ -/* { dg-final { gdb-test 50 "type:vi" "volatile int" } } */ -/* { dg-final { gdb-test 50 "type:cvi" "const volatile int" } } */ +/* { dg-final { gdb-test "@main" "type:i" "int" } } */ +/* { dg-final { gdb-test "@main" "type:ci" "const int" } } */ +/* { dg-final { gdb-test "@main" "type:vi" "volatile int" } } */ +/* { dg-final { gdb-test "@main" "type:cvi" "const volatile int" } } */ -/* { dg-final { gdb-test 50 "type:pi" "int *" } } */ -/* { dg-final { gdb-test 50 "type:pci" "const int *" } } */ -/* { dg-final { gdb-test 50 "type:pvi" "volatile int *" } } */ -/* { dg-final { gdb-test 50 "type:pcvi" "const volatile int *" } } */ +/* { dg-final { gdb-test "@main" "type:pi" "int *" } } */ +/* { dg-final { gdb-test "@main" "type:pci" "const int *" } } */ +/* { dg-final { gdb-test "@main" "type:pvi" "volatile int *" } } */ +/* { dg-final { gdb-test "@main" "type:pcvi" "const volatile int *" } } */ -/* { dg-final { gdb-test 50 "type:cip" "int * const" } } */ -/* { dg-final { gdb-test 50 "type:vip" "int * volatile" } } */ -/* { dg-final { gdb-test 50 "type:cvip" "int * const volatile" } } */ +/* { dg-final { gdb-test "@main" "type:cip" "int * const" } } */ +/* { dg-final { gdb-test "@main" "type:vip" "int * volatile" } } */ +/* { dg-final { gdb-test "@main" "type:cvip" "int * const volatile" } } */ -/* { dg-final { gdb-test 50 "type:vs" "volatile struct { const long cli; const signed char csc; }" } } */ +/* { dg-final { gdb-test "@main" "type:vs" "volatile struct { const long cli; const signed char csc; }" } } */ -/* { dg-final { gdb-test 50 "type:cvip" "int * const volatile" } } */ +/* { dg-final { gdb-test "@main" "type:cvip" "int * const volatile" } } */ -/* { dg-final { gdb-test 50 "type:bar" "struct bar { short s; const short cs; volatile short vs; const volatile short cvs; volatile long long vll; }" } } */ -/* { dg-final { gdb-test 50 "type:foo" "struct foo { const long cli; const signed char csc; }" } } */ -/* { dg-final { gdb-test 50 "type:cfoo" "const struct foo { const long cli; const signed char csc; }" } } */ -/* { dg-final { gdb-test 50 "type:vfoo" "volatile struct foo { const long cli; const signed char csc; }" } } */ -/* { dg-final { gdb-test 50 "type:cvfoo" "const volatile struct foo { const long cli; const signed char csc; }" } } */ +/* { dg-final { gdb-test "@main" "type:bar" "struct bar { short s; const short cs; volatile short vs; const volatile short cvs; volatile long long vll; }" } } */ +/* { dg-final { gdb-test "@main" "type:foo" "struct foo { const long cli; const signed char csc; }" } } */ +/* { dg-final { gdb-test "@main" "type:cfoo" "const struct foo { const long cli; const signed char csc; }" } } */ +/* { dg-final { gdb-test "@main" "type:vfoo" "volatile struct foo { const long cli; const signed char csc; }" } } */ +/* { dg-final { gdb-test "@main" "type:cvfoo" "const volatile struct foo { const long cli; const signed char csc; }" } } */ -/* { dg-final { gdb-test 58 "type:s" "volatile signed char" } } */ -/* { dg-final { gdb-test 50 "type:cs" "const volatile signed char" } } */ +/* { dg-final { gdb-test "@main" "type:s" "volatile signed char" } } */ +/* { dg-final { gdb-test "@main" "type:cs" "const volatile signed char" } } */ -/* { dg-final { gdb-test 50 "type:f" "int (const char *, volatile struct foo *, const score)" } } */ +/* { dg-final { gdb-test "@main" "type:f" "int (const char *, volatile struct foo *, const score)" } } */ diff --git a/gcc/testsuite/lib/gcc-gdb-test.exp b/gcc/testsuite/lib/gcc-gdb-test.exp index c446f5b..bb966d4 100644 --- a/gcc/testsuite/lib/gcc-gdb-test.exp +++ b/gcc/testsuite/lib/gcc-gdb-test.exp @@ -60,7 +60,12 @@ proc gdb-test { useline args } { set cmd_file "[file rootname [file tail $prog]].gdb" set fd [open $cmd_file "w"] - set line [get-absolute-line $useline [lindex $args 0]] + 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] + } puts $fd "break $line" puts $fd "run" puts $fd "$command $var" |