pike.git/ src/ opcodes.c

Branch: Tag:

1999-12-22

1999-12-22 00:35:33 by Henrik Grubbström (Grubba) <grubba@grubba.org>

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]) \    { \