diff options
Diffstat (limited to 'src')
-rw-r--r-- | src/Dependencies | 3 | ||||
-rw-r--r-- | src/H5.c | 15 | ||||
-rw-r--r-- | src/H5F.c | 2 | ||||
-rw-r--r-- | src/H5P.c | 6 | ||||
-rw-r--r-- | src/H5Pdcpl.c | 2 | ||||
-rw-r--r-- | src/H5Pdxpl.c | 2 | ||||
-rw-r--r-- | src/H5S.c | 2 | ||||
-rw-r--r-- | src/H5Sselect.c | 2 | ||||
-rw-r--r-- | src/H5T.c | 6 | ||||
-rw-r--r-- | src/H5Tcommit.c | 2 | ||||
-rw-r--r-- | src/H5Z.c | 2 |
11 files changed, 29 insertions, 15 deletions
diff --git a/src/Dependencies b/src/Dependencies index a157d98..5882033 100644 --- a/src/Dependencies +++ b/src/Dependencies @@ -3619,11 +3619,10 @@ H5Tinit.o: \ ../../hdf5/src/H5Epublic.h \ ../../hdf5/src/H5Epubgen.h \ ../../hdf5/src/H5FLprivate.h \ - ../../hdf5/src/H5MMprivate.h \ - ../../hdf5/src/H5MMpublic.h \ ../../hdf5/src/H5Tpkg.h \ ../../hdf5/src/H5Tprivate.h \ ../../hdf5/src/H5Tpublic.h \ + ../../hdf5/src/H5MMpublic.h \ ../../hdf5/src/H5Gprivate.h \ ../../hdf5/src/H5Gpublic.h \ ../../hdf5/src/H5Opublic.h \ @@ -2890,6 +2890,21 @@ H5_trace (const double *returning, const char *func, const char *type, ...) } break; + case 't': + if (ptr) { + if (vp) { + fprintf (out, "0x%lx", (unsigned long)vp); + } else { + fprintf(out, "NULL"); + } + } else { + htri_t tri_var = va_arg (ap, htri_t); + if (tri_var>0) fprintf (out, "TRUE"); + else if (!tri_var) fprintf (out, "FALSE"); + else fprintf (out, "FAIL(%d)", (int)tri_var); + } + break; + case 'x': if (ptr) { if (vp) { @@ -1351,7 +1351,7 @@ H5Fis_hdf5(const char *name) htri_t ret_value; FUNC_ENTER_API(H5Fis_hdf5, FAIL) - H5TRACE1("b","s",name); + H5TRACE1("t","s",name); /* Check args and all the boring stuff. */ if (!name || !*name) @@ -2942,7 +2942,7 @@ H5Pexist(hid_t id, const char *name) htri_t ret_value; /* return value */ FUNC_ENTER_API(H5Pexist, FAIL); - H5TRACE2("b","is",id,name); + H5TRACE2("t","is",id,name); /* Check arguments. */ if (H5I_GENPROP_LST != H5I_get_type(id) && H5I_GENPROP_CLS != H5I_get_type(id)) @@ -3670,7 +3670,7 @@ H5Pequal(hid_t id1, hid_t id2) htri_t ret_value=FALSE; /* return value */ FUNC_ENTER_API(H5Pequal, FAIL); - H5TRACE2("b","ii",id1,id2); + H5TRACE2("t","ii",id1,id2); /* Check arguments. */ if ((H5I_GENPROP_LST != H5I_get_type(id1) && H5I_GENPROP_CLS != H5I_get_type(id1)) @@ -3824,7 +3824,7 @@ H5Pisa_class(hid_t plist_id, hid_t pclass_id) htri_t ret_value; /* return value */ FUNC_ENTER_API(H5Pisa_class, FAIL); - H5TRACE2("b","ii",plist_id,pclass_id); + H5TRACE2("t","ii",plist_id,pclass_id); /* Check arguments. */ if (H5I_GENPROP_LST != H5I_get_type(plist_id)) diff --git a/src/H5Pdcpl.c b/src/H5Pdcpl.c index 1084ca3..fb5f9a9 100644 --- a/src/H5Pdcpl.c +++ b/src/H5Pdcpl.c @@ -942,7 +942,7 @@ H5Pall_filters_avail(hid_t plist_id) hbool_t ret_value=TRUE; /* return value */ FUNC_ENTER_API(H5Pall_filters_avail, UFAIL); - H5TRACE1("b","i",plist_id); + H5TRACE1("t","i",plist_id); /* Get the plist structure */ if(NULL == (plist = H5P_object_verify(plist_id,H5P_DATASET_CREATE))) diff --git a/src/H5Pdxpl.c b/src/H5Pdxpl.c index fc84cdf..3994d98 100644 --- a/src/H5Pdxpl.c +++ b/src/H5Pdxpl.c @@ -462,7 +462,7 @@ H5Pget_type_conv_cb(hid_t plist_id, H5T_conv_except_func_t *op, void **operate_d herr_t ret_value=SUCCEED; /* return value */ FUNC_ENTER_API(H5Pget_type_conv_cb, FAIL); - H5TRACE3("e","ixx",plist_id,op,operate_data); + H5TRACE3("e","i*xx",plist_id,op,operate_data); /* Get the plist structure */ if(NULL == (plist = H5P_object_verify(plist_id,H5P_DATASET_XFER))) @@ -1226,7 +1226,7 @@ H5Sis_simple(hid_t space_id) htri_t ret_value; FUNC_ENTER_API(H5Sis_simple, FAIL); - H5TRACE1("b","i",space_id); + H5TRACE1("t","i",space_id); /* Check args and all the boring stuff. */ if ((space = H5I_object_verify(space_id,H5I_DATASPACE)) == NULL) diff --git a/src/H5Sselect.c b/src/H5Sselect.c index 56ab3b4..61a1f5d 100644 --- a/src/H5Sselect.c +++ b/src/H5Sselect.c @@ -376,7 +376,7 @@ H5Sselect_valid(hid_t spaceid) htri_t ret_value; /* return value */ FUNC_ENTER_API(H5Sselect_valid, 0); - H5TRACE1("b","i",spaceid); + H5TRACE1("t","i",spaceid); /* Check args */ if (NULL == (space=H5I_object_verify(spaceid, H5I_DATASPACE))) @@ -1638,7 +1638,7 @@ H5Tequal(hid_t type1_id, hid_t type2_id) htri_t ret_value; FUNC_ENTER_API(H5Tequal, FAIL); - H5TRACE2("b","ii",type1_id,type2_id); + H5TRACE2("t","ii",type1_id,type2_id); /* check args */ if (NULL == (dt1 = H5I_object_verify(type1_id,H5I_DATATYPE)) || @@ -1797,7 +1797,7 @@ H5Tdetect_class(hid_t type, H5T_class_t cls) htri_t ret_value; /* Return value */ FUNC_ENTER_API(H5Tdetect_class, FAIL); - H5TRACE2("b","iTt",type,cls); + H5TRACE2("t","iTt",type,cls); /* Check args */ if (NULL == (dt = H5I_object_verify(type,H5I_DATATYPE))) @@ -1895,7 +1895,7 @@ H5Tis_variable_str(hid_t dtype_id) htri_t ret_value; /* Return value */ FUNC_ENTER_API(H5Tis_variable_str, FAIL); - H5TRACE1("b","i",dtype_id); + H5TRACE1("t","i",dtype_id); /* Check args */ if (NULL == (dt = H5I_object_verify(dtype_id,H5I_DATATYPE))) diff --git a/src/H5Tcommit.c b/src/H5Tcommit.c index d174aec..15f3fb5 100644 --- a/src/H5Tcommit.c +++ b/src/H5Tcommit.c @@ -205,7 +205,7 @@ H5Tcommitted(hid_t type_id) htri_t ret_value; /* Return value */ FUNC_ENTER_API(H5Tcommitted, FAIL); - H5TRACE1("b","i",type_id); + H5TRACE1("t","i",type_id); /* Check arguments */ if (NULL==(type=H5I_object_verify(type_id,H5I_DATATYPE))) @@ -407,7 +407,7 @@ H5Zfilter_avail(H5Z_filter_t id) htri_t ret_value=FALSE; /* Return value */ FUNC_ENTER_API(H5Zfilter_avail, FAIL) - H5TRACE1("b","Zf",id); + H5TRACE1("t","Zf",id); /* Check args */ if(id<0 || id>H5Z_FILTER_MAX) |