mirror of
https://gcc.gnu.org/git/gcc.git
synced 2024-11-28 06:14:10 +08:00
libjava.exp (test_libjava_from_javac): Fixed typo.
* lib/libjava.exp (test_libjava_from_javac): Fixed typo. Always make class_files a list. From-SVN: r27772
This commit is contained in:
parent
527c99b3ec
commit
7dda3e3a78
@ -1,5 +1,8 @@
|
||||
1999-06-25 Tom Tromey <tromey@cygnus.com>
|
||||
|
||||
* lib/libjava.exp (test_libjava_from_javac): Fixed typo. Always
|
||||
make class_files a list.
|
||||
|
||||
* lib/libjava.exp (test_libjava_from_javac): Prepend `$objdir/' to
|
||||
class file names.
|
||||
|
||||
|
@ -366,12 +366,13 @@ proc test_libjava_from_javac { options srcfile compile_args inpfile resultfile e
|
||||
# nothing if the file contains an interface and not a class. I
|
||||
# believe this is a jv-scan bug.
|
||||
if {$class_out == ""} then {
|
||||
set class_files $objdir/[file rootname [file tail $srcfile]].class
|
||||
set class_files \
|
||||
[list $objdir/[file rootname [file tail $srcfile]].class]
|
||||
} else {
|
||||
# Turn "a b" into "a.class b.class".
|
||||
set class_files {}
|
||||
foreach file [split [string trim $class_out]] {
|
||||
lappend class_out $objdir/$file.class
|
||||
lappend class_files $objdir/$file.class
|
||||
}
|
||||
}
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user