apr-commits mailing list archives

Site index · List index
Message view « Date » · « Thread »
Top « Date » · « Thread »
From r..@locus.apache.org
Subject cvs commit: apr/helpers make_export.pl
Date Fri, 01 Dec 2000 05:50:23 GMT
rbb         00/11/30 21:50:23

  Modified:    helpers  make_export.pl
  Log:
  Fix a couple of bugs with the script that generates the apr.exports file.
  This script is really not extensible as it is currently written, but at
  least it works for APR.
  
  Revision  Changes    Path
  1.2       +6 -6      apr/helpers/make_export.pl
  
  Index: make_export.pl
  ===================================================================
  RCS file: /home/cvs/apr/helpers/make_export.pl,v
  retrieving revision 1.1
  retrieving revision 1.2
  diff -u -r1.1 -r1.2
  --- make_export.pl	2000/11/30 23:46:32	1.1
  +++ make_export.pl	2000/12/01 05:50:22	1.2
  @@ -31,10 +31,10 @@
       
           s/^\s*//;
           
  -        if (/\#if (APR_HAS.*)/) {
  +        if (/\#if(def)? (APR_.*)/) {
               $count++;
               $found++;
  -            $macro = $1;
  +            $macro = $2;
               $line = "$macro\n";
               next;
           }
  @@ -53,14 +53,14 @@
           elsif (/\#endif/) {
               if ($count > 0) {
                   $count--;
  -                $line .= "\\$macro\n";
  +                $line .= "\/$macro\n";
               }
  -            if ($found == 1) {
  -                $found = 0;
  +            if ($found == $count + 1) {
  +                $found--;
                   $line = "";
                   next;
               }
  -            elsif ($found > 1) {
  +            elsif ($found > $count + 1) {
                   $found = 0;
               }
           }
  
  
  

Mime
View raw message