diff options
author | Ben Elliston <bje@au.ibm.com> | 2009-07-14 05:44:23 +0000 |
---|---|---|
committer | Ben Elliston <bje@au.ibm.com> | 2009-07-14 05:44:23 +0000 |
commit | eb63bd428cb284376a3ac53f7f3c4cd03b5d5629 (patch) | |
tree | 1bf1df3cfcc1639c9c2f0544d45529aa31ac236f | |
parent | 519bd5abcbee6e490cf77dcffd9a744ab3e342d9 (diff) |
* gfortran.dg/lto/lto.exp: Match {f,F}{,90,95,03,08}, not just .f.
git-svn-id: https://gcc.gnu.org/svn/gcc/branches/lto@149619 138bc75d-0d04-0410-961f-82ee72b054a4
-rw-r--r-- | gcc/testsuite/ChangeLog.lto | 4 | ||||
-rw-r--r-- | gcc/testsuite/gfortran.dg/lto/lto.exp | 2 |
2 files changed, 5 insertions, 1 deletions
diff --git a/gcc/testsuite/ChangeLog.lto b/gcc/testsuite/ChangeLog.lto index a8cbf80515c..725d9745e80 100644 --- a/gcc/testsuite/ChangeLog.lto +++ b/gcc/testsuite/ChangeLog.lto @@ -1,5 +1,9 @@ 2009-07-14 Ben Elliston <bje@au.ibm.com> + * gfortran.dg/lto/lto.exp: Match {f,F}{,90,95,03,08}, not just .f. + +2009-07-14 Ben Elliston <bje@au.ibm.com> + * gfortran.dg/lto/lto.exp: New. * gfortran.dg/lto/pr40724_0.f: Likewise. * gfortran.dg/lto/pr40724_1.f: Likewise. diff --git a/gcc/testsuite/gfortran.dg/lto/lto.exp b/gcc/testsuite/gfortran.dg/lto/lto.exp index 721a594fc2a..67c7de8c6b8 100644 --- a/gcc/testsuite/gfortran.dg/lto/lto.exp +++ b/gcc/testsuite/gfortran.dg/lto/lto.exp @@ -47,7 +47,7 @@ if { ![check_effective_target_lto] } { } # Main loop. -foreach src [lsort [find $srcdir/$subdir *_0.f]] { +foreach src [lsort [glob -nocomplain $srcdir/$subdir/*.\[fF\]{,90,95,03,08} ]] { # If we're only testing specific files and this isn't one of them, skip it. if ![runtest_file_p $runtests $src] then { continue |