set lang_library_path "../libgfortran/.libs" | |
set lang_test_file "${lang_library_path}/libgfortranbegin.a" | |
set lang_link_flags "-lgfortranbegin -lgfortran" | |
load_lib libgomp-dg.exp | |
# Initialize dg. | |
dg-init | |
if [file exists "${blddir}/${lang_test_file}"] { | |
# Gather a list of all tests. | |
set tests [lsort [find $srcdir/$subdir *.\[fF\]{,90,95,03}]] | |
# Main loop. | |
gfortran-dg-runtest $tests "" | |
} | |
# All done. | |
dg-finish |