pike.git/
src/
program.c
Branch:
Tag:
Non-build tags
All tags
No tags
1999-07-01
1999-07-01 22:12:56 by Henrik Grubbström (Grubba) <grubba@grubba.org>
f06a82df77dc9132fb25557644da7c24c96be054 (
15
lines) (+
11
/-
4
)
[
Show
|
Annotate
]
Branch:
7.9
Minor change.
Rev: src/program.c:1.131
5:
\*/ /**/ #include "global.h"
-
RCSID("$Id: program.c,v 1.
130
1999/07/01 22:
09
:
38
hubbe
Exp $");
+
RCSID("$Id: program.c,v 1.
131
1999/07/01 22:
12
:
56
grubba
Exp $");
#include "program.h" #include "object.h" #include "dynamic_buffer.h"
39:
#define ATTRIBUTE(X)
-
/*
#define COMPILER_DEBUG
*/
+
#define COMPILER_DEBUG
#ifdef COMPILER_DEBUG #define CDFPRINTF(X) fprintf X
984:
exit_threads_disable(NULL);
-
CDFPRINTF((stderr, "th(%ld),end_first_pass(): compilation_depth:%d\n",
-
(long)th_self(),compilation_depth));
+
CDFPRINTF((stderr,
+
"th(%ld),end_first_pass(): compilation_depth:%
d, compiler_pass:%
d\n",
+
(long)th_self(),
compilation_depth
, compiler_pass
));
free_all_nodes(); if(!compiler_frame && compiler_pass==2 && resolve_cache)
2440:
compiler_pass=1; lex.pos=prog->str;
+
CDFPRINTF((stderr, "compile(): First pass\n"));
+
yyparse(); /* Parse da program */ p=end_first_pass(0);
2458:
p=0; compiler_pass=2; lex.pos=prog->str;
+
+
CDFPRINTF((stderr, "compile(): Second pass\n"));
+
yyparse(); /* Parse da program again */ p=end_program(); }