hdf5_ep

​

#define H5B_PACKAGE     /*suppress error about including H5Bpkg   */

​

/***********/

/* Headers */

/***********/

#include "H5private.h"      /* Generic Functions            */

#include "H5Bpkg.h"     /* B-link trees             */

#include "H5Eprivate.h"     /* Error handling           */

​

•

/*-------------------------------------------------------------------------

 * Function:    H5B_debug

 *

 * Purpose: Prints debugging info about a B-tree.

 *

 * Return:  Non-negative on success/Negative on failure

 *

 * Programmer:  Robb Matzke

    herr_t      ret_value=SUCCEED;       /* Return value */

​

    /* A queue of child data */

    struct child_t {

    haddr_t         addr;

    unsigned        level;

    struct child_t         *next;

    } *head = NULL, *tail = NULL, *prev = NULL, *cur = NULL, *tmp = NULL;

​

​

    if (0==ncalls++) {

    if (H5DEBUG(B)) {

        fprintf(H5DEBUG(B), "H5B: debugging B-trees (expensive)\n");

    }

    }

    /* Initialize the queue */

    bt = (H5B_t *)H5AC_protect(f, dxpl_id, H5AC_BT, addr, type, udata, H5AC_READ);

    assert(bt);

    shared=(H5B_shared_t *)H5RC_GET_OBJ(bt->rc_shared);

    }

​

    /* Free all entries from queue */

    while (head) {

    tmp = head->next;

    H5MM_xfree(head);

    head = tmp;

    }

​

    FUNC_LEAVE_NOAPI(ret_value)

}

#endif /* H5B_DEBUG */

​