gcc-4.2.1-5666.3/libgomp/testsuite/libgomp.fortran/fortran.exp


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20

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