summaryrefslogtreecommitdiff
path: root/regcomp.c
diff options
context:
space:
mode:
authorHugo van der Sanden <hv@crypt.org>2002-04-03 04:34:34 +0100
committerJarkko Hietaniemi <jhi@iki.fi>2002-04-03 15:01:51 +0000
commit9051bda5fd91fe892f07739193136fd0977aa074 (patch)
treefc03f937c52c91469384761494936e43c83f88f8 /regcomp.c
parent74d0c54f3328524c981198a2cf62d5ec89089dc8 (diff)
downloadperl-9051bda5fd91fe892f07739193136fd0977aa074.tar.gz
Re: [ID 20020311.008] "foo bar" =~ /^(\w+)\s+(.+)(\s+)?$(\s)/ core dumps
Message-Id: <200204030234.g332YYP15141@crypt.compulink.co.uk> p4raw-id: //depot/perl@15708
Diffstat (limited to 'regcomp.c')
-rw-r--r--regcomp.c2
1 files changed, 2 insertions, 0 deletions
diff --git a/regcomp.c b/regcomp.c
index 43c46bb2bb..6726ba104c 100644
--- a/regcomp.c
+++ b/regcomp.c
@@ -505,6 +505,8 @@ S_scan_commit(pTHX_ RExC_state_t *pRExC_state, scan_data_t *data)
data->offset_float_max = (l
? data->last_start_max
: data->pos_min + data->pos_delta);
+ if ((U32)data->offset_float_max > (U32)I32_MAX)
+ data->offset_float_max = I32_MAX;
if (data->flags & SF_BEFORE_EOL)
data->flags
|= ((data->flags & SF_BEFORE_EOL) << SF_FL_SHIFT_EOL);