From fbc40a17c9aeaa3342d4122c45356fec7faa14e3 Mon Sep 17 00:00:00 2001 From: =?utf8?q?Tobias=20Schl=C3=BCter?= Date: Fri, 9 Jul 2004 17:20:43 +0200 Subject: [PATCH] dg.exp: Don't use wildcard for suffixes, also check testcases with capital suffix. * gfortran.dg/dg.exp: Don't use wildcard for suffixes, also check testcases with capital suffix. From-SVN: r84379 --- gcc/testsuite/ChangeLog | 5 +++++ gcc/testsuite/gfortran.dg/dg.exp | 13 ++++++++++++- 2 files changed, 17 insertions(+), 1 deletion(-) diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index 20cc4afb1a4..23889e2c549 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,3 +1,8 @@ +2004-07-09 Tobias Schlueter + + * gfortran.dg/dg.exp: Don't use wildcard for suffixes, also check + testcases with capital suffix. + 2004-07-09 Tobias Schlueter PR fortran/15481 diff --git a/gcc/testsuite/gfortran.dg/dg.exp b/gcc/testsuite/gfortran.dg/dg.exp index c4176ebb8b5..58f3bf673d2 100644 --- a/gcc/testsuite/gfortran.dg/dg.exp +++ b/gcc/testsuite/gfortran.dg/dg.exp @@ -29,12 +29,23 @@ if ![info exists DEFAULT_FFLAGS] then { dg-init # Main loop. -gfortran-dg-runtest [lsort [glob -nocomplain $srcdir/$subdir/*.f* ] ]\ +gfortran-dg-runtest [lsort [glob -nocomplain $srcdir/$subdir/*.f ] ]\ + $DEFAULT_FFLAGS + +gfortran-dg-runtest [lsort [glob -nocomplain $srcdir/$subdir/*.F ] ]\ + $DEFAULT_FFLAGS + +gfortran-dg-runtest [lsort [glob -nocomplain $srcdir/$subdir/*.f90 ] ]\ + $DEFAULT_FFLAGS + +gfortran-dg-runtest [lsort [glob -nocomplain $srcdir/$subdir/*.F90 ] ]\ $DEFAULT_FFLAGS gfortran-dg-runtest [lsort [glob -nocomplain $srcdir/$subdir/g77/*.f ] ] \ $DEFAULT_FFLAGS +gfortran-dg-runtest [lsort [glob -nocomplain $srcdir/$subdir/g77/*.F ] ] \ + $DEFAULT_FFLAGS # All done. dg-finish -- 2.30.2