From 434ab9dca2fdd8656d100c5c5f3c62ce0ea838b4 Mon Sep 17 00:00:00 2001 From: Elena Pourmal Date: Thu, 10 May 2001 17:24:12 -0500 Subject: [svn-r3908] Purpose: Bug fix Description: There was a syntax error on Windows, and I fixed it long time ago but forgot to check this file into CVS. Solution: Fix the error. Platforms tested: Windows98 --- fortran/src/H5Pff.f90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/fortran/src/H5Pff.f90 b/fortran/src/H5Pff.f90 index 98c9195..e8b7465 100644 --- a/fortran/src/H5Pff.f90 +++ b/fortran/src/H5Pff.f90 @@ -580,13 +580,13 @@ SUBROUTINE h5pset_fill_value_integer(prp_id, type_id, fillvalue, & + hdferr) ! !This definition is needed for Windows DLLs !DEC$if defined(BUILD_HDF5_DLL) !DEC$attributes dllexport :: h5pset_fill_value_integer !DEC$endif ! - hdferr) IMPLICIT NONE INTEGER(HID_T), INTENT(IN) :: prp_id ! Property list identifier INTEGER(HID_T), INTENT(IN) :: type_id ! Datatype identifier of -- cgit v0.12