summaryrefslogtreecommitdiffstats
path: root/fortran/src/H5Lf.c
diff options
context:
space:
mode:
authorScot Breitenfeld <brtnfld@hdfgroup.org>2013-02-18 02:01:18 (GMT)
committerScot Breitenfeld <brtnfld@hdfgroup.org>2013-02-18 02:01:18 (GMT)
commita976ca99a9de1fbe2496c23fa941b7c3e8af3967 (patch)
treeb00f06e247a8c61c8a53d09a3d4201948b703c70 /fortran/src/H5Lf.c
parent32da9c96aed341fa67670e84b82ca9292bd1506c (diff)
downloadhdf5-a976ca99a9de1fbe2496c23fa941b7c3e8af3967.zip
hdf5-a976ca99a9de1fbe2496c23fa941b7c3e8af3967.tar.gz
hdf5-a976ca99a9de1fbe2496c23fa941b7c3e8af3967.tar.bz2
[svn-r23293] Fix for HDFFV-8268: Fortran wrapper for H5Fget_file_image function.
Tested: (jam, gnu,intel compilers)
Diffstat (limited to 'fortran/src/H5Lf.c')
-rw-r--r--fortran/src/H5Lf.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/fortran/src/H5Lf.c b/fortran/src/H5Lf.c
index e5b01ed..c5138b6 100644
--- a/fortran/src/H5Lf.c
+++ b/fortran/src/H5Lf.c
@@ -725,7 +725,7 @@ nh5lget_name_by_idx_c(hid_t_f *loc_id, _fcd group_name, size_t_f *group_namelen,
if(NULL == (c_name = (char *)HDmalloc(c_size)))
HGOTO_DONE(FAIL)
- if((*size = (size_t)H5Lget_name_by_idx((hid_t)*loc_id, c_group_name, (H5_index_t)*index_field,
+ if((*size = (size_t_f)H5Lget_name_by_idx((hid_t)*loc_id, c_group_name, (H5_index_t)*index_field,
(H5_iter_order_t)*order, (hsize_t)*n,c_name, c_size, (hid_t)*lapl_id)) < 0)
HGOTO_DONE(FAIL)