… | |
… | |
1448 | PUSHs (sv); |
1448 | PUSHs (sv); |
1449 | PUSHs (sv_2mortal (newSVuv (offset - SvPVX (cborstr)))); |
1449 | PUSHs (sv_2mortal (newSVuv (offset - SvPVX (cborstr)))); |
1450 | } |
1450 | } |
1451 | |
1451 | |
1452 | void incr_parse (CBOR *self, SV *cborstr) |
1452 | void incr_parse (CBOR *self, SV *cborstr) |
|
|
1453 | ALIAS: |
|
|
1454 | incr_parse_multiple = 1 |
1453 | PPCODE: |
1455 | PPCODE: |
1454 | { |
1456 | { |
1455 | if (SvUTF8 (cborstr)) |
1457 | if (SvUTF8 (cborstr)) |
1456 | sv_utf8_downgrade (cborstr, 0); |
1458 | sv_utf8_downgrade (cborstr, 0); |
1457 | |
1459 | |
… | |
… | |
1487 | av_push (self->incr_count, newSViv (1)); |
1489 | av_push (self->incr_count, newSViv (1)); |
1488 | |
1490 | |
1489 | self->incr_pos = 0; |
1491 | self->incr_pos = 0; |
1490 | self->incr_need = self->incr_pos + 1; |
1492 | self->incr_need = self->incr_pos + 1; |
1491 | } |
1493 | } |
1492 | while (GIMME_V == G_ARRAY); |
1494 | while (ix); |
1493 | } |
1495 | } |
1494 | |
1496 | |
1495 | void incr_reset (CBOR *self) |
1497 | void incr_reset (CBOR *self) |
1496 | CODE: |
1498 | CODE: |
1497 | { |
1499 | { |