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 Sat, 02 Dec 2000 19:00:08 GMT
rbb         00/12/02 11:00:08

  Modified:    helpers  make_export.pl
  Log:
  Get make_exports.pl to recognize functions that return a const value
  
  Revision  Changes    Path
  1.5       +2 -2      apr/helpers/make_export.pl
  
  Index: make_export.pl
  ===================================================================
  RCS file: /home/cvs/apr/helpers/make_export.pl,v
  retrieving revision 1.4
  retrieving revision 1.5
  diff -u -r1.4 -r1.5
  --- make_export.pl	2000/12/01 07:01:28	1.4
  +++ make_export.pl	2000/12/02 19:00:07	1.5
  @@ -38,7 +38,7 @@
               $line .= "$macro\n";
               next;
           }
  -        elsif (/^(APR_DECLARE[^\(]*\()?[a-z_]+\)?\s+([A-Za-z0-9_]+)\(/) {
  +        elsif (/^(APR_DECLARE[^\(]*\()?(const\s)?[a-z_]+\)?\s+\*?([A-Za-z0-9_]+)\(/) {
               # We only want to increase this if we are in the middle of a 
               # #if ... #endif block.
               if ($found) {
  @@ -47,7 +47,7 @@
               for (my $i=0; $i < $count; $i++) {
                   $line .= "\t";
               }
  -            $line .= "$2\n";
  +            $line .= "$3\n";
               next;
           }
           elsif (/\#endif/) {
  
  
  

Mime
View raw message