scandump.exp (scan-dump, [...]): Use printable pattern in test name.
* lib/scandump.exp (scan-dump, scan-dump-not, scan-dump-dem, scan-dump-dem-not): Use printable pattern in test name. From-SVN: r188996
This commit is contained in:
parent
8a0320ad5e
commit
2ef1bce664
@ -1,3 +1,8 @@
|
||||
2012-06-26 Janis Johnson <janisjo@codesourcery.com>
|
||||
|
||||
* lib/scandump.exp (scan-dump, scan-dump-not, scan-dump-dem,
|
||||
scan-dump-dem-not): Use printable pattern in test name.
|
||||
|
||||
2012-06-26 Sterling Augustine <saugustine@google.com>
|
||||
Dominique Dhumieres <dominiq@lps.ens.fr>
|
||||
|
||||
|
@ -47,8 +47,9 @@ proc scan-dump { args } {
|
||||
|
||||
set testcase [testname-for-summary]
|
||||
|
||||
set printable_pattern [make_pattern_printable [lindex $args 1]]
|
||||
set suf [dump-suffix [lindex $args 2]]
|
||||
set testname "$testcase scan-[lindex $args 0]-dump $suf \"[lindex $args 1]\""
|
||||
set testname "$testcase scan-[lindex $args 0]-dump $suf \"$printable_pattern\""
|
||||
set src [file tail [lindex $testcase 0]]
|
||||
set output_file "[glob -nocomplain $src.[lindex $args 2]]"
|
||||
if { $output_file == "" } {
|
||||
@ -126,8 +127,9 @@ proc scan-dump-not { args } {
|
||||
}
|
||||
|
||||
set testcase [testname-for-summary]
|
||||
set printable_pattern [make_pattern_printable [lindex $args 1]]
|
||||
set suf [dump-suffix [lindex $args 2]]
|
||||
set testname "$testcase scan-[lindex $args 0]-dump-not $suf \"[lindex $args 1]\""
|
||||
set testname "$testcase scan-[lindex $args 0]-dump-not $suf \"$printable_pattern\""
|
||||
set src [file tail [lindex $testcase 0]]
|
||||
set output_file "[glob -nocomplain $src.[lindex $args 2]]"
|
||||
if { $output_file == "" } {
|
||||
@ -178,8 +180,9 @@ proc scan-dump-dem { args } {
|
||||
}
|
||||
|
||||
set testcase [testname-for-summary]
|
||||
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 $suf \"[lindex $args 1]\""
|
||||
set testname "$testcase scan-[lindex $args 0]-dump-dem $suf \"$printable_pattern\""
|
||||
set src [file tail [lindex $testcase 0]]
|
||||
set output_file "[glob -nocomplain $src.[lindex $args 2]]"
|
||||
if { $output_file == "" } {
|
||||
@ -229,8 +232,9 @@ proc scan-dump-dem-not { args } {
|
||||
}
|
||||
|
||||
set testcase [testname-for-summary]
|
||||
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 \"[lindex $args 1]\""
|
||||
set testname "$testcase scan-[lindex $args 0]-dump-dem-not $suf \"$printable_pattern\""
|
||||
set src [file tail [lindex $testcase 0]]
|
||||
set output_file "[glob -nocomplain $src.[lindex $args 2]]"
|
||||
if { $output_file == "" } {
|
||||
|
Loading…
Reference in New Issue
Block a user