… | … | ||
---|---|---|---|
694 | /* read: check type and grow scalar as necessary */ | 694 | /* read: check type and grow scalar as necessary */ |
695 | SvUPGRADE (data, SVt_PV); | 695 | SvUPGRADE (data, SVt_PV); |
696 | svptr = SvGROW (data, len + dataoffset + 1); | 696 | svptr = SvGROW (data, len + dataoffset + 1); |
697 | } | 697 | } |
698 | 698 | ||
699 | if (len < 0) | ||
700 | croak ("length must not be negative"); | ||
701 | |||
702 | { | 699 | { |
703 | dREQ; | 700 | dREQ; |
704 | 701 | ||
705 | req->type = ix; | 702 | req->type = ix; |
706 | req->sv1 = newSVsv (fh); | 703 | req->sv1 = newSVsv (fh); |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |