diff options
| author | Nicholas Clark <nick@ccl4.org> | 2011-07-19 16:31:23 +0200 |
|---|---|---|
| committer | Nicholas Clark <nick@ccl4.org> | 2011-08-01 11:53:51 +0200 |
| commit | 5581753c12db7ac3d477b2911792472def374afc (patch) | |
| tree | da7486de725e09eb92a0d7d12965ea902f51c067 /makedef.pl | |
| parent | a5b12fd07d9fdc63a5a4a6a6ac9d360ecfe660df (diff) | |
| download | perl-5581753c12db7ac3d477b2911792472def374afc.tar.gz | |
In makedef.pl, simplify handling the 7 symbols wanted on Win32 but not WinCE.
18f68570297a0260 added WinCE, but did so by changing a block that adds
symbols for Win32 to add them for both Win32 & WinCE, and simultaneously
adding 7 of those symbols to the WinCE specific skip list.
Much simpler is to split the list of symbols to add into one for Win32 only,
and one for Win32 & WinCE, and removing the skip list.
Diffstat (limited to 'makedef.pl')
| -rw-r--r-- | makedef.pl | 26 |
1 files changed, 12 insertions, 14 deletions
diff --git a/makedef.pl b/makedef.pl index 1cb96935ac..ca224ba3e0 100644 --- a/makedef.pl +++ b/makedef.pl @@ -295,13 +295,6 @@ if ($PLATFORM eq 'wince') { PL_lastgotoprobe PL_modcount PL_timesbuf - setgid - setuid - win32_free_childdir - win32_free_childenv - win32_get_childdir - win32_get_childenv - win32_spawnvp main )]; } @@ -1165,10 +1158,20 @@ while (<DATA>) { try_symbol($_); } +if ($PLATFORM eq 'win32') { + try_symbol($_) foreach qw( + setgid + setuid + win32_free_childdir + win32_free_childenv + win32_get_childdir + win32_get_childenv + win32_spawnvp + ); +} + if ($PLATFORM =~ /^win(?:32|ce)$/) { foreach my $symbol (qw( - setuid - setgid Perl_init_os_extras Perl_thread_create Perl_win32_init @@ -1196,7 +1199,6 @@ if ($PLATFORM =~ /^win(?:32|ce)$/) { win32_isatty win32_read win32_write - win32_spawnvp win32_mkdir win32_rmdir win32_chdir @@ -1282,11 +1284,7 @@ if ($PLATFORM =~ /^win(?:32|ce)$/) { win32_getpid win32_crypt win32_dynaload - win32_get_childenv - win32_free_childenv win32_clearenv - win32_get_childdir - win32_free_childdir win32_stdin win32_stdout win32_stderr |