diff options
| author | Elena Pourmal <epourmal@hdfgroup.org> | 2015-03-09 15:51:09 (GMT) |
|---|---|---|
| committer | Elena Pourmal <epourmal@hdfgroup.org> | 2015-03-09 15:51:09 (GMT) |
| commit | 1f4f709e8cdfaa4bc35d58c665008793d7e1cca1 (patch) | |
| tree | 1e6de1167338d6b57b43ba6ce1d8f0852f05d324 /fortran/src/H5Af.c | |
| parent | 2a4ea9b24e5d28598b627fca39fb42a9baedfaa3 (diff) | |
| download | hdf5-1f4f709e8cdfaa4bc35d58c665008793d7e1cca1.zip hdf5-1f4f709e8cdfaa4bc35d58c665008793d7e1cca1.tar.gz hdf5-1f4f709e8cdfaa4bc35d58c665008793d7e1cca1.tar.bz2 | |
[svn-r26401] Fixed warnings in the C stubs for Fortran wrappers. See Crucible review HDF5-238.
Tested on platypus with gcc/gfortran 4.9.2, jam and emu with the default compilers.
Diffstat (limited to 'fortran/src/H5Af.c')
| -rw-r--r-- | fortran/src/H5Af.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/fortran/src/H5Af.c b/fortran/src/H5Af.c index 8291320..240fbc3 100644 --- a/fortran/src/H5Af.c +++ b/fortran/src/H5Af.c @@ -1652,7 +1652,7 @@ nh5aget_info_c (hid_t_f *loc_id, int_f *corder_valid, int_f *corder, *corder = (int_f)ainfo.corder; *cset = (int_f)ainfo.cset; - *data_size = (hsize_t)ainfo.data_size; + *data_size = (hsize_t_f)ainfo.data_size; done: return ret_value; @@ -1728,7 +1728,7 @@ nh5aget_info_by_idx_c (hid_t_f *loc_id, _fcd obj_name, size_t_f *obj_namelen, *corder_valid = 1; *corder = (int_f)ainfo.corder; *cset = (int_f)ainfo.cset; - *data_size = (hsize_t)ainfo.data_size; + *data_size = (hsize_t_f)ainfo.data_size; done: if(c_obj_name) @@ -1797,7 +1797,7 @@ nh5aget_info_by_name_c (hid_t_f *loc_id, _fcd obj_name, size_t_f *obj_namelen, *corder_valid = 1; *corder = (int_f)ainfo.corder; *cset = (int_f)ainfo.cset; - *data_size = (hsize_t)ainfo.data_size; + *data_size = (hsize_t_f)ainfo.data_size; done: if(c_obj_name) |