pike.git / src / array.c

version» Context lines:

pike.git/src/array.c:16:   #include "pike_types.h"   #include "fsort.h"   #include "builtin_functions.h"   #include "pike_memory.h"   #include "gc.h"   #include "main.h"   #include "security.h"   #include "stuff.h"   #include "bignum.h"    - RCSID("$Id: array.c,v 1.81 2000/08/15 11:09:06 grubba Exp $"); + RCSID("$Id: array.c,v 1.82 2000/08/15 11:17:07 grubba Exp $");      PMOD_EXPORT struct array empty_array=   {    1, /* Never free */   #ifdef PIKE_SECURITY    0,   #endif    &empty_array, /* Next */    &empty_array, /* previous (circular) */    0, /* Size = 0 */
pike.git/src/array.c:480:    v->type_field=t;    }    }    return -1;   }      /*    * Slice a pice of an array (nondestructively)    * return an array consisting of v[start..end-1]    */ - PMOD_EXPORT struct array *slice_array(struct array *v,INT32 start,INT32 end) + PMOD_EXPORT struct array *slice_array(struct array *v, ptrdiff_t start, +  ptrdiff_t end)   {    struct array *a;      #ifdef PIKE_DEBUG    if(start > end || end>v->size || start<0)    fatal("Illegal arguments to slice_array()\n");       if(d_flag > 1) array_check_type_field(v);   #endif   
pike.git/src/array.c:509:       assign_svalues_no_free(ITEM(a), ITEM(v)+start, end-start, v->type_field);       return a;   }      /*    * Slice a pice of an array (nondestructively)    * return an array consisting of v[start..end-1]    */ - PMOD_EXPORT struct array *friendly_slice_array(struct array *v,INT32 start,INT32 end) + PMOD_EXPORT struct array *friendly_slice_array(struct array *v, +  ptrdiff_t start, +  ptrdiff_t end)   {    struct array *a;      #ifdef PIKE_DEBUG    if(start > end || end>v->size || start<0)    fatal("Illegal arguments to slice_array()\n");       if(d_flag > 1) array_check_type_field(v);   #endif