ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/Compress-LZF/LZF.xs
(Generate patch)

Comparing Compress-LZF/LZF.xs (file contents):
Revision 1.5 by root, Thu Sep 27 20:08:05 2001 UTC vs.
Revision 1.7 by root, Fri Feb 22 00:15:52 2002 UTC

265sthaw(sv) 265sthaw(sv)
266 SV * sv 266 SV * sv
267 PROTOTYPE: $ 267 PROTOTYPE: $
268 PPCODE: 268 PPCODE:
269 269
270 if (!SvPOK (sv)) 270 SvGETMAGIC (sv);
271 croak ("Compress::LZF::sthaw(): argument must be a string");
272
273 if (IN_RANGE (SvPV_nolen (sv)[0], MAGIC_LO, MAGIC_HI)) 271 if (SvPOK (sv) && IN_RANGE (SvPV_nolen (sv)[0], MAGIC_LO, MAGIC_HI))
274 { 272 {
275 switch (SvPVX (sv)[0]) 273 switch (SvPVX (sv)[0])
276 { 274 {
277 case MAGIC_undef: 275 case MAGIC_undef:
278 XPUSHs (sv_2mortal (NEWSV (0, 0))); 276 XPUSHs (sv_2mortal (NEWSV (0, 0)));

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines