summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--src/H5D.c2
-rw-r--r--src/H5O.c2
-rw-r--r--src/H5T.c16
3 files changed, 20 insertions, 0 deletions
diff --git a/src/H5D.c b/src/H5D.c
index e24fe4f..56b8afb 100644
--- a/src/H5D.c
+++ b/src/H5D.c
@@ -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");
diff --git a/src/H5O.c b/src/H5O.c
index 342643d..829e065 100644
--- a/src/H5O.c
+++ b/src/H5O.c
@@ -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,
diff --git a/src/H5T.c b/src/H5T.c
index 34b19a1..5bb0a5e 100644
--- a/src/H5T.c
+++ b/src/H5T.c
@@ -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);
}