Esempio n. 1
0
void
free_func_chain(nasl_func* f)
{
  if (f == NULL)
    return;
  free_func_chain(f->next_func);
  free_func(f);
}
void
free_lex_ctxt (lex_ctxt * c)
{
  int i;

#if 0
  if (c->exit_flag && c->up_ctxt != NULL)
    ((lex_ctxt *) c->up_ctxt)->exit_flag = 1;
#endif
  deref_cell (c->ret_val);
  free_array (&c->ctx_vars);
  for (i = 0; i < FUNC_NAME_HASH; i++)
    {
      free_func_chain (c->functions[i]);
    }
  efree (&c);
}