From 25cf9644e6dfb6b7cb9e767b3f52baa4b81a7df0 Mon Sep 17 00:00:00 2001 From: David Mitchell Date: Thu, 8 Sep 2016 08:55:45 +0100 Subject: Revert "tmp fix for Bleadperl breaks Variable-Magic" This reverts commit 8d168aaa014262c7f93944b76b84de99af3c5513. Variable-Magic 0.60 has been released, so this temp workaround is no longer required. --- av.c | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/av.c b/av.c index e3c6d5a37c..21828a9254 100644 --- a/av.c +++ b/av.c @@ -272,8 +272,7 @@ Perl_av_fetch(pTHX_ AV *av, SSize_t key, I32 lval) } neg = (key < 0); - /* XXX tmp restore old behaviour to make Variable::Magic pass */ - size = (neg ? AvFILL(av): AvFILLp(av)) + 1; + size = AvFILLp(av) + 1; key += neg * size; /* handle negative index without using branch */ /* the cast from SSize_t to Size_t allows both (key < 0) and (key >= size) -- cgit v1.2.1