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

[svn-r3032]

Browse Source 
Purpose:
    Bug fix
Description:
    h5gget_linkval_f function had an argument with the type INTEGER instead
    on INTEGER(SIZE_T). Test would not compile on O2K.
Solution:
    Fixed argument datatype.
Platforms tested:
    O2K (modi4)
This commit is contained in:
Elena Pourmal 2000-11-29 18:42:16 -05:00
parent 4a7f9c11bc
commit fa61ea96dd
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/test/tH5G.f90
View File

@ -36,7 +36,7 @@
INTEGER(HSIZE_T), DIMENSION(1) :: dims = 1 ! Datasets dimensions
INTEGER :: rank = 1 ! Datasets rank
INTEGER :: error ! Error flag
INTEGER :: namesize = 100 !size for symbolic object
INTEGER(SIZE_T) :: namesize = 100 !size for symbolic object
CHARACTER*100 :: name !name to put symbolic object
CHARACTER*100 :: commentout !comment to the file
INTEGER :: nmembers