diff options
| author | Andy Lester <andy@petdance.com> | 2005-07-28 09:09:56 -0500 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2005-07-29 08:31:51 +0000 |
| commit | 2d03de9c8d99c75ed163fdcdde85a243a29ccc8c (patch) | |
| tree | 78d3e20180d05bcabfa8b3f28e74aa3a94e05edf /regexec.c | |
| parent | 7adf7a021c614ccf36e9216ce29d1eafb15992bf (diff) | |
| download | perl-2d03de9c8d99c75ed163fdcdde85a243a29ccc8c.tar.gz | |
More embed.fnc goodness
Message-ID: <20050728190956.GB607@petdance.com>
p4raw-id: //depot/perl@25243
Diffstat (limited to 'regexec.c')
| -rw-r--r-- | regexec.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -4660,7 +4660,7 @@ Perl_regclass_swash(pTHX_ register const regnode* node, bool doinit, SV** listsv if (PL_regdata->what[n] == 's') { SV * const rv = (SV*)PL_regdata->data[n]; AV * const av = (AV*)SvRV((SV*)rv); - SV **ary = AvARRAY(av); + SV **const ary = AvARRAY(av); SV **a, **b; /* See the end of regcomp.c:S_reglass() for |