]> git.imager.perl.org - imager.git/blobdiff - GIF/GIF.xs
add probe support for FLIF files
[imager.git] / GIF / GIF.xs
index 7641b8c3fcc28bf9f66bf0a96535b789515574cb..c547c554e2e8300a4a669bf178042e52ec495ec3 100644 (file)
@@ -65,10 +65,9 @@ i_writegif_wiol(ig, opts,...)
            ip_copy_colors_back(aTHX_ hv, &quant);
           }
        }
-       ST(0) = sv_newmortal();
-       if (RETVAL == 0) ST(0)=&PL_sv_undef;
-       else sv_setiv(ST(0), (IV)RETVAL);
        ip_cleanup_quant_opts(aTHX_ &quant);
+    OUTPUT:
+       RETVAL
 
 
 void