diff options
| author | Mark Mitchell <mmitchel@gcc.gnu.org> | 2005-05-15 22:35:39 +0000 |
|---|---|---|
| committer | Mark Mitchell <mmitchel@gcc.gnu.org> | 2005-05-15 22:35:39 +0000 |
| commit | e8bcfe5330eb505b637164eadeadcaca3c917765 (patch) | |
| tree | d1bd56744f22129b3b0c1c861d13de204eb1c216 | |
| parent | 0c0387e7576461ba77395089634cfedc3bdbfea7 (diff) | |
| download | gcc-e8bcfe5330eb505b637164eadeadcaca3c917765.zip gcc-e8bcfe5330eb505b637164eadeadcaca3c917765.tar.gz gcc-e8bcfe5330eb505b637164eadeadcaca3c917765.tar.bz2 | |
Fix typo in previous checkin
From-SVN: r99749
| -rw-r--r-- | gcc/testsuite/lib/compat.exp | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/testsuite/lib/compat.exp b/gcc/testsuite/lib/compat.exp index 423253f..567e0ea 100644 --- a/gcc/testsuite/lib/compat.exp +++ b/gcc/testsuite/lib/compat.exp @@ -288,7 +288,7 @@ proc compat-execute { src1 sid use_alt } { set testcase [string range "$src1" [string length "$srcdir/"] end] } if {[string first "$tmpdir/" "$testcase"] == 0} { - set testcase [string range "$src1" [string length "$tmpdir/"] end] + set testcase [string range "$testcase" [string length "$tmpdir/"] end] } regsub "_main.*" $testcase "" testcase # Set up the base name of executable files so they'll be unique. |