diff options
| -rw-r--r-- | src/H5D.c | 2 | ||||
| -rw-r--r-- | src/H5O.c | 2 | ||||
| -rw-r--r-- | src/H5T.c | 16 |
3 files changed, 20 insertions, 0 deletions
@@ -1865,7 +1865,9 @@ H5D_write(H5D_t *dataset, const H5T_t *mem_type, const H5S_t *mem_space, "unable to register types for conversion"); } } +#ifdef QAK printf("%s: after H5T_find, tconv_func=%p\n",FUNC,tconv_func); +#endif /* QAK */ if (NULL==(sconv=H5S_find(mem_space, file_space))) { HGOTO_ERROR (H5E_DATASET, H5E_UNSUPPORTED, FAIL, "unable to convert from memory to file data space"); @@ -1044,11 +1044,13 @@ H5O_find_in_ohdr(H5F_t *f, const haddr_t *addr, const H5O_class_t **type_p, assert(addr && H5F_addr_defined(addr)); assert(type_p); +#ifdef QAK printf("%s: addr=",FUNC); H5F_addr_print(stdout,addr); printf("\n%s: f=%p, addr=%p\n",FUNC,f,addr); printf("%s: f->shared=%p\n",FUNC,f->shared); printf("%s: H5AC_HASH=%lu\n",FUNC,(unsigned long)H5AC_HASH(f,addr)); +#endif /* QAK */ /* Load the object header */ if (NULL == (oh = H5AC_find(f, H5AC_OHDR, addr, NULL, NULL))) { HRETURN_ERROR(H5E_OHDR, H5E_CANTLOAD, FAIL, @@ -4394,27 +4394,35 @@ H5T_find(const H5T_t *src, const H5T_t *dst, H5T_bkg_t need_bkg, FUNC_ENTER(H5T_find, NULL); +#ifdef QAK printf("%s: check 1.0\n",FUNC); +#endif /* QAK */ if (!noop_cdata.stats && NULL==(noop_cdata.stats = H5MM_calloc (sizeof(H5T_stats_t)))) { HRETURN_ERROR (H5E_RESOURCE, H5E_NOSPACE, NULL, "memory allocation failed"); } +#ifdef QAK printf("%s: check 2.0, src->type=%d, dst->type=%d\n",FUNC,(int)src->type,(int)dst->type); +#endif /* QAK */ /* No-op case */ if (need_bkg<H5T_BKG_YES && 0==H5T_cmp(src, dst)) { *pcdata = &noop_cdata; HRETURN(H5T_conv_noop); } +#ifdef QAK printf("%s: check 3.0\n",FUNC); +#endif /* QAK */ /* Find it */ if (NULL == (path = H5T_path_find(NULL, src, dst, TRUE, NULL))) { HRETURN_ERROR(H5E_DATATYPE, H5E_CANTINIT, NULL, "unable to create conversion path"); } +#ifdef QAK printf("%s: path=%p\n",FUNC,path); +#endif /* QAK */ if ((ret_value=path->func)) { *pcdata = &(path->cdata); @@ -4482,7 +4490,9 @@ H5T_path_find(const char *name, const H5T_t *src, const H5T_t *dst, HRETURN(H5T_path_g[md]); } } +#ifdef QAK printf("%s: check 2.0, create=%d, md=%d\n",FUNC,(int)create,md); +#endif /* QAK */ /* Insert */ if (create) { @@ -4509,12 +4519,16 @@ printf("%s: check 2.0, create=%d, md=%d\n",FUNC,(int)create,md); HRETURN_ERROR (H5E_RESOURCE, H5E_NOSPACE, NULL, "memory allocation failed"); } +#ifdef QAK printf("%s: check 3.0, src=%p, dst=%p\n",FUNC,src,dst); printf("%s: check 3.0, src->type=%d, dst->type=%d\n",FUNC,(int)src->type,(int)dst->type); +#endif /* QAK */ path->src = H5T_copy(src, H5T_COPY_ALL); path->dst = H5T_copy(dst, H5T_COPY_ALL); +#ifdef QAK printf("%s: check 3.5, func=%p, name=%s\n",FUNC,func,(name!=NULL ? name : "NULL")); +#endif /* QAK */ /* Associate a function with the path if possible */ if (func) { HDstrncpy (path->name, name, H5T_NAMELEN); @@ -4580,7 +4594,9 @@ printf("%s: check 3.5, func=%p, name=%s\n",FUNC,func,(name!=NULL ? name : "NULL" } } } +#ifdef QAK printf("%s: leaving path=%p\n",FUNC,path); +#endif /* QAK */ FUNC_LEAVE(path); } |