diff options
| author | Scot Breitenfeld <brtnfld@hdfgroup.org> | 2013-02-18 02:01:18 (GMT) |
|---|---|---|
| committer | Scot Breitenfeld <brtnfld@hdfgroup.org> | 2013-02-18 02:01:18 (GMT) |
| commit | a976ca99a9de1fbe2496c23fa941b7c3e8af3967 (patch) | |
| tree | b00f06e247a8c61c8a53d09a3d4201948b703c70 /fortran/src/h5fc.in | |
| parent | 32da9c96aed341fa67670e84b82ca9292bd1506c (diff) | |
| download | hdf5-a976ca99a9de1fbe2496c23fa941b7c3e8af3967.zip hdf5-a976ca99a9de1fbe2496c23fa941b7c3e8af3967.tar.gz hdf5-a976ca99a9de1fbe2496c23fa941b7c3e8af3967.tar.bz2 | |
[svn-r23293] Fix for HDFFV-8268: Fortran wrapper for H5Fget_file_image function.
Tested: (jam, gnu,intel compilers)
Diffstat (limited to 'fortran/src/h5fc.in')
| -rw-r--r-- | fortran/src/h5fc.in | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/fortran/src/h5fc.in b/fortran/src/h5fc.in index 2d7b5b4..d24a0ae 100644 --- a/fortran/src/h5fc.in +++ b/fortran/src/h5fc.in @@ -233,8 +233,12 @@ for arg in $@ ; do *) allargs="$allargs $arg" if [ -s "$arg" ] ; then ext=`expr "$arg" : '.*\(\..*\)'` - if [ "$ext" = ".f" -o "$ext" = ".F" -o "$ext" = ".f90" -o \ - "$ext" = ".for" -o "$ext" = ".FOR" -o "$ext" = ".F90" ] ; then + if [ "$ext" = ".f" -o "$ext" = ".F" -o \ + "$ext" = ".for" -o "$ext" = ".FOR" -o \ + "$ext" = ".ftn" -o "$ext" = ".FTN" -o \ + ["$ext" = ".f[0-9][0-9]"] -o \ + ["$ext" = ".F[0-9][0-9]"] \ + ] ; then do_compile="yes" compile_args="$compile_args $arg" fname=`basename $arg $ext` |