pike.git/
src/
opcodes.c
Branch:
Tag:
Non-build tags
All tags
No tags
1999-12-22
1999-12-22 00:35:33 by Henrik Grubbström (Grubba) <grubba@grubba.org>
2573d1574d9089ed23daeccc5004a744220aac77 (
21
lines) (+
12
/-
9
)
[
Show
|
Annotate
]
Branch:
7.9
Fixed warning.
Rev: src/opcodes.c:1.70
Rev: src/pike_types.c:1.111
26:
#include "bignum.h" #include "operators.h"
-
RCSID("$Id: opcodes.c,v 1.
69
1999/12/
10
22:
41
:
09
grubba Exp $");
+
RCSID("$Id: opcodes.c,v 1.
70
1999/12/
22
00
:
35
:
33
grubba Exp $");
void index_no_free(struct svalue *to,struct svalue *what,struct svalue *ind) {
692:
error("Error in sscanf format string.\n"); \ \ CHAROPT( \
-
if(last < sizeof(set->c))
\
+
if(last <
(unsigned long)
sizeof(set->c)) \
{ \
-
if(match[cnt] < sizeof(set->c))
\
+
if(match[cnt] <
(unsigned long)
sizeof(set->c)) \
{ \ ) \ for(e=last;e<=match[cnt];e++) set->c[e]=1; \ CHAROPT( \ }else{ \
-
for(e=last;e<sizeof(set->c);e++) set->c[e]=1; \
+
for(e=last;e<
(unsigned long)
sizeof(set->c);e++)
\
+
set->c[e]=1;
\
\ check_stack(2); \ push_int(256); \
716:
continue; \ } \ last=match[cnt]; \
-
if(last < sizeof(set->c))
\
+
if(last <
(unsigned long)
sizeof(set->c)) \
set->c[last]=1; \ CHAROPT( \ else{ \
-
if(set_size && sp[-1].u.integer == last-1)
\
+
if(set_size &&
\
+
((unsigned long)
sp[-1].u.integer
)
== last-1) \
{ \ sp[-1].u.integer++; \ }else{ \
739:
INT32 *order; \ set->a=aggregate_array(set_size*2); \ order=get_switch_order(set->a); \
-
for(e=0;e<set->a->size;e+=2)
\
+
for(e=0;e<
(unsigned long)
set->a->size;e+=2) \
{ \ if(order[e]+1 != order[e+1]) \ { \