| … | |
… | |
| 730 | count = call_sv ((SV *)GvCV (method), G_ARRAY); |
730 | count = call_sv ((SV *)GvCV (method), G_ARRAY); |
| 731 | SPAGAIN; |
731 | SPAGAIN; |
| 732 | |
732 | |
| 733 | // catch this surprisingly common error |
733 | // catch this surprisingly common error |
| 734 | if (SvROK (TOPs) && SvRV (TOPs) == sv) |
734 | if (SvROK (TOPs) && SvRV (TOPs) == sv) |
| 735 | croak ("%s::TO_JSON method returned same object as was passed instead of a new one", HvNAME (SvSTASH (sv))); |
735 | croak ("%s::FREEZE method returned same object as was passed instead of a new one", HvNAME (SvSTASH (sv))); |
| 736 | |
736 | |
| 737 | encode_ch (enc, '('); |
737 | encode_ch (enc, '('); |
| 738 | encode_ch (enc, '"'); |
738 | encode_ch (enc, '"'); |
| 739 | encode_str (enc, HvNAME (stash), HvNAMELEN (stash), HvNAMEUTF8 (stash)); |
739 | encode_str (enc, HvNAME (stash), HvNAMELEN (stash), HvNAMEUTF8 (stash)); |
| 740 | encode_ch (enc, '"'); |
740 | encode_ch (enc, '"'); |
