diff options
| author | Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE> | 2017-12-12 13:08:31 +0000 |
|---|---|---|
| committer | Rainer Orth <ro@gcc.gnu.org> | 2017-12-12 13:08:31 +0000 |
| commit | 2f1392aee192c9fe8781d7c0979659f6d60cd1db (patch) | |
| tree | 4b344488a38fa8e9da747407928f94071bf91c11 /gcc | |
| parent | a365945b404c846e8737eb975dcd9f6253f1936b (diff) | |
| download | gcc-2f1392aee192c9fe8781d7c0979659f6d60cd1db.zip gcc-2f1392aee192c9fe8781d7c0979659f6d60cd1db.tar.gz gcc-2f1392aee192c9fe8781d7c0979659f6d60cd1db.tar.bz2 | |
Fix g++.old-deja/g++.pt/const2.C on Solaris
* lib/gcc-dg.exp (process-message): Avoid additional whitespace in
$expmsg.
From-SVN: r255580
Diffstat (limited to 'gcc')
| -rw-r--r-- | gcc/testsuite/ChangeLog | 5 | ||||
| -rw-r--r-- | gcc/testsuite/lib/gcc-dg.exp | 5 |
2 files changed, 8 insertions, 2 deletions
diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index 09fe88b..f259bbf 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,3 +1,8 @@ +2017-12-12 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE> + + * lib/gcc-dg.exp (process-message): Avoid additional whitespace in + $expmsg. + 2017-12-12 Richard Biener <rguenther@suse.de> PR tree-optimization/83385 diff --git a/gcc/testsuite/lib/gcc-dg.exp b/gcc/testsuite/lib/gcc-dg.exp index 98366dc..899a835 100644 --- a/gcc/testsuite/lib/gcc-dg.exp +++ b/gcc/testsuite/lib/gcc-dg.exp @@ -1103,14 +1103,15 @@ proc process-message { msgproc msgprefix dgargs } { # Remove it from the original expression and move it # to the proper place in the search expression. set expmsg [string range $expmsg [string length $column] end] + set column "$column " } elseif [string match "" [lindex $newentry 0]] { # The specified line number is 0; don't expect a column number. } else { # There is no column number in the search expression, but we # should expect one in the message itself. - set column {[0-9]+:} + set column {[0-9]+: } } - set expmsg "$column $msgprefix\[^\n\]*$expmsg" + set expmsg "$column$msgprefix\[^\n\]*$expmsg" set newentry [lreplace $newentry 2 2 $expmsg] set dg-messages [lreplace ${dg-messages} end end $newentry] |