From: Nicholas Clark <nick@ccl4.org>
Date: Mon, 26 Dec 2005 17:01:35 +0000 (+0000)
Subject: Add a couple of newlines for tidier regen output, consistent with the
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=599bf9a6a2d7541099ceb30e7475b9b3d98f6aa2;p=p5sagit%2Fp5-mst-13.2.git

Add a couple of newlines for tidier regen output, consistent with the
code generated by WriteConstants()

p4raw-id: //depot/perl@26491
---

diff --git a/lib/ExtUtils/Constant/XS.pm b/lib/ExtUtils/Constant/XS.pm
index 51244f6..c98583a 100644
--- a/lib/ExtUtils/Constant/XS.pm
+++ b/lib/ExtUtils/Constant/XS.pm
@@ -10,7 +10,7 @@ require ExtUtils::Constant::Base;
 @ISA = qw(ExtUtils::Constant::Base Exporter);
 @EXPORT_OK = qw(%XS_Constant %XS_TypeSet);
 
-$VERSION = '0.01';
+$VERSION = '0.02';
 
 $is_perl56 = ($] < 5.007 && $] > 5.005_50);
 
@@ -221,7 +221,7 @@ EOT
 				@items);
   $result .= <<'EOT';
 
-print constant_types(); # macro defs
+print constant_types(), "\n"; # macro defs
 EOT
   $package = perl_stringify($package);
   $result .=
@@ -239,7 +239,7 @@ EOT
   $result .= ", $breakout" . ', @names) ) {
     print $_, "\n"; # C constant subs
 }
-print "#### XS Section:\n";
+print "\n#### XS Section:\n";
 print XS_constant ("' . $package . '", $types);
 __END__
    */