]> git.vpit.fr Git - perl/modules/Variable-Magic.git/commitdiff
Simplify the current temp test in the unmortalizer
authorVincent Pit <vince@profvince.com>
Thu, 26 Mar 2009 22:21:15 +0000 (23:21 +0100)
committerVincent Pit <vince@profvince.com>
Thu, 26 Mar 2009 22:21:15 +0000 (23:21 +0100)
Magic.xs

index f9587ab60995c8bc1b322220671d55f27ac534bc..858c80fcb3c831bebe0d1f0c70b9241f7b45a771 100644 (file)
--- a/Magic.xs
+++ b/Magic.xs
@@ -1034,8 +1034,7 @@ STATIC int vmg_wizard_free(pTHX_ SV *wiz, MAGIC *mg) {
   const I32 myfloor = PL_tmps_floor;
   I32 i;
   for (i = PL_tmps_ix; i > myfloor; --i) {
-   SV * const sv = PL_tmps_stack[i];
-   if (sv && sv == wiz)
+   if (PL_tmps_stack[i] == wiz)
     PL_tmps_stack[i] = NULL;
   }
  }