This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Update Devel-PPPort to CPAN version 3.21
[perl5.git] / cpan / Devel-PPPort / parts / inc / HvNAME
index 4d7882c..9b8602b 100644 (file)
@@ -1,12 +1,6 @@
 ################################################################################
 ##
-##  $Revision: 2 $
-##  $Author: mhx $
-##  $Date: 2010/03/07 13:15:44 +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.
 ##
@@ -29,11 +23,11 @@ __UNDEFINED__ HvNAMELEN_get(hv) (HvNAME_get(hv) ? (I32)strlen(HvNAME_get(hv)) :
 
 char*
 HvNAME_get(hv)
-       HV *hv
+        HV *hv
 
 int
 HvNAMELEN_get(hv)
-       HV *hv
+        HV *hv
 
 =tests plan => 4
 
@@ -42,4 +36,3 @@ ok(Devel::PPPort::HvNAME_get({}), undef);
 
 ok(Devel::PPPort::HvNAMELEN_get(\%Devel::PPPort::), length('Devel::PPPort'));
 ok(Devel::PPPort::HvNAMELEN_get({}), 0);
-