Update Devel-PPPort to CPAN version 3.21

[perl5.git] / cpan / Devel-PPPort / parts / inc / newRV

diff --git a/cpan/Devel-PPPort/parts/inc/newRV b/cpan/Devel-PPPort/parts/inc/newRV
index 3d0a2d2..6db6dfc 100644 (file)
--- a/cpan/Devel-PPPort/parts/inc/newRV
+++ b/cpan/Devel-PPPort/parts/inc/newRV
@@ -1,12 +1,6 @@
 ################################################################################
 ##
-##  $Revision: 10 $
-##  $Author: mhx $
-##  $Date: 2010/03/07 13:15:48 +0100 $
-##
-################################################################################
-##
-##  Version 3.x, Copyright (C) 2004-2010, Marcus Holland-Moritz.
+##  Version 3.x, Copyright (C) 2004-2013, Marcus Holland-Moritz.
 ##  Version 2.x, Copyright (C) 2001, Paul Marquess.
 ##  Version 1.x, Copyright (C) 1999, Kenneth Albanowski.
 ##
@@ -44,31 +38,30 @@ newRV_noinc(SV *sv)
 
 U32
 newRV_inc_REFCNT()
-       PREINIT:
-               SV *sv, *rv;
-       CODE:
-               sv = newSViv(42);
-               rv = newRV_inc(sv);
-               SvREFCNT_dec(sv);
-               RETVAL = SvREFCNT(sv);
-               sv_2mortal(rv);
-       OUTPUT:
-               RETVAL
+        PREINIT:
+                SV *sv, *rv;
+        CODE:
+                sv = newSViv(42);
+                rv = newRV_inc(sv);
+                SvREFCNT_dec(sv);
+                RETVAL = SvREFCNT(sv);
+                sv_2mortal(rv);
+        OUTPUT:
+                RETVAL
 
 U32
 newRV_noinc_REFCNT()
-       PREINIT:
-               SV *sv, *rv;
-       CODE:
-               sv = newSViv(42);
-               rv = newRV_noinc(sv);
-               RETVAL = SvREFCNT(sv);
-               sv_2mortal(rv);
-       OUTPUT:
-               RETVAL
+        PREINIT:
+                SV *sv, *rv;
+        CODE:
+                sv = newSViv(42);
+                rv = newRV_noinc(sv);
+                RETVAL = SvREFCNT(sv);
+                sv_2mortal(rv);
+        OUTPUT:
+                RETVAL
 
 =tests plan => 2
 
 ok(&Devel::PPPort::newRV_inc_REFCNT, 1);
 ok(&Devel::PPPort::newRV_noinc_REFCNT, 1);
-