]> git.vpit.fr Git - perl/modules/indirect.git/commitdiff
Get rid of an unused variable
authorVincent Pit <vince@profvince.com>
Sun, 21 Sep 2008 22:44:58 +0000 (00:44 +0200)
committerVincent Pit <vince@profvince.com>
Sun, 21 Sep 2008 22:44:58 +0000 (00:44 +0200)
indirect.xs

index e8250f14934373f601fb0c2069fa03b16f0e4968..1f1ab9a69b3c9642dc37da47da2a615e1a147af1 100644 (file)
@@ -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];
 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);
 }
 
  hv_delete(indirect_map, buf, OP2STR(o), G_DISCARD);
 }