pike.git / src / modules / Image / encodings / xcf.c

version» Context lines:

pike.git/src/modules/Image/encodings/xcf.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: xcf.c,v 1.48 2004/03/06 00:07:00 nilsson Exp $ + || $Id: xcf.c,v 1.49 2005/05/18 12:36:54 mast Exp $   */      #include "global.h" - RCSID("$Id: xcf.c,v 1.48 2004/03/06 00:07:00 nilsson Exp $"); + RCSID("$Id: xcf.c,v 1.49 2005/05/18 12:36:54 mast Exp $");      #include "image_machine.h"      #include "pike_macros.h"   #include "object.h"   #include "module_support.h"   #include "interpret.h"   #include "object.h"   #include "svalue.h"   #include "threads.h"
pike.git/src/modules/Image/encodings/xcf.c:78:   }      static void f_substring_index( INT32 args )   {    ptrdiff_t i = sp[-1].u.integer;    struct substring *s = SS(fp->current_object);    pop_n_elems( args );       if( i < 0 ) i = s->len + i;    if( i >= s->len ) { -  Pike_error("Index out of bounds, %d > %ld\n", i, -  DO_NOT_WARN((long)s->len-1) ); +  Pike_error("Index out of bounds, %"PRINTPTRDIFFT"d > %"PRINTPTRDIFFT"d\n", +  i, s->len-1);    }    push_int( ((unsigned char *)s->s->str)[s->offset+i] );   }      static void f_substring__sprintf( INT32 args )   {    int x;    struct substring *s = SS(fp->current_object);       if (args != 2 )