pike.git
/
src
/
operators.c
version
»
Context lines:
10
20
40
80
file
none
3
pike.git/src/operators.c:1:
/* || This file is part of Pike. For copyright information see COPYRIGHT. || Pike is distributed under GPL, LGPL and MPL. See the file COPYING || for more information.
-
|| $Id: operators.c,v 1.
176
2003/04/
27
17
:
52
:
42
mast Exp $
+
|| $Id: operators.c,v 1.
177
2003/04/
28
00
:
32
:
43
mast Exp $
*/ #include "global.h" #include <math.h>
-
RCSID("$Id: operators.c,v 1.
176
2003/04/
27
17
:
52
:
42
mast Exp $");
+
RCSID("$Id: operators.c,v 1.
177
2003/04/
28
00
:
32
:
43
mast Exp $");
#include "interpret.h" #include "svalue.h" #include "multiset.h" #include "mapping.h" #include "array.h" #include "stralloc.h" #include "opcodes.h" #include "operators.h" #include "language.h" #include "pike_memory.h"
pike.git/src/operators.c:2128:
while (asize > delta) { assign_svalues_no_free(pos, ret->item, delta, ret->type_field); pos += delta; asize -= delta; delta <<= 1; } if (asize) { assign_svalues_no_free(pos, ret->item, asize, ret->type_field); } } else if (asize) {
+
ret->type_field =
assign_svalues_no_free(pos, src->item, asize, src->type_field);
-
array_fix_type_field(ret);
+
} pop_n_elems(2); push_array(ret); return; } case TWO_TYPES(T_STRING, T_FLOAT): { struct pike_string *src; struct pike_string *ret;