diff options
| -rw-r--r-- | src/H5.c | 53 |
1 files changed, 46 insertions, 7 deletions
@@ -244,12 +244,13 @@ done: * *------------------------------------------------------------------------- */ -herr_t +herr_t H5dont_atexit(void) { herr_t ret_value=SUCCEED; /* Return value */ FUNC_ENTER_API_NOINIT(H5dont_atexit); + H5TRACE0("e",""); if (dont_atexit_g) HGOTO_DONE(FAIL); @@ -326,13 +327,15 @@ done: * *------------------------------------------------------------------------- */ -herr_t +herr_t H5set_free_list_limits(int reg_global_lim, int reg_list_lim, int arr_global_lim, int arr_list_lim, int blk_global_lim, int blk_list_lim) { herr_t ret_value = SUCCEED; FUNC_ENTER_API(H5set_free_list_limits, FAIL); + H5TRACE6("e","IsIsIsIsIsIs",reg_global_lim,reg_list_lim,arr_global_lim, + arr_list_lim,blk_global_lim,blk_list_lim); /* Call the free list function to actually set the limits */ H5FL_set_free_list_limits(reg_global_lim, reg_list_lim, arr_global_lim, arr_list_lim, blk_global_lim, blk_list_lim); @@ -457,12 +460,13 @@ H5_debug_mask(const char *s) * *------------------------------------------------------------------------- */ -herr_t +herr_t H5get_libversion(unsigned *majnum, unsigned *minnum, unsigned *relnum) { herr_t ret_value = SUCCEED; FUNC_ENTER_API(H5get_libversion, FAIL); + H5TRACE3("e","*Iu*Iu*Iu",majnum,minnum,relnum); /* Set the version information */ if (majnum) *majnum = H5_VERS_MAJOR; @@ -497,7 +501,7 @@ done: *------------------------------------------------------------------------- */ herr_t -H5check_version (unsigned majnum, unsigned minnum, unsigned relnum) +H5check_version(unsigned majnum, unsigned minnum, unsigned relnum) { char lib_str[256]; char substr[] = H5_VERS_SUBRELEASE; @@ -506,6 +510,7 @@ H5check_version (unsigned majnum, unsigned minnum, unsigned relnum) herr_t ret_value=SUCCEED; /* Return value */ FUNC_ENTER_API_NOINIT(H5check_version); + H5TRACE3("e","IuIuIu",majnum,minnum,relnum); /* Don't check again, if we already have */ if (checked) @@ -606,6 +611,7 @@ H5open(void) herr_t ret_value=SUCCEED; /* Return value */ FUNC_ENTER_API(H5open, FAIL); + H5TRACE0("e",""); /* all work is done by FUNC_ENTER() */ done: FUNC_LEAVE(ret_value); @@ -627,7 +633,7 @@ done: *------------------------------------------------------------------------- */ herr_t -H5close (void) +H5close(void) { /* * Don't call FUNC_ENTER() since we don't want to initialize the whole @@ -635,6 +641,7 @@ H5close (void) * function for an uninitialized library. */ FUNC_ENTER_API_NOINIT(H5close); + H5TRACE0("e",""); H5_term_library(); @@ -746,7 +753,7 @@ HDvsnprintf(char *buf, size_t size, const char *fmt, va_list ap) *------------------------------------------------------------------------- */ int -HDfprintf (FILE *stream, const char *fmt, ...) +HDfprintf(FILE *stream, const char *fmt, ...) { int n=0, nout = 0; int fwidth, prec; @@ -1075,7 +1082,7 @@ HDfprintf (FILE *stream, const char *fmt, ...) *------------------------------------------------------------------------- */ int64_t -HDstrtoll (const char *s, const char **rest, int base) +HDstrtoll(const char *s, const char **rest, int base) { int64_t sign=1, acc=0; hbool_t overflow = FALSE; @@ -2315,6 +2322,38 @@ H5_trace (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 { + H5S_sel_type st = va_arg(ap, H5S_sel_type); + switch (st) { + case H5S_SEL_ERROR: + fprintf(out, "H5S_SEL_ERROR"); + break; + case H5S_SEL_NONE: + fprintf(out, "H5S_SEL_NONE"); + break; + case H5S_SEL_POINTS: + fprintf(out, "H5S_SEL_POINTS"); + break; + case H5S_SEL_HYPERSLABS: + fprintf(out, "H5S_SEL_HYPERSLABS"); + break; + case H5S_SEL_ALL: + fprintf(out, "H5S_SEL_ALL"); + break; + default: + fprintf(out, "%ld", (long)st); + break; + } + } + break; + default: fprintf(out, "BADTYPE(S%c)", type[1]); goto error; |