… | |
… | |
285 | && SvTYPE(sv) != SVt_PVMG)) /* mstore */ |
285 | && SvTYPE(sv) != SVt_PVMG)) /* mstore */ |
286 | { |
286 | { |
287 | int deref = !SvROK (sv); |
287 | int deref = !SvROK (sv); |
288 | |
288 | |
289 | if (!storable_mstore) |
289 | if (!storable_mstore) |
|
|
290 | { |
|
|
291 | PUTBACK; |
290 | need_storable (); |
292 | need_storable (); |
|
|
293 | SPAGAIN; |
|
|
294 | } |
291 | |
295 | |
292 | if (deref) |
296 | if (deref) |
293 | sv = newRV_noinc (sv); |
297 | sv = newRV_noinc (sv); |
294 | |
298 | |
295 | PUSHMARK (SP); |
299 | PUSHMARK (SP); |
… | |
… | |
363 | croak ("Compress::LZF::sthaw(): invalid data, maybe you need a newer version of Compress::LZF?"); |
367 | croak ("Compress::LZF::sthaw(): invalid data, maybe you need a newer version of Compress::LZF?"); |
364 | |
368 | |
365 | sv_chop (sv, SvPVX (sv) + 2); |
369 | sv_chop (sv, SvPVX (sv) + 2); |
366 | |
370 | |
367 | if (!storable_mstore) |
371 | if (!storable_mstore) |
|
|
372 | { |
|
|
373 | PUTBACK; |
368 | need_storable (); |
374 | need_storable (); |
|
|
375 | SPAGAIN; |
|
|
376 | } |
369 | |
377 | |
370 | PUSHMARK (SP); |
378 | PUSHMARK (SP); |
371 | XPUSHs (sv); |
379 | XPUSHs (sv); |
372 | PUTBACK; |
380 | PUTBACK; |
373 | |
381 | |
… | |
… | |
407 | goto redo; |
415 | goto redo; |
408 | |
416 | |
409 | case MAGIC_R: |
417 | case MAGIC_R: |
410 | handle_MAGIC_R: |
418 | handle_MAGIC_R: |
411 | if (!storable_mstore) |
419 | if (!storable_mstore) |
|
|
420 | { |
|
|
421 | PUTBACK; |
412 | need_storable (); |
422 | need_storable (); |
|
|
423 | SPAGAIN; |
|
|
424 | } |
413 | |
425 | |
414 | PUSHMARK (SP); |
426 | PUSHMARK (SP); |
415 | XPUSHs (sv); |
427 | XPUSHs (sv); |
416 | PUTBACK; |
428 | PUTBACK; |
417 | |
429 | |