pike.git / src / modules / Image / togif.c

version» Context lines:

pike.git/src/modules/Image/togif.c:1:   /*      togif    - $Id: togif.c,v 1.30 1998/01/16 22:09:14 grubba Exp $ + $Id: togif.c,v 1.31 1998/04/20 18:53:34 grubba Exp $      old GIF API compat stuff      */      /*   **! module Image   **! note - **! $Id: togif.c,v 1.30 1998/01/16 22:09:14 grubba Exp $ + **! $Id: togif.c,v 1.31 1998/04/20 18:53:34 grubba Exp $   **! class image   */      #include "global.h"      #include <math.h>   #include <ctype.h>      #include "stralloc.h"   #include "global.h"
pike.git/src/modules/Image/togif.c:100:   {    if (args)    {    struct object *o;    if (sp[-args].type==T_INT)    {    int i=sp[-args].u.integer;    pop_n_elems(args);    push_int(THIS->xsize);    push_int(THIS->ysize); -  THISOBJ->refs++; -  push_object(THISOBJ); +  ref_push_object(THISOBJ);    push_int(i);    o=clone_object(image_colortable_program,2);    }    else    {    o=clone_object(image_colortable_program,args);    }    push_int(THIS->xsize);    push_int(THIS->ysize);    push_object(o);
pike.git/src/modules/Image/togif.c:162:       if (args>2 && sp[2-args].type==T_ARRAY)    {    struct svalue *sv=sp+2-args;    push_svalue(sv);    ncto=clone_object(image_colortable_program,1);    }    else if (args>3 && sp[2-args].type==T_INT)    {    INT32 i=sp[2-args].u.integer; -  THISOBJ->refs++; -  push_object(THISOBJ); +  ref_push_object(THISOBJ);    push_int(i);    ncto=clone_object(image_colortable_program,2);    }       if (args>2+!!ncto)    {    if (sp[2+!!ncto-args].type==T_INT)    delay=sp[2+!!ncto-args].u.integer;    else if (sp[2+!!ncto-args].type==T_FLOAT)    delay=(unsigned short)(sp[2+!!ncto-args].u.float_number*100);    else    error("Illegal argument %d to image->gif_add()\n",3+!!ncto);    }       if (!ncto)    { -  THISOBJ->refs++; -  push_object(THISOBJ); +  ref_push_object(THISOBJ);    push_int(255);    ncto=clone_object(image_colortable_program,2);    }       if (fs) image_colortable_internal_floyd_steinberg(    (struct neo_colortable *)get_storage(ncto,image_colortable_program));       pop_n_elems(args);    -  THISOBJ->refs++; -  push_object(THISOBJ); +  ref_push_object(THISOBJ);    push_object(ncto);    push_int(x);    push_int(y);    push_int(lm);    push_int(delay);       if (transparent)    {    unsigned char trd;   
pike.git/src/modules/Image/togif.c:270:      extern void _image_gif_encode(INT32 args,int fs);      static void img_encode_gif(rgb_group *transparent,int fs,INT32 args)   {    struct object *co=NULL;    if (args)    {    if (sp[-args].type==T_OBJECT)    { -  (co=sp[-args].u.object)->refs++; +  add_ref(co=sp[-args].u.object);    pop_n_elems(args);    }    else if (sp[-args].type==T_ARRAY)    co=clone_object(image_colortable_program,args);    else if (sp[-args].type==T_INT)    {    unsigned long numcolors=sp[-args].u.integer;    pop_n_elems(args); -  push_object(THISOBJ); THISOBJ->refs++; +  ref_push_object(THISOBJ);    push_int(numcolors);    co=clone_object(image_colortable_program,2);    }    else    error("Illegal argument to img->togif()\n");    }    else    { -  push_object(THISOBJ); THISOBJ->refs++; +  ref_push_object(THISOBJ);    push_int(256);    co=clone_object(image_colortable_program,2);    } -  push_object(THISOBJ); THISOBJ->refs++; +  ref_push_object(THISOBJ);    push_object(co);    if (transparent)    {    push_int(transparent->r);    push_int(transparent->g);    push_int(transparent->b);    _image_gif_encode(5,fs);    }    else _image_gif_encode(2,fs);   }