diff options
| author | Nathan Sidwell <nathan@acm.org> | 2020-07-13 08:04:26 -0700 |
|---|---|---|
| committer | Nathan Sidwell <nathan@acm.org> | 2020-07-13 08:05:33 -0700 |
| commit | a43125192237ce7f3aac7406fd425f9aaad7d9bf (patch) | |
| tree | 24ea63ed736daf1639ae3f12e6543b1be5a104ff | |
| parent | c4facd483de2d5b6b4d20e6ad74c85b9f1eba41a (diff) | |
| download | gcc-a43125192237ce7f3aac7406fd425f9aaad7d9bf.zip gcc-a43125192237ce7f3aac7406fd425f9aaad7d9bf.tar.gz gcc-a43125192237ce7f3aac7406fd425f9aaad7d9bf.tar.bz2 | |
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.
| -rw-r--r-- | gcc/testsuite/lib/scanlang.exp | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/gcc/testsuite/lib/scanlang.exp b/gcc/testsuite/lib/scanlang.exp index 2f80f65..d9f8c1e 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]" } } |