libgupc/testsuite/libgupc.upc/upc.exp

   1 if [info exists lang_library_path] then {
   2     unset lang_library_path
   3     unset lang_link_flags
   4 }
   5 if [info exists lang_test_file] then {
   6     unset lang_test_file
   7 }
   8
   9 load_lib libgupc-dg.exp
  10
  11 # If a testcase doesn't have special options, use these.
  12 if ![info exists DEFAULT_CFLAGS] then {
  13     set DEFAULT_CFLAGS "-O2 -fupc-threads-2"
  14 }
  15
  16 # Initialize dg.
  17 dg-init
  18
  19 # Gather a list of all tests.
  20 set tests [lsort [find $srcdir/$subdir test??.upc]]
  21
  22 set ld_library_path $always_ld_library_path
  23 append ld_library_path [gcc-set-multilib-library-path $GCC_UNDER_TEST]
  24 set_ld_library_path_env_vars
  25
  26 # Main loop.
  27 dg-runtest $tests "" $DEFAULT_CFLAGS
  28
  29 # All done.
  30 dg-finish