diff options
author | Erik Schnetter <schnetter@gmail.com> | 2022-01-20 15:11:34 -0500 |
---|---|---|
committer | GitHub <noreply@github.com> | 2022-01-20 14:11:34 -0600 |
commit | de7de9778f78f3d0e0684cd65ff1c299b5a996d8 (patch) | |
tree | 2880da06a6fd598bff481c249b09ddd845f2da5b | |
parent | 9a23fbbcf01b2b3d742d1d89898da22dcda5f920 (diff) | |
download | spack-de7de9778f78f3d0e0684cd65ff1c299b5a996d8.tar.gz spack-de7de9778f78f3d0e0684cd65ff1c299b5a996d8.tar.bz2 spack-de7de9778f78f3d0e0684cd65ff1c299b5a996d8.tar.xz spack-de7de9778f78f3d0e0684cd65ff1c299b5a996d8.zip |
hdf5: Add missing "close" statement (#28317)
* hdf5: Add missing "close" statement
* hdf5: Apply fortran-kinds patch only to @1.10.7
-rw-r--r-- | var/spack/repos/builtin/packages/hdf5/fortran-kinds.patch | 20 | ||||
-rw-r--r-- | var/spack/repos/builtin/packages/hdf5/package.py | 2 |
2 files changed, 22 insertions, 0 deletions
diff --git a/var/spack/repos/builtin/packages/hdf5/fortran-kinds.patch b/var/spack/repos/builtin/packages/hdf5/fortran-kinds.patch new file mode 100644 index 0000000000..ffe5e6f3f0 --- /dev/null +++ b/var/spack/repos/builtin/packages/hdf5/fortran-kinds.patch @@ -0,0 +1,20 @@ +--- a/config/cmake/HDF5UseFortran.cmake ++++ a/config/cmake/HDF5UseFortran.cmake +@@ -181,6 +181,7 @@ + WRITE(8,'(I0)') max_decimal_prec + WRITE(8,'(I0)') num_ikinds + WRITE(8,'(I0)') num_rkinds ++ CLOSE(8) + END PROGRAM FC_AVAIL_KINDS + " + ) +--- a/m4/aclocal_fc.f90 ++++ b/m4/aclocal_fc.f90 +@@ -151,6 +151,7 @@ + WRITE(8,'(I0)') max_decimal_prec + WRITE(8,'(I0)') num_ikinds + WRITE(8,'(I0)') num_rkinds ++ CLOSE(8) + END PROGRAM FC_AVAIL_KINDS + !---- END ----- Determine the available KINDs for REALs and INTEGERs + diff --git a/var/spack/repos/builtin/packages/hdf5/package.py b/var/spack/repos/builtin/packages/hdf5/package.py index 93edaea1e6..47af3ea830 100644 --- a/var/spack/repos/builtin/packages/hdf5/package.py +++ b/var/spack/repos/builtin/packages/hdf5/package.py @@ -160,6 +160,8 @@ class Hdf5(CMakePackage): patch('hdf5_1.8_gcc10.patch', when='@:1.8.21', sha256='0e20187cda3980a4fdff410da92358b63de7ebef2df1d7a425371af78e50f666') + patch('fortran-kinds.patch', when='@1.10.7') + # The argument 'buf_size' of the C function 'h5fget_file_image_c' is # declared as intent(in) though it is modified by the invocation. As a # result, aggressive compilers such as Fujitsu's may do a wrong |