src/main/macosx/exports/gendef.pl
changeset 825 618fcc5861c8
parent 791 ab0d977f91f8
child 930 02759105b989
equal deleted inserted replaced
824:a3bf0451c79b 825:618fcc5861c8
     1 #!/usr/bin/perl
     1 #!/usr/bin/perl
     2 #
     2 #
     3 # Program to take a set of header files and generate DLL export definitions
     3 # Program to take a set of header files and generate DLL export definitions
       
     4 
       
     5 # print objective-c exports
       
     6 print "\t.objc_class_name_SDL_QuartzWindow\n";
       
     7 print "\t.objc_class_name_SDL_QuartzWindowDelegate\n";
     4 
     8 
     5 while ( ($file = shift(@ARGV)) ) {
     9 while ( ($file = shift(@ARGV)) ) {
     6 	if ( ! defined(open(FILE, $file)) ) {
    10 	if ( ! defined(open(FILE, $file)) ) {
     7 		warn "Couldn't open $file: $!\n";
    11 		warn "Couldn't open $file: $!\n";
     8 		next;
    12 		next;