perl-modperl-cvs mailing list archives

Site index · List index
Message view « Date » · « Thread »
Top « Date » · « Thread »
From do...@locus.apache.org
Subject cvs commit: modperl-2.0 Makefile.PL
Date Sun, 16 Apr 2000 00:28:39 GMT
dougm       00/04/15 17:28:39

  Modified:    .        Makefile.PL
  Log:
  -E option to use cpp
  
  Revision  Changes    Path
  1.6       +8 -4      modperl-2.0/Makefile.PL
  
  Index: Makefile.PL
  ===================================================================
  RCS file: /home/cvs/modperl-2.0/Makefile.PL,v
  retrieving revision 1.5
  retrieving revision 1.6
  diff -u -r1.5 -r1.6
  --- Makefile.PL	2000/04/15 19:04:20	1.5
  +++ Makefile.PL	2000/04/16 00:28:39	1.6
  @@ -20,9 +20,9 @@
   {
       use Getopt::Std;
       my %opts;
  -    getopts('cm:', \%opts);
  +    getopts('Ecm:', \%opts);
       configure()    if $opts{c};
  -    make($opts{m}) if $opts{m};
  +    make(\%opts) if $opts{m};
   }
   
   sub configure {
  @@ -54,7 +54,8 @@
   }
   
   sub make {
  -    my $target = shift;
  +    my $opts = shift;
  +    my $target = $opts->{m};
       return clean() if $target eq 'c';
       my $single_file = $target =~ /\.c$/ ? $target : "";
   
  @@ -64,8 +65,11 @@
   
       chdir $code->path;
   
  +    my $flags = "-g -Wall";
  +    $flags .= " -E" if $opts->{E};
  +
       for ($single_file ? $single_file : $code->c_files) {
  -        echo_cmd "$cc -g -Wall $ccopts @inc -c $_";
  +        echo_cmd "$cc $flags $ccopts @inc -c $_";
           return if $single_file;
       }
   
  
  
  

Mime
View raw message