Branch: Tag:

1997-11-26

1997-11-26 15:41:35 by Mirar (Pontus Hagland) <pike@sort.mirar.org>

compability bug fixed in gif_add

Rev: src/modules/Image/togif.c:1.28

2:      togif    - $Id: togif.c,v 1.27 1997/11/11 22:17:52 mirar Exp $ + $Id: togif.c,v 1.28 1997/11/26 15:41:35 mirar Exp $      old GIF API compat stuff   
11:   /*   **! module Image   **! note - **! $Id: togif.c,v 1.27 1997/11/11 22:17:52 mirar Exp $ + **! $Id: togif.c,v 1.28 1997/11/26 15:41:35 mirar Exp $   **! class image   */   
143:    int delay=0;    struct object *ncto=NULL;    +  struct svalue *msp=sp; +     if (args==0) x=y=0;    else if (args<2    || sp[-args].type!=T_INT
158:    {    struct svalue *sv=sp+2-args;    push_svalue(sv); -  ncto=clone_object(image_colortable_program,2); +  ncto=clone_object(image_colortable_program,1);    }    else if (args>3 && sp[2-args].type==T_INT)    {