| … | |
… | |
| 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 | |
