From: Nathan Sidwell <nathan@acm.org>
Date: Mon, 13 Jul 2020 15:04:26 +0000 (-0700)
Subject: testsuite: Fix scan-lang-dump-not
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=a43125192237ce7f3aac7406fd425f9aaad7d9bf;p=gcc.git

testsuite: Fix scan-lang-dump-not

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.
---

diff --git a/gcc/testsuite/lib/scanlang.exp b/gcc/testsuite/lib/scanlang.exp
index 2f80f65f569..d9f8c1e6e83 100644
--- a/gcc/testsuite/lib/scanlang.exp
+++ b/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]"
     }
 }