libgomp/testsuite/libgomp.fortran/fortran.exp

   1 set lang_library_path   "../libgfortran/.libs"
   2 set lang_test_file      "${lang_library_path}/libgfortranbegin.a"
   3 set lang_link_flags     "-lgfortranbegin -lgfortran"
   4
   5 load_lib libgomp-dg.exp
   6
   7 # Initialize dg.
   8 dg-init
   9
  10 if [file exists "${blddir}/${lang_test_file}"] {
  11
  12     # Gather a list of all tests.
  13     set tests [lsort [find $srcdir/$subdir *.\[fF\]{,90,95,03}]]
  14
  15     set ld_library_path "$always_ld_library_path:${blddir}/${lang_library_path}"
  16     set_ld_library_path_env_vars
  17
  18     # Main loop.
  19     gfortran-dg-runtest $tests ""
  20 }
  21
  22 # All done.
  23 dg-finish