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.
38
1998/
05
/
25
10
:
38
:
44
hubbe Exp $");
+
RCSID("$Id: docode.c,v 1.
39
1998/
07
/
31
06
:
51
:
41
hubbe 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:418:
emit2(flags & DO_POP ? F_ASSIGN_AND_POP:F_ASSIGN); break; } return flags & DO_POP ? 0 : 1; } case F_LAND: case F_LOR: tmp1=alloc_label(); do_cond_jump(CAR(n), tmp1, n->token == F_LOR, 0);
-
if(do
_
docode
(CDR(n),
0)!
=
1)
fatal(
"
Compiler
logical
error.\n
");
+
code
_
expression
(CDR(n),
flags, n->token
=
=
F_LOR ?
"
||"
:
"
&&"
);
emit(F_LABEL,tmp1); return 1; case F_EQ: case F_NE: case F_ADD: case F_LT: case F_LE: case F_GT: case F_GE: