mirror of
git://gcc.gnu.org/git/gcc.git
synced 2024-12-21 23:17:06 +08:00
35 lines
856 B
Plaintext
35 lines
856 B
Plaintext
global srcdir subdir
|
|
|
|
catch "glob -nocomplain ${srcdir}/${subdir}/*.out" srcfiles
|
|
verbose "srcfiles are $srcfiles"
|
|
|
|
set prefix ""
|
|
foreach x $srcfiles {
|
|
regsub "\\.out$" $x "" prefix
|
|
set bname [file tail $prefix]
|
|
set args ""
|
|
if [file exists $srcdir/$subdir/${bname}.arg] {
|
|
set id [open "$srcdir/$subdir/${bname}.arg" r];
|
|
set args [read -nonewline $id];
|
|
close $id;
|
|
}
|
|
if [file exists $srcdir/$subdir/${bname}.xpo] {
|
|
set resfile "$srcdir/$subdir/${bname}.xpo"
|
|
set options "regexp_match"
|
|
} else {
|
|
set resfile "${prefix}.out"
|
|
set options ""
|
|
}
|
|
|
|
if [file exists ${prefix}.inp] {
|
|
set inpfile ${prefix}.inp
|
|
} else {
|
|
set inpfile ""
|
|
}
|
|
|
|
verbose "inpfile is $inpfile"
|
|
|
|
test_libjava $options "${prefix}.java" "" $inpfile $resfile $args
|
|
test_libjava $options "${prefix}.java" "-O" $inpfile $resfile $args
|
|
}
|