1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
 herr_t
 ss_array_reset(ss_array_t *array)
 {
     SS_ENTER(ss_array_reset, herr_t);
     if (!array) SS_ERROR_FMT(USAGE, ("no ss_array_t supplied"));
     if (ss_string_reset(&(array->fbuf))<0) SS_ERROR(HDF5);
     if (ss_string_reset(&(array->enc_ftype))<0) SS_ERROR(HDF5);
     if (array->mtype>0) H5Tclose(array->mtype);
     if (array->ftype>0) H5Tclose(array->ftype);
     SS_FREE(array->mbuf);
     array->dirty = TRUE;
     memset(array, 0, sizeof(*array));

  SS_CLEANUP:
     if (array) memset(array, 0, sizeof(*array));
     SS_LEAVE(0);
 }