partial_clear
partial_clear(__G); /* clear leafs (nodes with no children) */
static void partial_clear OF((__GPRO));