diff options
author | Karl Williamson <khw@cpan.org> | 2018-02-19 12:14:06 -0700 |
---|---|---|
committer | Karl Williamson <khw@cpan.org> | 2018-02-19 20:47:10 -0700 |
commit | 3eb4defc9453e752f5aacd8d4934a502cc2d2138 (patch) | |
tree | fd9618938c7087122cdbeb4beff83d92ba5d6885 | |
parent | 70bd58e99cf8c4f66531ed2261be494f9fe83a00 (diff) | |
download | perl-3eb4defc9453e752f5aacd8d4934a502cc2d2138.tar.gz |
regcomp.c: Silence uninit compiler warning
This warning (only known on one compiler at the moment) is probably
wrong, but by setting this to NULL, we avoid the warning, and should
segfault if the warning were correct, instead of using uninitialized
data.
-rw-r--r-- | regcomp.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -10689,7 +10689,7 @@ S_reg(pTHX_ RExC_state_t *pRExC_state, I32 paren, I32 *flagp,U32 depth) * RExC_parse beyond the '('. Things like '(?' are indivisible tokens, and * this flag alerts us to the need to check for that */ { - regnode *ret; /* Will be the head of the group. */ + regnode *ret = NULL; /* Will be the head of the group. */ regnode *br; regnode *lastbr; regnode *ender = NULL; |