From: Ian Lance Taylor Date: Thu, 24 Oct 2013 19:08:45 +0000 (+0000) Subject: go-test.exp (errchk): Combine quoted strings in comments. X-Git-Tag: releases/gcc-4.9.0~3243 X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=ccc23115665abdfad7394cc9dbc0c64e79a0164d;p=thirdparty%2Fgcc.git go-test.exp (errchk): Combine quoted strings in comments. * go.test/go-test.exp (errchk): Combine quoted strings in comments. From-SVN: r204033 --- diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index 02a436a5c36d..bbaf9fd5aace 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,3 +1,8 @@ +2013-10-24 Ian Lance Taylor + + * go.test/go-test.exp (errchk): Combine quoted strings in + comments. + 2013-10-24 Cong Hou * gcc.c-torture/execute/20030125-1.c: Update. diff --git a/gcc/testsuite/go.test/go-test.exp b/gcc/testsuite/go.test/go-test.exp index 284bc99e2c06..1a636573d731 100644 --- a/gcc/testsuite/go.test/go-test.exp +++ b/gcc/testsuite/go.test/go-test.exp @@ -90,6 +90,21 @@ proc errchk { test opts } { puts $fdout $copy_line continue } + + # Combine quoted strings in comments, so that + # // ERROR "first error" "second error" + # turns into + # // ERROR "first error|second error" + # This format is used by the master testsuite to recognize + # multiple errors on a single line. We don't require that all + # the errors be present, but we do want to accept any of them. + set changed "" + while { $changed != $copy_line } { + set changed $copy_line + regsub "\(// \[^\"\]*\"\[^\"\]*\)\" \"" $copy_line "\\1|" out_line + set copy_line $out_line + } + regsub "// \(GCCGO_\)?ERROR \"\(\[^\"\]*\)\".*$" $copy_line "// \{ dg-error \"\\2\" \}" out_line if [string match "*dg-error*\\\[*" $out_line] { set index [string first "dg-error" $out_line]