| … | |
… | |
| 1215 | } |
1215 | } |
| 1216 | else |
1216 | else |
| 1217 | { |
1217 | { |
| 1218 | /* read: check type and grow scalar as necessary */ |
1218 | /* read: check type and grow scalar as necessary */ |
| 1219 | SvUPGRADE (data, SVt_PV); |
1219 | SvUPGRADE (data, SVt_PV); |
|
|
1220 | if (SvLEN (data) >= SvCUR (data)) |
| 1220 | svptr = SvGROW (data, len + dataoffset + 1); |
1221 | svptr = SvGROW (data, len + dataoffset + 1); |
|
|
1222 | else if (SvCUR (data) < len + dataoffset) |
|
|
1223 | croak ("length + dataoffset outside of scalar, and cannot grow"); |
| 1221 | } |
1224 | } |
| 1222 | |
1225 | |
| 1223 | { |
1226 | { |
| 1224 | dREQ; |
1227 | dREQ; |
| 1225 | |
1228 | |
