From cd862409cc6028bac9fd5825cfdc0386804091de Mon Sep 17 00:00:00 2001
From: gfx <gfuji@cpan.org>
Date: Wed, 15 Sep 2010 14:25:50 +0900
Subject: [PATCH] Clean up

---
 perl/xs-src/unpack.c | 4 +---
 1 file changed, 1 insertion(+), 3 deletions(-)

diff --git a/perl/xs-src/unpack.c b/perl/xs-src/unpack.c
index 2b6eafe2..2d659b4b 100644
--- a/perl/xs-src/unpack.c
+++ b/perl/xs-src/unpack.c
@@ -382,9 +382,7 @@ XS(xs_unpacker_reset) {
 	UNPACKER(ST(0), mp);
     {
         SV * data = template_data(mp);
-        if (data) {
-            SvREFCNT_dec(data);
-        }
+        SvREFCNT_dec(data);
     }
     _reset(ST(0));