Branch: Tag:

2000-04-06

2000-04-06 09:03:59 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>

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);