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>
|
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
|
* lib/libjava.exp (test_libjava_from_javac): Prepend `$objdir/' to
|
||||||
class file names.
|
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
|
# nothing if the file contains an interface and not a class. I
|
||||||
# believe this is a jv-scan bug.
|
# believe this is a jv-scan bug.
|
||||||
if {$class_out == ""} then {
|
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 {
|
} else {
|
||||||
# Turn "a b" into "a.class b.class".
|
# Turn "a b" into "a.class b.class".
|
||||||
set class_files {}
|
set class_files {}
|
||||||
foreach file [split [string trim $class_out]] {
|
foreach file [split [string trim $class_out]] {
|
||||||
lappend class_out $objdir/$file.class
|
lappend class_files $objdir/$file.class
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue