diff options
Diffstat (limited to 'hl/fortran/src/H5IMfc.c')
-rw-r--r-- | hl/fortran/src/H5IMfc.c | 34 |
1 files changed, 17 insertions, 17 deletions
diff --git a/hl/fortran/src/H5IMfc.c b/hl/fortran/src/H5IMfc.c index cead871..1e060ad 100644 --- a/hl/fortran/src/H5IMfc.c +++ b/hl/fortran/src/H5IMfc.c @@ -63,7 +63,7 @@ h5immake_image_8bit_c(hid_t_f *loc_id, size_t_f *namelen, _fcd name, hsize_t_f * done: if (c_name != NULL) - HDfree(c_name); + free(c_name); return ret_value; } @@ -110,7 +110,7 @@ h5imread_image_c(hid_t_f *loc_id, size_t_f *namelen, _fcd name, int_f *buf) done: if (c_name != NULL) - HDfree(c_name); + free(c_name); return ret_value; } @@ -168,9 +168,9 @@ h5immake_image_24bit_c(hid_t_f *loc_id, size_t_f *namelen, _fcd name, size_t_f * done: if (c_name != NULL) - HDfree(c_name); + free(c_name); if (c_il != NULL) - HDfree(c_il); + free(c_il); return ret_value; } @@ -215,7 +215,7 @@ h5imget_image_info_c(hid_t_f *loc_id, size_t_f *namelen, _fcd name, hsize_t_f *w /* * allocate buffer to hold name of an attribute */ - if ((c_buf = (char *)HDmalloc((size_t)*ilen + 1)) == NULL) + if ((c_buf = (char *)malloc((size_t)*ilen + 1)) == NULL) goto done; /* @@ -242,9 +242,9 @@ h5imget_image_info_c(hid_t_f *loc_id, size_t_f *namelen, _fcd name, hsize_t_f *w done: if (c_name != NULL) - HDfree(c_name); + free(c_name); if (c_buf != NULL) - HDfree(c_buf); + free(c_buf); return ret_value; } @@ -287,7 +287,7 @@ h5imis_image_c(hid_t_f *loc_id, size_t_f *namelen, _fcd name) ret = H5IMis_image(c_loc_id, c_name); if (c_name != NULL) - HDfree(c_name); + free(c_name); return ret; } @@ -334,7 +334,7 @@ h5immake_palette_c(hid_t_f *loc_id, size_t_f *namelen, _fcd name, hsize_t_f *dim done: if (c_name) - HDfree(c_name); + free(c_name); return ret_value; } @@ -389,9 +389,9 @@ h5imlink_palette_c(hid_t_f *loc_id, size_t_f *namelen, _fcd name, size_t_f *ilen done: if (c_name != NULL) - HDfree(c_name); + free(c_name); if (c_namepal != NULL) - HDfree(c_namepal); + free(c_namepal); return ret_value; } @@ -446,9 +446,9 @@ h5imunlink_palette_c(hid_t_f *loc_id, size_t_f *namelen, _fcd name, size_t_f *il done: if (c_name != NULL) - HDfree(c_name); + free(c_name); if (c_namepal != NULL) - HDfree(c_namepal); + free(c_namepal); return ret_value; } @@ -501,7 +501,7 @@ h5imget_npalettes_c(hid_t_f *loc_id, size_t_f *namelen, _fcd name, hsize_t_f *np done: if (c_name != NULL) - HDfree(c_name); + free(c_name); return ret_value; } @@ -557,7 +557,7 @@ h5imget_palette_info_c(hid_t_f *loc_id, size_t_f *namelen, _fcd name, int_f *pal done: if (c_name != NULL) - HDfree(c_name); + free(c_name); return ret_value; } @@ -607,7 +607,7 @@ h5imget_palette_c(hid_t_f *loc_id, size_t_f *namelen, _fcd name, int_f *pal_numb done: if (c_name != NULL) - HDfree(c_name); + free(c_name); return ret_value; } @@ -650,7 +650,7 @@ h5imis_palette_c(hid_t_f *loc_id, size_t_f *namelen, _fcd name) ret = H5IMis_palette(c_loc_id, c_name); if (c_name != NULL) - HDfree(c_name); + free(c_name); return ret; } |