pike.git
/
src
/
docode.c
version
»
Context lines:
10
20
40
80
file
none
3
pike.git/src/docode.c:1:
/*\ ||| This file a part of Pike, and is copyright by Fredrik Hubinette ||| Pike is distributed as GPL (General Public License) ||| See the files COPYING and DISCLAIMER for more information. \*/ #include "global.h"
-
RCSID("$Id: docode.c,v 1.
19
1997/08/
03
09
:
54
:
43
hubbe
Exp $");
+
RCSID("$Id: docode.c,v 1.
20
1997/08/
30
18
:
35
:
27
grubba
Exp $");
#include "las.h" #include "program.h" #include "language.h" #include "pike_types.h" #include "stralloc.h" #include "interpret.h" #include "constants.h" #include "array.h" #include "pike_macros.h" #include "error.h"
pike.git/src/docode.c:76:
} int store_linenumbers=1; /* * A mechanism to remember addresses on a stack. */ int comp_stackp; INT32 comp_stack[COMPILER_STACK_SIZE];
-
void push_address()
+
void push_address(
void
)
{ if (comp_stackp >= COMPILER_STACK_SIZE) { yyerror("Compiler stack overflow"); comp_stackp++; return; } comp_stack[comp_stackp++] = PC; }
pike.git/src/docode.c:98:
{ if (comp_stackp >= COMPILER_STACK_SIZE) { yyerror("Compiler stack overflow"); comp_stackp++; return; } comp_stack[comp_stackp++] = address; }
-
INT32 pop_address()
+
INT32 pop_address(
void
)
{ if (comp_stackp == 0) fatal("Compiler stack underflow.\n"); if (comp_stackp > COMPILER_STACK_SIZE) { --comp_stackp; return 0; } return comp_stack[--comp_stackp]; } static int label_no=0;
-
int alloc_label() { return ++label_no; }
+
int alloc_label(
void
) { return ++label_no; }
int do_jump(int token,INT32 lbl) { if(lbl==-1) lbl=alloc_label(); emit(token, lbl); return lbl; } static int do_docode2(node *n,int flags);