… | |
… | |
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, '"'); |