pike.git/
src/
interpret.c
Branch:
Tag:
Non-build tags
All tags
No tags
1998-05-24
1998-05-24 00:49:47 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>
b0b09b2b6c7f46661180379c9340ab083af5a535 (
7
lines) (+
5
/-
2
)
[
Show
|
Annotate
]
Branch:
7.9
possible bugfix in array lvalues
Rev: src/interpret.c:1.82
4:
||| See the files COPYING and DISCLAIMER for more information. \*/ #include "global.h"
-
RCSID("$Id: interpret.c,v 1.
81
1998/05/
12
23
:
51
:
23
hubbe Exp $");
+
RCSID("$Id: interpret.c,v 1.
82
1998/05/
24
00
:
49
:
47
hubbe Exp $");
#include "interpret.h" #include "object.h" #include "program.h"
801:
CASE(F_ARRAY_LVALUE); f_aggregate(GET_ARG()*2); sp[-1].u.array->flags |= ARRAY_LVALUE;
+
sp[-1].u.array->type_field |= BIT_UNFINISHED;
sp[0]=sp[-1]; sp[-1].type=T_ARRAY_LVALUE; sp++;
1420:
CASE(F_RETURN); do_return: #if defined(DEBUG) && defined(GC2)
-
if(d_flag
>
2) do_gc();
+
if(d_flag>2) do_gc();
+
if(d_flag>3) do_debug();
check_threads_etc(); #endif