free_bin_tree (dfa->str_tree);
bin_tree_storage_t *storage, *next; for (storage = dfa->str_tree_storage; storage; storage = next) { next = storage->next; re_free (storage); } dfa->str_tree_storage = NULL; dfa->str_tree_storage_idx = BIN_TREE_STORAGE_SIZE;
free_workarea_compile (preg)     regex_t *preg;{  re_dfa_t *dfa = (re_dfa_t *) preg->buffer;  free_bin_tree (dfa->str_tree);  dfa->str_tree = NULL;  re_free (dfa->org_indices);  dfa->org_indices = NULL;}