diff options
author | Jarkko Hietaniemi <jhi@iki.fi> | 2014-06-29 08:47:17 -0400 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 2014-06-30 07:46:07 -0400 |
commit | d20a21f4234bfabf05d35fc8fec2109e08b35993 (patch) | |
tree | 32eec5d647dadd556a1894b6e65977a3d8a646d8 /regexec.c | |
parent | e78bc664fe3216189f18efd14d7903cdc918b90d (diff) | |
download | perl-d20a21f4234bfabf05d35fc8fec2109e08b35993.tar.gz |
Assert before deref due to possible NULL.
Coverity perl5 CID 68587.
Diffstat (limited to 'regexec.c')
-rw-r--r-- | regexec.c | 1 |
1 files changed, 1 insertions, 0 deletions
@@ -6188,6 +6188,7 @@ NULL /* calculate c1 and c2 for possible match of 1st char * following curly */ ST.c1 = ST.c2 = CHRTEST_VOID; + assert(ST.B); if (HAS_TEXT(ST.B) || JUMPABLE(ST.B)) { regnode *text_node = ST.B; if (! HAS_TEXT(text_node)) |