… | |
… | |
1223 | UV idx = decode_uint (dec); |
1223 | UV idx = decode_uint (dec); |
1224 | |
1224 | |
1225 | if (!dec->shareable || idx >= (UV)(1 + AvFILLp (dec->shareable))) |
1225 | if (!dec->shareable || idx >= (UV)(1 + AvFILLp (dec->shareable))) |
1226 | ERR ("corrupted CBOR data (sharedref index out of bounds)"); |
1226 | ERR ("corrupted CBOR data (sharedref index out of bounds)"); |
1227 | |
1227 | |
1228 | sv = SvREFCNT_inc_NN (AvARRAY (dec->shareable)[idx]); |
1228 | sv = newRV_inc (AvARRAY (dec->shareable)[idx]); |
1229 | |
1229 | |
1230 | if (sv == &PL_sv_undef) |
1230 | if (sv == &PL_sv_undef) |
1231 | ERR ("cyclic CBOR data structure found, but allow_cycles is not enabled"); |
1231 | ERR ("cyclic CBOR data structure found, but allow_cycles is not enabled"); |
1232 | } |
1232 | } |
1233 | break; |
1233 | break; |