mirror/hdf5
2
0
Fork 0
mirror of https://github.com/HDFGroup/hdf5.git synced 2025-04-06 17:20:42 +08:00
Code Issues Packages Projects Releases Wiki Activity

[svn-r15066] Description:

Browse Source 
Change the interface argument to match that of the actual function.
This commit is contained in:
Scot Breitenfeld 2008-05-21 16:08:08 -05:00
parent e8e47591f7
commit 91c1f420e6
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/H5Tff.f90
View File

@ -3041,7 +3041,7 @@ CONTAINS
! MS FORTRAN needs explicit interface for C functions called here.
!
INTERFACE
INTEGER FUNCTION h5tset_tag_c(type_id, tag, namelen)
INTEGER FUNCTION h5tset_tag_c(type_id, tag, taglen)
USE H5GLOBAL
!DEC$ IF DEFINED(HDF5F90_WINDOWS)
!DEC$ ATTRIBUTES C,reference,decorate,alias:'H5TSET_TAG_C'::h5tset_tag_c