1259701Sdim# Expect driver script for GCC Regression Tests
2259701Sdim# Copyright (C) 1993, 1995, 1997, 2003 Free Software Foundation
3259701Sdim#
4259701Sdim# This file is free software; you can redistribute it and/or modify
5259701Sdim# it under the terms of the GNU General Public License as published by
6259701Sdim# the Free Software Foundation; either version 2 of the License, or
7259701Sdim# (at your option) any later version.
8259701Sdim#
9259701Sdim# This program is distributed in the hope that it will be useful,
10259701Sdim# but WITHOUT ANY WARRANTY; without even the implied warranty of
11259701Sdim# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
12259701Sdim# GNU General Public License for more details.
13259701Sdim#
14259701Sdim# You should have received a copy of the GNU General Public License
15280031Sdim# along with this program; if not, write to the Free Software
16280031Sdim# Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
17259701Sdim
18259701Sdim# These tests come from Torbjorn Granlund's (tege@cygnus.com)
19259701Sdim# C torture test suite, and other contributors.
20259701Sdim
21259701Sdim# Load support procs.
22259701Sdimload_lib gcc-dg.exp
23259701Sdim
24259701Sdim# Initialize `dg'.
25259701Sdimdg-init
26259701Sdim
27259701Sdim# Main loop.
28259701Sdimset saved-dg-do-what-default ${dg-do-what-default}
29259701Sdimset dg-do-what-default "assemble"
30259701Sdimgcc-dg-runtest [lsort [glob -nocomplain $srcdir/$subdir/*.\[cS\]]] "-w"
31259701Sdimset dg-do-what-default ${saved-dg-do-what-default}
32259701Sdim
33280031Sdim# All done.
34259701Sdimdg-finish
35259701Sdim