| … | |
… | |
| 364 | |
364 | |
| 365 | if (SvPVX (sv)[0] == MAGIC_R) |
365 | if (SvPVX (sv)[0] == MAGIC_R) |
| 366 | SvPVX (sv)[0] = MAGIC_R_deref; |
366 | SvPVX (sv)[0] = MAGIC_R_deref; |
| 367 | } |
367 | } |
| 368 | else |
368 | else |
| 369 | XPUSHs (POPs); /* this is a nop, hopefully */ |
369 | SETs (sv_2mortal (newSVsv (TOPs))); |
| 370 | |
370 | |
| 371 | break; |
371 | break; |
| 372 | |
372 | |
| 373 | default: |
373 | default: |
| 374 | croak ("Compress::LZF::sthaw(): invalid data, maybe you need a newer version of Compress::LZF?"); |
374 | croak ("Compress::LZF::sthaw(): invalid data, maybe you need a newer version of Compress::LZF?"); |
| 375 | } |
375 | } |
| 376 | } |
376 | } |
| 377 | else |
377 | else |
| 378 | XPUSHs (sv_2mortal (newSVsv (sv))); |
378 | XPUSHs (sv_2mortal (newSVsv (sv))); |
|
|
379 | |
