| Message ID | d2cb42e0-85c9-190a-a75b-f702d6c6c1ef@acm.org |
|---|---|
| State | New |
| Headers | show |
| Series | testsuite: Fix scan-lang-dump-not | expand |
diff --git c/gcc/testsuite/lib/scanlang.exp w/gcc/testsuite/lib/scanlang.exp index 2f80f65f569..d9f8c1e6e83 100644 --- c/gcc/testsuite/lib/scanlang.exp +++ w/gcc/testsuite/lib/scanlang.exp @@ -36,10 +36,11 @@ proc scan-lang-dump { args } { return } if { [llength $args] >= 3 } { - scan-dump "lang" [lindex $args 0] \ - "\[0-9\]\[0-9\]\[0-9\]l.[lindex $args 1]" "" [lindex $args 2] + scan-dump-not "lang" [lindex $args 0] \ + "\[0-9\]\[0-9\]\[0-9\]l.[lindex $args 1]" "" \ + [lindex $args 2] } else { - scan-dump "lang" [lindex $args 0] \ - "\[0-9\]\[0-9\]\[0-9\]l.[lindex $args 1]" "" + scan-dump-not "lang" [lindex $args 0] \ + "\[0-9\]\[0-9\]\[0-9\]l.[lindex $args 1]" } }
pushed as obvious turned out scan-lang-dump-not was broken in the 3 argument case -- I'd missed a necessary empty arg. Fixed thusly. gcc/testsuite/ * lib/scanlang.exp (scan-lang-dump-not): Fix 3-arg case.