mirror/hdf5
2
0
Fork 0
mirror of https://github.com/HDFGroup/hdf5.git synced 2024-12-09 07:32:32 +08:00
Code Issues Packages Projects Releases Wiki Activity

[svn-r20871] Added function to free iter structure allocations.

Browse Source 
Tested: local linux - Confirmed by Valgrind
This commit is contained in:
Allen Byrne 2011-05-20 09:44:55 -05:00
parent f9174cbd9d
commit 0982e11bb4
1 changed files with 42 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

42
tools/h5stat/h5stat.c
View File

@ -966,6 +966,45 @@ iter_init(iter_t *iter, hid_t fid)
return 0;
}
/*-------------------------------------------------------------------------
* Function: free_iter
*
* Purpose: Freee iter structure
*
* Return: Success: 0
*
* Failure: Never fails
*
*-------------------------------------------------------------------------
*/
static herr_t
iter_free(iter_t *iter)
{
/* Clear array of bins for group counts */
if(iter->group_bins)
free(iter->group_bins);
iter->group_bins = NULL;
/* Clear array of bins for attribute counts */
if(iter->attr_bins)
free(iter->attr_bins);
iter->attr_bins = NULL;
/* Clear dataset datatype information found */
if(iter->dset_type_info)
free(iter->dset_type_info);
iter->dset_type_info = NULL;
/* Clear array of bins for dataset dimensions */
if(iter->dset_dim_bins)
free(iter->dset_dim_bins);
iter->dset_dim_bins = NULL;
/* Clear array of bins for free-space section sizes */
if(iter->sect_bins)
free(iter->sect_bins);
iter->sect_bins = NULL;
return 0;
}
/*-------------------------------------------------------------------------
* Function: print_file_info
@ -1671,6 +1710,9 @@ done:
free(hand);
hand = NULL;
/* Free iter structure */
iter_free(&iter);
if(H5Fclose(fid) < 0) {
error_msg("unable to close file \"%s\"\n", fname);