pike.git/ src/ array.c

2000-08-15

2000-08-15 16:19:12 by Henrik Grubbström (Grubba) <grubba@grubba.org>

• e0755c3e8ee7507bc4819bf05b3120c40c033b48 (14 lines) (+8/-6) ^{[ Show | Annotate ]}
  Branch: 7.9

Fixed a few warnings.

Rev: src/array.c:1.83
Rev: src/backend.c:1.54
Rev: src/docode.c:1.78
Rev: src/encode.c:1.66
Rev: src/error.c:1.60
Rev: src/error.h:1.48
Rev: src/errors.h:1.12
Rev: src/fsort.c:1.14
Rev: src/hashtable.c:1.7
Rev: src/main.c:1.96
Rev: src/pike_memory.h:1.21
Rev: src/pike_types.c:1.133
Rev: src/pike_types.h:1.43

23:   #include "stuff.h"   #include "bignum.h"    - RCSID("$Id: array.c,v 1.82 2000/08/15 11:17:07 grubba Exp $"); + RCSID("$Id: array.c,v 1.83 2000/08/15 16:19:12 grubba Exp $");      PMOD_EXPORT struct array empty_array=   {
704:    return 0;       case T_STRING: -  return my_quick_strcmp(a->u.string, b->u.string); +  return DO_NOT_WARN((int)my_quick_strcmp(a->u.string, b->u.string));       default:    return set_svalue_cmpfun(a,b);
728:    return 0;       case T_STRING: -  return my_strcmp(a->u.string, b->u.string); +  return DO_NOT_WARN((int)my_strcmp(a->u.string, b->u.string));       case T_ARRAY:    if(a==b) return 0;
1032:    if((opcode >> 8) & PIKE_ARRAY_OP_A) while(ap<a->size) *(ptr++)=ap++;    if(opcode & PIKE_ARRAY_OP_B) while(bp<b->size) *(ptr++)=~(bp++);    -  *ret=(ptr-ret-1); +  *ret = DO_NOT_WARN((INT32)(ptr-ret-1));       return ret;   }
1708:   {    INT32 e;    struct array *ret; -  INT32 argp; +  ptrdiff_t argp;       argp=Pike_sp-args - Pike_interpreter.evaluator_stack;   
1716:    check_array_for_destruct(a);    for(e=0;e<a->size;e++)    { -  assign_svalues_no_free(Pike_sp,Pike_interpreter.evaluator_stack+argp,args,BIT_MIXED); +  assign_svalues_no_free(Pike_sp, Pike_interpreter.evaluator_stack + argp, +  args, BIT_MIXED);    Pike_sp+=args;    apply_svalue(ITEM(a)+e,args);    }