From: Tim Bunce <Tim.Bunce@pobox.com>
Date: Wed, 26 Sep 2012 15:09:52 +0000 (+0900)
Subject: Use check_new in padlist_size.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=1869f459c419240cb7ba2a4447ab3383f5f4cfdd;p=p5sagit%2FDevel-Size.git

Use check_new in padlist_size.
---

diff --git a/Size.xs b/Size.xs
index 2c9dfba..d0876ca 100644
--- a/Size.xs
+++ b/Size.xs
@@ -977,9 +977,9 @@ padlist_size(pTHX_ struct state *const st, pPATH, PADLIST *padlist,
     SV **pname;
     I32 ix;              
 
-    if (!padlist) {
+    if(!check_new(st, padlist))
         return;
-    }
+
     pad_name = MUTABLE_AV(*av_fetch(MUTABLE_AV(padlist), 0, FALSE));
     pname = AvARRAY(pad_name);