diff options
Diffstat (limited to 'fortran/src/H5Rf.c')
| -rw-r--r-- | fortran/src/H5Rf.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/fortran/src/H5Rf.c b/fortran/src/H5Rf.c index fb3f185..06cb6e3 100644 --- a/fortran/src/H5Rf.c +++ b/fortran/src/H5Rf.c @@ -53,7 +53,7 @@ nh5rcreate_object_c (int_f *ref, hid_t_f *loc_id, _fcd name, int_f *namelen) HDfree(c_name); if (ret_value_c >= 0) { - *ref=ref_c; + *ref=(int_f)ref_c; ret_value = 0; } |