]> git.vpit.fr Git - perl/modules/Scope-Upper.git/commitdiff
Get rid of a warning produced by -Wunused-value.
authorFlorian Ragwitz <rafl@debian.org>
Wed, 4 Feb 2009 22:04:23 +0000 (23:04 +0100)
committerFlorian Ragwitz <rafl@debian.org>
Wed, 4 Feb 2009 22:04:23 +0000 (23:04 +0100)
Upper.xs

index d628f1d3e47d0637c1ffbb058f4e79ada7c5bbd6..367658cdb7a8321fc2be70f85e9424f557cbecd4 100644 (file)
--- a/Upper.xs
+++ b/Upper.xs
@@ -247,7 +247,7 @@ STATIC void su_save_helem(pTHX_ HV *hv, SV *keysv, SV *val) {
  if (val) { /* local $x{$keysv} = $val; */
   SvSetMagicSV(*svp, val);
  } else {   /* local $x{$keysv}; delete $x{$keysv}; */
-  hv_delete_ent(hv, keysv, G_DISCARD, HeHASH(he));
+  (void)hv_delete_ent(hv, keysv, G_DISCARD, HeHASH(he));
  }
 }