pike.git/
src/
opcodes.c
Branch:
Tag:
Non-build tags
All tags
No tags
1999-10-31
1999-10-31 22:04:11 by Henrik Grubbström (Grubba) <grubba@grubba.org>
a2ce7d486e1a212a6f373ae304cb0741423738cc (
6
lines) (+
4
/-
2
)
[
Show
|
Annotate
]
Branch:
7.9
Fixed wide-string bug.
Rev: src/opcodes.c:1.58
25:
#include "security.h" #include "bignum.h"
-
RCSID("$Id: opcodes.c,v 1.
57
1999/10/31 22:
02
:
17
grubba Exp $");
+
RCSID("$Id: opcodes.c,v 1.
58
1999/10/31 22:
04
:
11
grubba Exp $");
void index_no_free(struct svalue *to,struct svalue *what,struct svalue *ind) {
1319:
set[input[eye]];eye++); \ sval.type=T_STRING; \ DO_IF_CHECKER(sval.subtype=0); \
-
sval.u.string=make_shared_binary_string(input+e,eye-e); \
+
sval.u.string=
PIKE_CONCAT(
make_shared_binary_string
, \
+
INPUT_SHIFT)
(input+e,eye-e);
\
break; \ \ case 'n': \