src/main/macos/exports/gendef.pl
author Sam Lantinga <slouken@libsdl.org>
Fri, 24 Feb 2006 17:03:06 +0000
changeset 1427 5f5a74d29d18
parent 1424 7a610f25c12f
child 1516 4d241ea8a1cd
permissions -rw-r--r--
Updated with MrC includes and function definitions
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
0
74212992fb08 Initial revision
Sam Lantinga <slouken@lokigames.com>
parents:
diff changeset
     1
#!/usr/bin/perl
74212992fb08 Initial revision
Sam Lantinga <slouken@lokigames.com>
parents:
diff changeset
     2
#
74212992fb08 Initial revision
Sam Lantinga <slouken@lokigames.com>
parents:
diff changeset
     3
# Program to take a set of header files and generate DLL export definitions
74212992fb08 Initial revision
Sam Lantinga <slouken@lokigames.com>
parents:
diff changeset
     4
1317
6c7b69218276 Updated exports
Sam Lantinga <slouken@libsdl.org>
parents: 930
diff changeset
     5
# Special exports to ignore for this platform
6c7b69218276 Updated exports
Sam Lantinga <slouken@libsdl.org>
parents: 930
diff changeset
     6
$exclude{"SDL_CreateThread_Core"} = 1;
6c7b69218276 Updated exports
Sam Lantinga <slouken@libsdl.org>
parents: 930
diff changeset
     7
0
74212992fb08 Initial revision
Sam Lantinga <slouken@lokigames.com>
parents:
diff changeset
     8
while ( ($file = shift(@ARGV)) ) {
74212992fb08 Initial revision
Sam Lantinga <slouken@lokigames.com>
parents:
diff changeset
     9
	if ( ! defined(open(FILE, $file)) ) {
74212992fb08 Initial revision
Sam Lantinga <slouken@lokigames.com>
parents:
diff changeset
    10
		warn "Couldn't open $file: $!\n";
74212992fb08 Initial revision
Sam Lantinga <slouken@lokigames.com>
parents:
diff changeset
    11
		next;
74212992fb08 Initial revision
Sam Lantinga <slouken@lokigames.com>
parents:
diff changeset
    12
	}
74212992fb08 Initial revision
Sam Lantinga <slouken@lokigames.com>
parents:
diff changeset
    13
	$printed_header = 0;
74212992fb08 Initial revision
Sam Lantinga <slouken@lokigames.com>
parents:
diff changeset
    14
	$file =~ s,.*/,,;
74212992fb08 Initial revision
Sam Lantinga <slouken@lokigames.com>
parents:
diff changeset
    15
	while (<FILE>) {
930
02759105b989 Date: Fri, 20 Aug 2004 08:31:20 +0200
Sam Lantinga <slouken@libsdl.org>
parents: 345
diff changeset
    16
		if ( / DECLSPEC.* SDLCALL ([^\s\(]+)/ ) {
1317
6c7b69218276 Updated exports
Sam Lantinga <slouken@libsdl.org>
parents: 930
diff changeset
    17
			if ( not $exclude{$1} ) {
6c7b69218276 Updated exports
Sam Lantinga <slouken@libsdl.org>
parents: 930
diff changeset
    18
				print "\t$1\n";
6c7b69218276 Updated exports
Sam Lantinga <slouken@libsdl.org>
parents: 930
diff changeset
    19
			}
0
74212992fb08 Initial revision
Sam Lantinga <slouken@lokigames.com>
parents:
diff changeset
    20
		}
74212992fb08 Initial revision
Sam Lantinga <slouken@lokigames.com>
parents:
diff changeset
    21
	}
74212992fb08 Initial revision
Sam Lantinga <slouken@lokigames.com>
parents:
diff changeset
    22
	close(FILE);
74212992fb08 Initial revision
Sam Lantinga <slouken@lokigames.com>
parents:
diff changeset
    23
}
1317
6c7b69218276 Updated exports
Sam Lantinga <slouken@libsdl.org>
parents: 930
diff changeset
    24
6c7b69218276 Updated exports
Sam Lantinga <slouken@libsdl.org>
parents: 930
diff changeset
    25
# Special exports to include for this platform
1424
7a610f25c12f Updated MacOS Classic MPW build
Sam Lantinga <slouken@libsdl.org>
parents: 1317
diff changeset
    26
print "\tSDL_putenv\n";
7a610f25c12f Updated MacOS Classic MPW build
Sam Lantinga <slouken@libsdl.org>
parents: 1317
diff changeset
    27
print "\tSDL_getenv\n";
7a610f25c12f Updated MacOS Classic MPW build
Sam Lantinga <slouken@libsdl.org>
parents: 1317
diff changeset
    28
print "\tSDL_qsort\n";
7a610f25c12f Updated MacOS Classic MPW build
Sam Lantinga <slouken@libsdl.org>
parents: 1317
diff changeset
    29
print "\tSDL_revcpy\n";
7a610f25c12f Updated MacOS Classic MPW build
Sam Lantinga <slouken@libsdl.org>
parents: 1317
diff changeset
    30
print "\tSDL_strlcpy\n";
7a610f25c12f Updated MacOS Classic MPW build
Sam Lantinga <slouken@libsdl.org>
parents: 1317
diff changeset
    31
print "\tSDL_strlcat\n";
7a610f25c12f Updated MacOS Classic MPW build
Sam Lantinga <slouken@libsdl.org>
parents: 1317
diff changeset
    32
print "\tSDL_strdup\n";
7a610f25c12f Updated MacOS Classic MPW build
Sam Lantinga <slouken@libsdl.org>
parents: 1317
diff changeset
    33
print "\tSDL_strrev\n";
7a610f25c12f Updated MacOS Classic MPW build
Sam Lantinga <slouken@libsdl.org>
parents: 1317
diff changeset
    34
print "\tSDL_strupr\n";
7a610f25c12f Updated MacOS Classic MPW build
Sam Lantinga <slouken@libsdl.org>
parents: 1317
diff changeset
    35
print "\tSDL_strlwr\n";
7a610f25c12f Updated MacOS Classic MPW build
Sam Lantinga <slouken@libsdl.org>
parents: 1317
diff changeset
    36
print "\tSDL_ltoa\n";
7a610f25c12f Updated MacOS Classic MPW build
Sam Lantinga <slouken@libsdl.org>
parents: 1317
diff changeset
    37
print "\tSDL_ultoa\n";
7a610f25c12f Updated MacOS Classic MPW build
Sam Lantinga <slouken@libsdl.org>
parents: 1317
diff changeset
    38
print "\tSDL_snprintf\n";
7a610f25c12f Updated MacOS Classic MPW build
Sam Lantinga <slouken@libsdl.org>
parents: 1317
diff changeset
    39
print "\tSDL_vsnprintf\n";
0
74212992fb08 Initial revision
Sam Lantinga <slouken@lokigames.com>
parents:
diff changeset
    40
print "\tSDL_InitQuickDraw\n";