hdf5: Add missing "close" statement (#28317)
* hdf5: Add missing "close" statement * hdf5: Apply fortran-kinds patch only to @1.10.7
This commit is contained in:
parent
9a23fbbcf0
commit
de7de9778f
20
var/spack/repos/builtin/packages/hdf5/fortran-kinds.patch
Normal file
20
var/spack/repos/builtin/packages/hdf5/fortran-kinds.patch
Normal file
@ -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
|
||||
|
@ -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
|
||||
|
Loading…
Reference in New Issue
Block a user