pike.git
/
src
/
operators.c
version
»
Context lines:
10
20
40
80
file
none
3
pike.git/src/operators.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" #include <math.h>
-
RCSID("$Id: operators.c,v 1.
98
2000/08/
10
17
:
44
:
56
grubba Exp $");
+
RCSID("$Id: operators.c,v 1.
99
2000/08/
15
11
:
18
:
46
grubba 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:1790:
a->item[0].u.string=string_slice(sp[-2].u.string, pos, last-pos); a->item[0].type=T_STRING; }else{ size=(ptrdiff_t)ceil( ((double)sp[-2].u.string->len) / len); a=allocate_array(size); for(last=0,e=0;e<size-1;e++) {
-
pos=(
INT32
)((e+1)*len);
+
pos
=
DO_NOT_WARN
(
(ptrdiff_t
)((e+1)*len)
)
;
a->item[e].u.string=string_slice(sp[-2].u.string, last, pos-last); a->item[e].type=T_STRING; last=pos; } pos=sp[-2].u.string->len; a->item[e].u.string=string_slice(sp[-2].u.string, last, pos-last);