diff options
| author | Mark Wielaard <mark@klomp.org> | 2003-02-15 16:39:28 +0000 |
|---|---|---|
| committer | Mark Wielaard <mark@gcc.gnu.org> | 2003-02-15 16:39:28 +0000 |
| commit | 6ff741aa6c830df0ec7adbd3c4ccf79845b0853a (patch) | |
| tree | 4844bccc8331ea6b06800c3f1b85a8707b5bdb7e /libjava/testsuite/lib | |
| parent | c68c712ec33eef6239647b669015ea9af737c939 (diff) | |
libjava.exp (test_libjava_from_javac): Use regsub not string map.
* lib/libjava.exp (test_libjava_from_javac): Use regsub not string map.
* libjava.mauve/mauve.exp (mauve_compute_uses): Likewise.
(test_mauve): Likewise.
From-SVN: r62937
Diffstat (limited to 'libjava/testsuite/lib')
| -rw-r--r-- | libjava/testsuite/lib/libjava.exp | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/libjava/testsuite/lib/libjava.exp b/libjava/testsuite/lib/libjava.exp index d9aa178d654..6be5ec67662 100644 --- a/libjava/testsuite/lib/libjava.exp +++ b/libjava/testsuite/lib/libjava.exp @@ -788,7 +788,7 @@ proc test_libjava_from_javac { options srcfile compile_args inpfile resultfile e foreach c_file $class_files { set executable [file rootname [file tail $c_file]].o # Don't write files which contain $ chars. - set executable [string map {$ ^} $executable] + regsub -all "\\$" $executable "\^" executable set x [libjava_prune_warnings \ [libjava_tcompile '$c_file' "$executable" $type $args]] lappend removeList $executable |