2000-04-06
2000-04-06 09:03:59 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>
-
4879c1d5f13ca980c2429b20c8eecf40e1d02754
(28 lines)
(+19/-9)
[
Show
| Annotate
]
Branch: 7.9
bugfix + more debug
Rev: src/las.c:1.174
5:
\*/
/**/
#include "global.h"
- RCSID("$Id: las.c,v 1.173 2000/04/01 14:47:16 grubba Exp $");
+ RCSID("$Id: las.c,v 1.174 2000/04/06 09:03:59 hubbe Exp $");
#include "language.h"
#include "interpret.h"
3906:
if(foo->type == T_FUNCTION && foo->subtype==FUNCTION_BUILTIN)
{
tmp.c_fun=foo->u.efun->function;
+ if(tmp.c_fun != f_destruct &&
+ tmp.c_fun != f_this_object &&
+ tmp.c_fun != f_backtrace)
+ {
ret=define_function(name,
type,
modifiers,
3914: Inside #if defined(PIKE_DEBUG)
free_node(n);
#ifdef PIKE_DEBUG
if(a_flag > 1)
- fprintf(stderr,"Identifer (C) = %d\n",ret);
+ fprintf(stderr,"%s:%d: IDENTIFIER OPTIMIZATION %s == %s\n",
+ lex.current_file->str,
+ lex.current_line,
+ name->str,
+ foo->u.efun->name->str);
#endif
return ret;
}
}
-
+ }
tmp.offset=PC;
add_to_program(compiler_frame->max_number_of_locals);