Paul Brook <paul@codesourcery.com>

2004-07-09  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
Paul Brook  <paul@codesourcery.com>

* gfortran.dg/dg.exp: Use revised wilcard for suffixes, also allow
'.f95' and '.F95'.

Co-Authored-By: Paul Brook <paul@codesourcery.com>

From-SVN: r84384

gcc/testsuite/ChangeLog

+2004-07-09  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
+	Paul Brook  <paul@codesourcery.com>
+
+	* gfortran.dg/dg.exp: Use revised wilcard for suffixes, also allow 
+	'.f95' and '.F95'.
+
 2004-07-09  Diego Novillo  <dnovillo@redhat.com>
 
 	* gcc.dg/tree-ssa/20031015-1.c: Adjust expected dump file name.

gcc/testsuite/gfortran.dg/dg.exp

@@ -29,23 +29,12 @@ if ![info exists DEFAULT_FFLAGS] then {
 dg-init
 
 # Main loop.
-gfortran-dg-runtest [lsort [glob -nocomplain $srcdir/$subdir/*.f ] ]\
-	$DEFAULT_FFLAGS
+gfortran-dg-runtest [lsort \
+       [glob -nocomplain $srcdir/$subdir/*.\[fF\]{,90,95} ] ] $DEFAULT_FFLAGS
 
-gfortran-dg-runtest [lsort [glob -nocomplain $srcdir/$subdir/*.F ] ]\
-	$DEFAULT_FFLAGS
+gfortran-dg-runtest [lsort \
+       [glob -nocomplain $srcdir/$subdir/g77/*.\[fF\] ] ] $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