pike.git / src / builtin_functions.c

version» Context lines:

pike.git/src/builtin_functions.c:1:   /*   || This file is part of Pike. For copyright information see COPYRIGHT.   || Pike is distributed under GPL, LGPL and MPL. See the file COPYING   || for more information. - || $Id: builtin_functions.c,v 1.463 2003/01/16 16:10:11 mast Exp $ + || $Id: builtin_functions.c,v 1.464 2003/01/26 11:09:00 mirar Exp $   */      #include "global.h" - RCSID("$Id: builtin_functions.c,v 1.463 2003/01/16 16:10:11 mast Exp $"); + RCSID("$Id: builtin_functions.c,v 1.464 2003/01/26 11:09:00 mirar Exp $");   #include "interpret.h"   #include "svalue.h"   #include "pike_macros.h"   #include "object.h"   #include "program.h"   #include "array.h"   #include "pike_error.h"   #include "constants.h"   #include "mapping.h"   #include "stralloc.h"
pike.git/src/builtin_functions.c:4493:    }   #endif /* PIKE_DEBUG */    m = ITEM(arr)[i].u.mapping;    MAPPING_LOOP(m) {    if (k->ind.type != T_INT) {    Pike_error("interleave_array(): Index not an integer in mapping %d!\n", i);    }    if (low > k->ind.u.integer) {    low = k->ind.u.integer;    if (low < 0) { -  Pike_error("interleave_array(): Index %d in mapping %d is negative!\n", +  Pike_error("interleave_array(): Index %"PRINTPIKEINT"d in mapping %d is negative!\n",    low, i);    }    }    if (max < k->ind.u.integer) {    max = k->ind.u.integer;    }    nelems++;    }    /* FIXME: Is this needed? Isn't T_INT default? */    ITEM(min)[i].u.integer = low;