mirror/hdf5
2
0
Fork 0
mirror of https://github.com/HDFGroup/hdf5.git synced 2025-02-17 16:10:24 +08:00
Code Issues Packages Projects Releases Wiki Activity

[svn-r3908]

Browse Source 
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
This commit is contained in:
Elena Pourmal 2001-05-10 17:24:12 -05:00
parent 37832b192e
commit 434ab9dca2
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
fortran/src/H5Pff.f90
View File

@ -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