#2 Internal Compiler Error

[Andrea Palmate']

i have an internal compiler error on its calc_dfs_tree
when compiling this function:

void lbreak(const char format, ...)
{
break_level++;
bFILE old_file=current_print_file;
current_print_file=NULL;
char st[300];
va_list ap;
va_start(ap, format);
vsprintf(st,format,ap);
va_end(ap);
dprintf("%s\n",st);
int cont=0;
do
{
dprintf("type q to quit\n");
dprintf("%d. Break> ",break_level);
dgets(st,300);
if (!strcmp(st,"c") || !strcmp(st,"cont") ||
!strcmp(st,"continue"))
cont=1;
else if (!strcmp(st,"w") || !strcmp(st,"where"))
where_print();
else if (!strcmp(st,"q") || !strcmp(st,"quit"))
exit(1);
else if (!strcmp(st,"e") || !strcmp(st,"env") ||
!strcmp(st,"environment"))
{
dprintf("Enviorment : \nnot supported right now\n");

} else if (!strcmp(st,"h") || !strcmp(st,"help") ||

!strcmp(st,"?"))
{
dprintf("CLIVE Debugger\n");
dprintf(" w, where : show calling parents\n"
" e, env : show enviroment\n"
" c, cont : continue if possible\n"
" q, quit : quits the program\n"
" h, help : this\n");
}
else
{
char s=st;
do
{
void prog=compile(s);
p_ref r1(prog);
while (s==' ' || s=='\t' || s=='\r' || s=='\n')
s++;
lprint(eval(prog));
} while (*s);
}

} while (!cont);
current_print_file=old_file;
break_level--;
}

GCC 4.0.1 - newlib - cygwin cross compiler