pike.git / src / program.c

version» Context lines:

pike.git/src/program.c:1:   /*   || This file is part of Pike. For copyright information see COPYRIGHT.   || Pike is distributed under GPL, LGPL and MPL. See the file COPYING   || for more information. - || $Id: program.c,v 1.549 2004/01/16 21:51:38 mirar Exp $ + || $Id: program.c,v 1.550 2004/01/17 19:20:43 nilsson Exp $   */      #include "global.h" - RCSID("$Id: program.c,v 1.549 2004/01/16 21:51:38 mirar Exp $"); + RCSID("$Id: program.c,v 1.550 2004/01/17 19:20:43 nilsson Exp $");   #include "program.h"   #include "object.h"   #include "dynamic_buffer.h"   #include "pike_types.h"   #include "stralloc.h"   #include "las.h"   #include "language.h"   #include "lex.h"   #include "pike_macros.h"   #include "fsort.h"
pike.git/src/program.c:2993:    e = low_find_lfun(Pike_compiler->new_program, LFUN___INIT);    }else{    e=-1;    }    Pike_compiler->new_program->lfuns[LFUN___INIT]=e;       pop_compiler_frame(); /* Pop __INIT local variables */       if(Pike_compiler->num_parse_error > 0)    { +  CDFPRINTF((stderr, "th(%ld) Compilation errors (%d).\n", +  (long)th_self(), Pike_compiler->num_parse_error));    prog=0;    }else{    prog=Pike_compiler->new_program;    add_ref(prog);       Pike_compiler->new_program->flags |= PROGRAM_PASS_1_DONE;       if(finish)    {    if(Pike_compiler->new_program->flags & PROGRAM_USES_PARENT)