diff options
| author | Gurusamy Sarathy <gsar@cpan.org> | 1999-10-16 04:07:02 +0000 |
|---|---|---|
| committer | Gurusamy Sarathy <gsar@cpan.org> | 1999-10-16 04:07:02 +0000 |
| commit | 0eb4ebd7b699fc429e8edad9358a70c2ea08eaaf (patch) | |
| tree | 631b051f250c9d6e49a2cea5efe52b3a45664c09 /makedef.pl | |
| parent | 0ebdc6d52bc78db7da1302f9d517605c1d2ccc15 (diff) | |
| download | perl-0eb4ebd7b699fc429e8edad9358a70c2ea08eaaf.tar.gz | |
OS/2 support bits (from Ilya Zakharevich)
p4raw-id: //depot/perl@4393
Diffstat (limited to 'makedef.pl')
| -rw-r--r-- | makedef.pl | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/makedef.pl b/makedef.pl index 7586f71bcf..d87029377d 100644 --- a/makedef.pl +++ b/makedef.pl @@ -259,6 +259,7 @@ threads_mutex nthreads nthreads_cond os2_cond_wait +os2_stat pthread_join pthread_create pthread_detach @@ -654,7 +655,8 @@ elsif ($PLATFORM eq 'os2') { /^\s*[\da-f:]+\s+(\w+)/i and $mapped{$1}++ foreach <MAP>; close MAP or die 'Cannot close miniperl.map'; - @missing = grep { !exists $mapped{$_} } keys %export; + @missing = grep { !exists $mapped{$_} and !exists $bincompat5005{$_} } + keys %export; delete $export{$_} foreach @missing; } |