diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2006-04-13 18:52:15 +0300 |
|---|---|---|
| committer | Nicholas Clark <nick@ccl4.org> | 2006-04-13 13:53:55 +0000 |
| commit | ae5031b371f095348493551a625aee038f332011 (patch) | |
| tree | 2e01e573498ae8d322f62aecd02bad8ff7685c94 /regexec.c | |
| parent | 2757e526e6581a1ca50cec2e6e969471038f97d2 (diff) | |
| download | perl-ae5031b371f095348493551a625aee038f332011.tar.gz | |
regexec.c: (Coverity) add NULL check
Message-Id: <200604131252.k3DCqFUL497781@kosh.hut.fi>
Date: Thu, 13 Apr 2006 15:52:15 +0300 (EEST)
p4raw-id: //depot/perl@27789
Diffstat (limited to 'regexec.c')
| -rw-r--r-- | regexec.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -3780,7 +3780,7 @@ S_regmatch(pTHX_ regexp *rex, regnode *prog) { I32 type; type = OP(scan); - if (OP(next) != type) /* No choice. */ + if (!next || OP(next) != type) /* No choice. */ next = inner; /* Avoid recursion. */ else { const I32 lastparen = *PL_reglastparen; |