xsubpp fix to allow #ifdef's around entire XSubs

This rather trivial patch fixes a feature broken in 5.004_02's
xsubpp.  Namely, #line directives are interfering with the ability to
put #ifdef around entire XSubs.

(Well I'm glad I caught my own bug. ;-)  Hope it didn't break too many
of the CPAN modules!!)

p5p-msgid: 199709070034.AAA16457@remote119

diff --git a/lib/ExtUtils/xsubpp b/lib/ExtUtils/xsubpp
index ac1378d..04de166 100755 (executable)
--- a/lib/ExtUtils/xsubpp
+++ b/lib/ExtUtils/xsubpp
@@ -87,7 +87,7 @@ sub Q ;
 
 # Global Constants
 
-$XSUBPP_version = "1.9504";
+$XSUBPP_version = "1.9505";
 
 my ($Is_VMS, $SymSet);
 if ($^O eq 'VMS') {
@@ -294,7 +294,7 @@ sub print_section {
     do { $_ = shift(@line) } while !/\S/ && @line;
     
     print("#line ", $line_no[@line_no - @line -1], " \"$filename\"\n")
-       if $WantLineNumbers && !/^\s*#\s*line\b/;
+       if $WantLineNumbers && !/^\s*#\s*line\b/ && !/^#if XSubPPtmp/;
     for (;  defined($_) && !/^$BLOCK_re/o;  $_ = shift(@line)) {
        print "$_\n";
     }