pike.git
/
src
/
program.c
version
»
Context lines:
10
20
40
80
file
none
3
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)