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.
166
2002/12/
05
20
:
10
:
41
mast
Exp $
+
|| $Id: operators.c,v 1.
167
2002/12/
12
17
:
19
:
37
nilsson
Exp $
*/ #include "global.h" #include <math.h>
-
RCSID("$Id: operators.c,v 1.
166
2002/12/
05
20
:
10
:
41
mast
Exp $");
+
RCSID("$Id: operators.c,v 1.
167
2002/12/
12
17
:
19
:
37
nilsson
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:1349:
index_shared_string(sp[-1].u.string,i)); \ } \ pop_n_elems(2); \ push_string(end_shared_string(s)); \ return; \ } STRING_BITOP(&,"AND") default:
-
PIKE_ERROR("`&", "Bitwise
and
on illegal type.\n", sp, 2);
+
PIKE_ERROR("`&", "Bitwise
AND
on illegal type.\n", sp, 2);
} } /* This function is used to speed up or/xor/and on * arrays multisets and mappings. This is done by * calling the operator for each pair of arguments * first, then recursively doing the same on the * results until only one value remains. */ static void r_speedup(INT32 args, void (*func)(void))
pike.git/src/operators.c:1627:
pop_n_elems(2); push_type_value(t); free_type(a); free_type(b); return; } STRING_BITOP(|,"OR") default:
-
PIKE_ERROR("`|", "Bitwise
or
on illegal type.\n", sp, 2);
+
PIKE_ERROR("`|", "Bitwise
OR
on illegal type.\n", sp, 2);
} } /*! @decl mixed `|(mixed arg1) *! @decl mixed `|(object arg1, mixed arg2) *! @decl mixed `|(mixed arg1, object arg2) *! @decl int `|(int arg1, int arg2) *! @decl mapping `|(mapping arg1, mapping arg2) *! @decl multiset `|(multiset arg1, multiset arg2) *! @decl array `|(array arg1, array arg2)