summaryrefslogtreecommitdiffstats
path: root/src/H5.c
diff options
context:
space:
mode:
authorQuincey Koziol <koziol@hdfgroup.org>1998-10-07 21:04:51 (GMT)
committerQuincey Koziol <koziol@hdfgroup.org>1998-10-07 21:04:51 (GMT)
commitc4f1dfcf17118f16254f469332b346c74dea1c53 (patch)
tree77b72e7079afe86c1b4bb0b50c01d3e9912dd460 /src/H5.c
parentfe135c15da44b70fdf966ced9262c6b1cf0ec45c (diff)
downloadhdf5-c4f1dfcf17118f16254f469332b346c74dea1c53.zip
hdf5-c4f1dfcf17118f16254f469332b346c74dea1c53.tar.gz
hdf5-c4f1dfcf17118f16254f469332b346c74dea1c53.tar.bz2
[svn-r743] Added H5I_type_t type to H5_trace and added H5Iget_type function call. Also
checked in H5R skeleton files.
Diffstat (limited to 'src/H5.c')
-rw-r--r--src/H5.c60
1 files changed, 60 insertions, 0 deletions
diff --git a/src/H5.c b/src/H5.c
index 6ac17cf..4c3b583 100644
--- a/src/H5.c
+++ b/src/H5.c
@@ -1745,6 +1745,66 @@ H5_trace (hbool_t 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 {
+ H5I_type_t id_type = va_arg (ap, H5I_type_t);
+ switch (id_type) {
+ case H5I_BADID:
+ fprintf (out, "H5I_BADID");
+ break;
+ case H5I_FILE:
+ fprintf (out, "H5I_FILE");
+ break;
+ case H5I_TEMPLATE_0:
+ case H5I_TEMPLATE_1:
+ case H5I_TEMPLATE_2:
+ case H5I_TEMPLATE_3:
+ case H5I_TEMPLATE_4:
+ case H5I_TEMPLATE_5:
+ case H5I_TEMPLATE_6:
+ case H5I_TEMPLATE_7:
+ fprintf (out, "H5I_TEMPLATE_%d",(int)(id_type-H5I_TEMPLATE_0));
+ break;
+ case H5I_GROUP:
+ fprintf (out, "H5I_GROUP");
+ break;
+ case H5I_DATATYPE:
+ fprintf (out, "H5I_DATATYPE");
+ break;
+ case H5I_DATASPACE:
+ fprintf (out, "H5I_DATASPACE");
+ break;
+ case H5I_DATASET:
+ fprintf (out, "H5I_DATASET");
+ break;
+ case H5I_ATTR:
+ fprintf (out, "H5I_ATTR");
+ break;
+ case H5I_TEMPBUF:
+ fprintf (out, "H5I_TEMPBUF");
+ break;
+ case H5I_RAGGED:
+ fprintf (out, "H5I_RAGGED");
+ break;
+ case H5I_REFERENCE:
+ fprintf (out, "H5I_REFERENCE");
+ break;
+ case H5I_MAXID:
+ fprintf (out, "H5I_MAXID");
+ break;
+ default:
+ fprintf (out, "%ld", (long)id_type);
+ break;
+ }
+ }
+ break;
+
default:
fprintf (out, "BADTYPE(I%c)", type[1]);
goto error;