blob: 6b4038659cdede27254666ce0ebe0aa838ba174c (
plain)
| 1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
 | global srcdir subdir
catch { lsort [glob -nocomplain ${srcdir}/${subdir}/*.java] } srcfiles
verbose "srcfiles are $srcfiles"
set prefix ""
foreach x $srcfiles {
    set args [libjava_read_xfail [file rootname $x].xfail]
    if {[file exists [file rootname $x].no-link]} {
	lappend args no-link
    }
    lappend args no-exec
    test_libjava "" "$x" "" "" "" $args
    test_libjava "" "$x" "-O" "" "" $args
}
# Local Variables:
# tcl-indent-level:4
# End:
 |