Changeset 4594d83


Ignore:
Timestamp:
Apr 20, 2003, 12:30:01 PM (20 years ago)
Author:
James M. Kretchmar <kretch@mit.edu>
Branches:
master, barnowl_perlaim, debian, owl, release-1.10, release-1.4, release-1.5, release-1.6, release-1.7, release-1.8, release-1.9
Children:
aaf6071
Parents:
69894d2
Message:
Another change to codelist.pl, this time to avoid getting perl XS things
  in accidentally.
File:
1 edited

Legend:

Unmodified
Added
Removed

  • codelist.pl

    r69894d2 r4594d83  
    1919            && !/^static/
    2020            && !/^system/
    21             && !/\/\*/)
    22         {s/\s+\{/\;/; s/\)[ \t]*$/\)\;/; print "extern "; print;}
     21            && !/^XS/
     22            && !/\/\*/) {
     23            s/\s+\{/\;/;
     24            s/\)[ \t]*$/\)\;/;
     25            print "extern ";
     26            print;
     27        }
    2328           
    2429    }
    … …  
    2631    print "\n";
    2732}
     33
     34
Note: See TracChangeset for help on using the changeset viewer.