(perl #131562) correct large line numbers copying eval lines on #line
authorTony Cook <tony@develop-help.com>
Wed, 23 Aug 2017 04:18:26 +0000 (14:18 +1000)
committerTony Cook <tony@develop-help.com>
Mon, 21 Jan 2019 03:40:02 +0000 (14:40 +1100)
commit515c395bcca24c55c85b5aeea239e5e836c36059
tree4d58824ea9c807b31626387cf7db936e3a2b8ecc
parent187a41620b03725e88921c72501b2e72a66ed313
(perl #131562) correct large line numbers copying eval lines on #line

Previously this used I32 for line numbers, which takes half the range
of line_t and folds it into negative numbers, leading to trying to store
the lines at negative indexes.

The while loop was also modified to stop storing if/when the line number
no longer fits into cop_line, or no longer fits into SSize_t (as a
positive number) since the index parameter to av_store() is a SSize_t.
toke.c