pike.git/
src/
docode.c
Branch:
Tag:
Non-build tags
All tags
No tags
2001-01-14
2001-01-14 21:39:36 by Henrik Grubbström (Grubba) <grubba@grubba.org>
f70c40d5addbd10387b32b7dff3d1e42079fd6ff (
9
lines) (+
4
/-
5
)
[
Show
|
Annotate
]
Branch:
7.9
More F_LOOP fixes...
Rev: src/docode.c:1.96
5:
\*/ /**/ #include "global.h"
-
RCSID("$Id: docode.c,v 1.
95
2001/01/14 21:
05
:
38
grubba Exp $");
+
RCSID("$Id: docode.c,v 1.
96
2001/01/14 21:
39
:
36
grubba Exp $");
#include "las.h" #include "program.h" #include "pike_types.h"
894:
{ /* FIXME: No support for break or continue. */ PUSH_STATEMENT_LABEL;
-
tmp1 = do_
code
(CAR(n));
+
tmp1 = do_
docode
(CAR(n)
, 0
);
if (tmp1 > 0) { do_pop(tmp1-1); tmp2 = do_branch(-1); tmp3 = ins_label(-1);
-
PUSH
_
STATEMENT
_
LABEL;
-
do_pop
(
do_code(
CDR(n))
)
;
-
POP_STATEMENT_LABEL;
+
DO
_
CODE
_
BLOCK
(CDR(n));
ins_label(tmp2); emit1(F_LOOP, tmp3); }