From 3407bfc136bb6b9cf8e25eb753b448b527590b3b Mon Sep 17 00:00:00 2001 From: Thomas Schwinge Date: Tue, 30 Jun 2020 07:18:19 +0200 Subject: [PATCH] [testsuite] Fix TCL syntax error in 'scan-dump-dem-not' ERROR: [...]: error executing dg-final: missing close-bracket Bug introduced in commit 2ef1bce664881cd59dac7db6c3f3b5709d858bfe (r188996), long ago. gcc/testsuite/ * lib/scandump.exp (scan-dump-dem-not): Fix TCL syntax error. --- gcc/testsuite/lib/scandump.exp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/gcc/testsuite/lib/scandump.exp b/gcc/testsuite/lib/scandump.exp index 6cb208f1cef..1cf1559cfff 100644 --- a/gcc/testsuite/lib/scandump.exp +++ b/gcc/testsuite/lib/scandump.exp @@ -301,7 +301,7 @@ proc scan-dump-dem-not { args } { set testcase [testname-for-summary] # The name might include a list of options; extract the file name. set filename [lindex $testcase 0] - set printable_pattern [make_pattern_printable [lindex $args 1] + set printable_pattern [make_pattern_printable [lindex $args 1]] set suf [dump-suffix [lindex $args 2]] set testname "$testcase scan-[lindex $args 0]-dump-dem-not $suf \"$printable_pattern\"" set src [file tail $filename] -- 2.30.2