| if [info exists lang_library_path] then { |
| unset lang_library_path |
| unset lang_link_flags |
| } |
| if [info exists lang_test_file] then { |
| unset lang_test_file |
| } |
| |
| load_lib libgomp-dg.exp |
| |
| # If a testcase doesn't have special options, use these. |
| if ![info exists DEFAULT_CFLAGS] then { |
| set DEFAULT_CFLAGS "-O2" |
| } |
| |
| # Initialize dg. |
| dg-init |
| |
| # Gather a list of all tests. |
| set tests [lsort [find $srcdir/$subdir *.c]] |
| |
| set ld_library_path $always_ld_library_path |
| append ld_library_path [gcc-set-multilib-library-path $GCC_UNDER_TEST] |
| set_ld_library_path_env_vars |
| |
| # Main loop. |
| dg-runtest $tests "" $DEFAULT_CFLAGS |
| |
| # All done. |
| dg-finish |
