1# Copyright (C) 1997-2015 Free Software Foundation, Inc. 2 3# This program is free software; you can redistribute it and/or modify 4# it under the terms of the GNU General Public License as published by 5# the Free Software Foundation; either version 3 of the License, or 6# (at your option) any later version. 7# 8# This program is distributed in the hope that it will be useful, 9# but WITHOUT ANY WARRANTY; without even the implied warranty of 10# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 11# GNU General Public License for more details. 12# 13# You should have received a copy of the GNU General Public License 14# along with GCC; see the file COPYING3. If not see 15# <http://www.gnu.org/licenses/>. 16 17# GCC testsuite that uses the `dg.exp' driver. 18 19# There's a bunch of headers we need. 20if [is_remote host] { 21 foreach header [glob -nocomplain $srcdir/$subdir/*.{h,def} ] { 22 remote_download host $header 23 } 24} 25 26# Load support procs. 27load_lib gcc-dg.exp 28 29# If a testcase doesn't have special options, use these. 30global DEFAULT_TRADCPPFLAGS 31if ![info exists DEFAULT_TRADCPPFLAGS] then { 32 set DEFAULT_TRADCPPFLAGS " -traditional-cpp" 33} 34 35# Initialize `dg'. 36dg-init 37 38# Main loop. 39dg-runtest [lsort [glob -nocomplain $srcdir/$subdir/*.\[cS\]]] \ 40 "" $DEFAULT_TRADCPPFLAGS 41 42# All done. 43dg-finish 44