From: Ævar Arnfjörð Bjarmason Date: Tue, 19 Aug 2008 13:48:12 +0000 (+0000) Subject: remove unused variables per -Wall X-Git-Tag: v0.06~2 X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2Fre-engine-Plugin.git;a=commitdiff_plain;h=68e1c1d355f045fd7959393307144aa9a894bbd3 remove unused variables per -Wall --- diff --git a/Plugin.xs b/Plugin.xs index cc839c7..8486171 100644 --- 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);