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.
136
2001/
10
/
05
22
:
55
:
32
hubbe
Exp $");
+
RCSID("$Id: docode.c,v 1.
137
2001/
12/
10
02
:
08
:
13
mast
Exp $");
#include "las.h" #include "program.h" #include "pike_types.h" #include "stralloc.h" #include "interpret.h" #include "constants.h" #include "array.h" #include "pike_macros.h" #include "pike_error.h" #include "pike_memory.h"
pike.git/src/docode.c:2066:
break; case T_MAPPING: mapping_fix_type_field(n->u.sval.u.mapping); if((n->u.sval.u.mapping->data->ind_types | n->u.sval.u.mapping->data->val_types) & BIT_COMPLEX) emit0(F_COPY_VALUE); break; case T_MULTISET:
-
array
_fix_type_field(n->u.sval.u.multiset
->ind
);
-
if(n->u.sval.u.multiset
->ind->
type_field
& BIT_COMPLEX)
+
multiset
_fix_type_field(n->u.sval.u.multiset);
+
if(
multiset_ind_types(
n->u.sval.u.multiset
)
& BIT_COMPLEX)
emit0(F_COPY_VALUE); break; } }else{ emit0(F_COPY_VALUE); } } return 1; }