X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2Findirect.git;a=blobdiff_plain;f=indirect.xs;h=1f1ab9a69b3c9642dc37da47da2a615e1a147af1;hp=e8250f14934373f601fb0c2069fa03b16f0e4968;hb=07de00639dbad8bec6c83de81c3e92336ca85569;hpb=c21777a35a9cee9151b6b2f6dcf5e16e17751c48

diff --git a/indirect.xs b/indirect.xs
index e8250f1..1f1ab9a 100644
--- a/indirect.xs
+++ b/indirect.xs
@@ -87,7 +87,6 @@ STATIC const char *indirect_map_fetch(pTHX_ const OP *o, SV ** const name) {
 STATIC void indirect_map_delete(pTHX_ const OP *o) {
 #define indirect_map_delete(O) indirect_map_delete(aTHX_ (O))
  char buf[32];
- SV *val;
 
  hv_delete(indirect_map, buf, OP2STR(o), G_DISCARD);
 }