[testsuite] Fix TCL syntax error in 'scan-dump-dem-not'

ERROR: [...]: error executing dg-final: missing close-bracket

Bug introduced in commit 2ef1bce664 (r188996),
long ago.

	gcc/testsuite/
	* lib/scandump.exp (scan-dump-dem-not): Fix TCL syntax error.
This commit is contained in:
Thomas Schwinge 2020-06-30 07:18:19 +02:00
parent ab240ab509
commit 3407bfc136

View file

@ -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]