diff options
author | Thomas Schwinge <thomas@codesourcery.com> | 2020-06-30 07:18:19 +0200 |
---|---|---|
committer | Thomas Schwinge <thomas@codesourcery.com> | 2020-07-24 13:21:51 +0200 |
commit | 3407bfc136bb6b9cf8e25eb753b448b527590b3b (patch) | |
tree | 48cd807862bf0879cb4c9ae5325927179d262f61 | |
parent | ab240ab50990c01cb657b4a4306ed6f4b2d4fb6e (diff) | |
download | gcc-3407bfc136bb6b9cf8e25eb753b448b527590b3b.zip gcc-3407bfc136bb6b9cf8e25eb753b448b527590b3b.tar.gz gcc-3407bfc136bb6b9cf8e25eb753b448b527590b3b.tar.bz2 |
[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.
-rw-r--r-- | gcc/testsuite/lib/scandump.exp | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/testsuite/lib/scandump.exp b/gcc/testsuite/lib/scandump.exp index 6cb208f..1cf1559 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] |