Branch: Tag:

2004-09-18

2004-09-18 18:14:31 by Henrik Grubbström (Grubba) <grubba@grubba.org>

More LP64 fixes.

Rev: src/builtin_functions.c:1.566

2:   || 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.565 2004/09/17 15:02:44 nilsson Exp $ + || $Id: builtin_functions.c,v 1.566 2004/09/18 18:14:31 grubba Exp $   */      #include "global.h" - RCSID("$Id: builtin_functions.c,v 1.565 2004/09/17 15:02:44 nilsson Exp $"); + RCSID("$Id: builtin_functions.c,v 1.566 2004/09/18 18:14:31 grubba Exp $");   #include "interpret.h"   #include "svalue.h"   #include "pike_macros.h"
3081:    (array_fix_type_field(to) & ~BIT_STRING) )    Pike_error("replace: to array not array(string).\n");    -  if( from->size > (INT32)(ULONG_MAX/sizeof(struct tupel)) ) -  Pike_error("Array too large.\n"); +  if( from->size > (LONG_MAX/sizeof(struct tupel)) ) +  Pike_error("Array too large (size %ld exceeds %ld).\n", +  (long)from->size, (long)(LONG_MAX/sizeof(struct tupel)));    ctx.v=(struct tupel *)xalloc(sizeof(struct tupel)*from->size);    init_string_builder(&ctx.ret,str->size_shift);    SET_ONERROR (uwp, free_replace_many_context, &ctx);