diff options
| -rw-r--r-- | gcc/testsuite/ChangeLog | 5 | ||||
| -rw-r--r-- | gcc/testsuite/gfortran.dg/dg.exp | 13 |
2 files changed, 17 insertions, 1 deletions
diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index 20cc4af..23889e2 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,5 +1,10 @@ 2004-07-09 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de> + * gfortran.dg/dg.exp: Don't use wildcard for suffixes, also check + testcases with capital suffix. + +2004-07-09 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de> + PR fortran/15481 PR fortran/13372 PR fortran/13575 diff --git a/gcc/testsuite/gfortran.dg/dg.exp b/gcc/testsuite/gfortran.dg/dg.exp index c4176eb..58f3bf6 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 |