← Back to branch summary

~armagetronad-dev/armagetronad/0.2.8-winlibs-work

« back to all changes in this revision

Viewing changes to SDL/src/main/win32/exports/gendef.pl

  • Committer: luke-jr
  • Date: 2006-05-29 01:55:42 UTC
  • Revision ID: svn-v3-list-QlpoOTFBWSZTWZvbKhsAAAdRgAAQABK6798QIABURMgAAaeoNT1TxT1DQbKaeobXKiyAmlWT7Y5MkdJOtXDtB7w7DOGFBHiOBxaUIu7HQyyQSvxdyRThQkJvbKhs:7d95bf1e-0414-0410-9756-b78462a59f44:armagetronad%2Fbranches%2F0.2.8%2Fwinlibs:4612
Unify tags/branches of modules released together

Show diffs side-by-side

added added

removed removed

Lines of Context:
SDL/src/main/win32/exports/gendef.pl
 
1
#!/usr/bin/perl
 
2
#
 
3
# Program to take a set of header files and generate DLL export definitions
 
4
 
 
5
while ( ($file = shift(@ARGV)) ) {
 
6
        if ( ! defined(open(FILE, $file)) ) {
 
7
                warn "Couldn't open $file: $!\n";
 
8
                next;
 
9
        }
 
10
        $printed_header = 0;
 
11
        $file =~ s,.*/,,;
 
12
        while (<FILE>) {
 
13
                if ( / DECLSPEC.* SDLCALL ([^\s\(]+)/ ) {
 
14
                        print "\t$1\n";
 
15
                }
 
16
        }
 
17
        close(FILE);
 
18
}
 
19
# Special exports not in the header files
 
20
print "\tSDL_RegisterApp\n";
 
21
print "\tSDL_SetModuleHandle\n";