testsuite: Fix scan-lang-dump-not
authorNathan Sidwell <nathan@acm.org>
Mon, 13 Jul 2020 15:04:26 +0000 (08:04 -0700)
committerNathan Sidwell <nathan@acm.org>
Mon, 13 Jul 2020 15:05:33 +0000 (08:05 -0700)
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.

gcc/testsuite/lib/scanlang.exp

index 2f80f65f5695d0011a8bec614b6a96c12ccd15b7..d9f8c1e6e835e6244d3beef98d7cec53662f4a49 100644 (file)
@@ -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]"
     }
 }