[ViewVC] Diff of: cvs/Compress-LZF/LZF.xs

Comparing Compress-LZF/LZF.xs (file contents):
Revision 1.14 by root, Thu Sep 5 04:44:55 2002 UTC vs.
Revision 1.15 by root, Thu Sep 5 22:00:54 2002 UTC

           XPUSHs (sv_2mortal (newSVpvn ("\02", 1))); /* 02 == MAGIC_undef */
         else if (SvROK (sv)
               || (SvTYPE(sv) != SVt_IV
                  && SvTYPE(sv) != SVt_NV
                  && SvTYPE(sv) != SVt_PV
+                 && SvTYPE(sv) != SVt_PVIV
+                 && SvTYPE(sv) != SVt_PVNV
                  && SvTYPE(sv) != SVt_PVMG)) /* mstore */
           {
             int deref = !SvROK (sv);
             if (!storable_mstore)
           }
         else if (SvPOKp (sv) && IN_RANGE (SvPVX (sv)[0], MAGIC_LO, MAGIC_HI))
           XPUSHs (sv_2mortal (compress_sv (sv, MAGIC_C, MAGIC_U))); /* need to prefix only */
         else if (ix == 2) /* compress always */
           XPUSHs (sv_2mortal (compress_sv (sv, MAGIC_C, -1)));
+        else if (SvNIOK (sv)) /* don't compress */
+          {
+            STRLEN len;
+            char *s = SvPV (sv, len);
+            XPUSHs (sv_2mortal (newSVpvn (s, len)));
+          }
         else /* don't compress */
-          XPUSHs (sv_2mortal (SvREFCNT_inc (sv)));
+          XPUSHs (sv_2mortal (newSVsv (sv)));
 void
 sthaw(sv)
 	SV *	sv
         PROTOTYPE: $

-–
+Removed lines
-+
+Added lines
-<
+Changed lines
->
+Changed lines