diff options
Diffstat (limited to 'hl/fortran/src/H5DSfc.c')
-rw-r--r-- | hl/fortran/src/H5DSfc.c | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/hl/fortran/src/H5DSfc.c b/hl/fortran/src/H5DSfc.c index 9ebd322..8029d34 100644 --- a/hl/fortran/src/H5DSfc.c +++ b/hl/fortran/src/H5DSfc.c @@ -54,7 +54,7 @@ h5dsset_scale_c(hid_t_f *dsid, _fcd dimname, size_t_f *dimnamelen) done: if (c_dimname) - HDfree(c_dimname); + free(c_dimname); return ret_value; @@ -231,7 +231,7 @@ h5dsset_label_c(hid_t_f *did, int_f *idx, _fcd label, size_t_f *labellen) done: if (c_label) - HDfree(c_label); + free(c_label); return ret_value; @@ -262,7 +262,7 @@ h5dsget_label_c(hid_t_f *did, int_f *idx, _fcd label, size_t_f *size) /* * Allocate buffer to hold label */ - if ((c_label = (char *)HDmalloc((size_t)*size + 1)) == NULL) + if ((c_label = (char *)malloc((size_t)*size + 1)) == NULL) HGOTO_DONE(FAIL); /* @@ -282,7 +282,7 @@ done: *size = (size_t_f)size_c; /* Don't subtract '1' because H5DSget_label doesn't include the * trailing NULL in the length calculation, Ref. HDFFV-7596 */ if (c_label) - HDfree(c_label); + free(c_label); return ret_value; } /* end h5dsget_label_c() */ @@ -312,7 +312,7 @@ h5dsget_scale_name_c(hid_t_f *did, _fcd name, size_t_f *size) /* * Allocate buffer to hold name */ - if ((c_scale_name = (char *)HDmalloc((size_t)*size + 1)) == NULL) + if ((c_scale_name = (char *)malloc((size_t)*size + 1)) == NULL) HGOTO_DONE(FAIL); /* @@ -330,7 +330,7 @@ h5dsget_scale_name_c(hid_t_f *did, _fcd name, size_t_f *size) done: if (c_scale_name) - HDfree(c_scale_name); + free(c_scale_name); return ret_value; } /* end h5dsget_scale_name_c() */ |