summaryrefslogtreecommitdiff
path: root/regexec.c
diff options
context:
space:
mode:
authorNicholas Clark <nick@ccl4.org>2005-04-02 22:58:59 +0000
committerNicholas Clark <nick@ccl4.org>2005-04-02 22:58:59 +0000
commitab74612d134c4eb4fe656c2e902798be61efe3e0 (patch)
tree396faf34583214e018f8a239d5b7ed2ba760d046 /regexec.c
parentb809f04e6ef1fa3cd9abc5b53c75100bb603e794 (diff)
downloadperl-ab74612d134c4eb4fe656c2e902798be61efe3e0.tar.gz
Silence compiler warnings about possibly uninitialised variables.
(None are, but it saves anyone else having to work this out) p4raw-id: //depot/perl@24137
Diffstat (limited to 'regexec.c')
-rw-r--r--regexec.c12
1 files changed, 6 insertions, 6 deletions
diff --git a/regexec.c b/regexec.c
index 959159b0aa..cb52ff7f1e 100644
--- a/regexec.c
+++ b/regexec.c
@@ -2394,10 +2394,10 @@ S_regmatch(pTHX_ regnode *prog)
I32 unwind = 0;
/* used by the trie code */
- SV *sv_accept_buff; /* accepting states we have traversed */
- reg_trie_accepted *accept_buff; /* "" */
- reg_trie_data *trie; /* what trie are we using right now */
- U32 accepted = 0; /* how many accepting states we have seen*/
+ SV *sv_accept_buff = 0; /* accepting states we have traversed */
+ reg_trie_accepted *accept_buff = 0; /* "" */
+ reg_trie_data *trie; /* what trie are we using right now */
+ U32 accepted = 0; /* how many accepting states we have seen*/
#if 0
I32 firstcp = PL_savestack_ix;
@@ -2408,7 +2408,7 @@ S_regmatch(pTHX_ regnode *prog)
SV *dsv1 = PERL_DEBUG_PAD_ZERO(1);
SV *dsv2 = PERL_DEBUG_PAD_ZERO(2);
- SV *re_debug_flags;
+ SV *re_debug_flags = NULL;
#endif
GET_RE_DEBUG_FLAGS;
@@ -4581,7 +4581,7 @@ S_regrepeat(pTHX_ regnode *p, I32 max)
PL_reginput = scan;
DEBUG_r({
- SV *re_debug_flags;
+ SV *re_debug_flags = NULL;
SV *prop = sv_newmortal();
GET_RE_DEBUG_FLAGS;
DEBUG_EXECUTE_r({