]> git.vpit.fr Git - perl/modules/re-engine-Plugin.git/commitdiff
remove unused variables per -Wall
authorÆvar Arnfjörð Bjarmason <avar@cpan.org>
Tue, 19 Aug 2008 13:48:12 +0000 (13:48 +0000)
committerÆvar Arnfjörð Bjarmason <avar@cpan.org>
Tue, 19 Aug 2008 13:48:12 +0000 (13:48 +0000)
Plugin.xs

index cc839c73d04757161b4187e1c1c50ff960749464..8486171a3cd74f3558066b8aa89386400e356f58 100644 (file)
--- a/Plugin.xs
+++ b/Plugin.xs
@@ -44,13 +44,11 @@ Plugin_comp(pTHX_ const SV * const pattern, const U32 flags)
     dSP;
     REGEXP * rx;
     re__engine__Plugin re;
-    I32 count;
     I32 buffers;
 
     /* exp/xend version of the pattern & length */
     STRLEN plen;
     char*  exp = SvPV((SV*)pattern, plen);
-    char* xend = exp + plen;
 
     /* The REGEXP structure to return to perl */
     Newxz(rx, 1, REGEXP);
@@ -261,7 +259,6 @@ Plugin_numbered_buff_STORE(pTHX_ REGEXP * const rx, const I32 paren,
                            SV const * const value)
 {
     dSP;
-    I32 items;
     SV * callback;
     GET_SELF_FROM_PPRIVATE(rx->pprivate);
 
@@ -290,7 +287,6 @@ Plugin_numbered_buff_LENGTH(pTHX_ REGEXP * const rx, const SV * const sv,
                               const I32 paren)
 {
     dSP;
-    I32 items;
     SV * callback;
     GET_SELF_FROM_PPRIVATE(rx->pprivate);