develooper Front page | perl.cvs.parrot | Postings from January 2009

[svn:parrot] r34747 - branches/pdd30install_stage3/tools/build

From:
rurban
Date:
January 1, 2009 08:50
Subject:
[svn:parrot] r34747 - branches/pdd30install_stage3/tools/build
Message ID:
20090101165043.7C3FFCB9FA@x12.develooper.com
Author: rurban
Date: Thu Jan  1 08:50:42 2009
New Revision: 34747

Modified:
   branches/pdd30install_stage3/tools/build/headerizer.pl

Log:
[cage] revert previous r34746. No need to track headerized files

Modified: branches/pdd30install_stage3/tools/build/headerizer.pl
==============================================================================
--- branches/pdd30install_stage3/tools/build/headerizer.pl	(original)
+++ branches/pdd30install_stage3/tools/build/headerizer.pl	Thu Jan  1 08:50:42 2009
@@ -65,9 +65,6 @@
 use Getopt::Long;
 use lib qw( lib );
 use Parrot::Config;
-use Parrot::BuildUtil;
-use File::Spec;
-use File::Basename;
 
 my %warnings;
 my %opt;
@@ -180,7 +177,6 @@
     open( my $fhout, '>', $cfile_name ) or die "Can't create $cfile_name: $!";
     print {$fhout} $text;
     close $fhout;
-    add_to_generated($cfile_name,'[main]','headerizer');
 
     return @func_declarations;
 }
@@ -510,7 +506,6 @@
             }
 
             write_file( $hfile, $header );
-            add_to_generated($hfile, '[main]', 'include-headerizer');
         }
 
         # Update all the .c files in place
@@ -522,7 +517,6 @@
             $source = replace_headerized_declarations( $source, 'static', $cfile, @funcs );
 
             write_file( $cfile, $source );
-            add_to_generated($cfile, '[main]', 'c-headerizer');
         }
         print "Headerization complete.\n";
     }



nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About