1999-04-07 22:42:40 +08:00
|
|
|
global srcdir subdir
|
|
|
|
|
2002-07-19 01:42:31 +08:00
|
|
|
catch { lsort [glob -nocomplain ${srcdir}/${subdir}/*.java] } srcfiles
|
1999-04-07 22:42:40 +08:00
|
|
|
verbose "srcfiles are $srcfiles"
|
|
|
|
|
|
|
|
set prefix ""
|
|
|
|
foreach x $srcfiles {
|
1999-07-06 23:38:09 +08:00
|
|
|
set args [libjava_read_xfail [file rootname $x].xfail]
|
1999-07-15 17:15:26 +08:00
|
|
|
if {[file exists [file rootname $x].no-link]} {
|
|
|
|
lappend args no-link
|
|
|
|
}
|
1999-07-06 23:38:09 +08:00
|
|
|
lappend args no-exec
|
|
|
|
|
2000-05-17 23:48:44 +08:00
|
|
|
test_libjava "" "$x" "" "" "" $args
|
|
|
|
test_libjava "" "$x" "-O" "" "" $args
|
1999-04-07 22:42:40 +08:00
|
|
|
}
|
1999-07-06 23:38:09 +08:00
|
|
|
|
|
|
|
# Local Variables:
|
|
|
|
# tcl-indent-level:4
|
|
|
|
# End:
|