From: Steve Hay Date: Fri, 22 Apr 2005 08:59:58 +0000 (+0000) Subject: Fix Win32 linker errors following change 24271 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=e0cde26580167f9c44998304447cccdd682813a8;p=p5sagit%2Fp5-mst-13.2.git Fix Win32 linker errors following change 24271 This clears up "unresolved external" errors for the following symbols: PL_watch_pvx Perl_Gappctx_ptr Perl_Gmmap_page_size_ptr Perl_Gsig_defaulting_ptr Perl_Gsig_handlers_initted_ptr Perl_Gsig_ignoring_ptr Perl_Gsig_sv_ptr Perl_Gtimesbase_ptr Perl_Gwatch_pvx_ptr p4raw-id: //depot/perl@24278 --- diff --git a/makedef.pl b/makedef.pl index 8b4dd41..d7e052a 100644 --- a/makedef.pl +++ b/makedef.pl @@ -565,6 +565,7 @@ unless ($define{'DEBUGGING'}) { PL_block_type PL_watchaddr PL_watchok + PL_watch_pvx )]; } @@ -639,6 +640,24 @@ if ($define{'PERL_MALLOC_WRAP'}) { )]; } +unless ($define{'HAS_MMAP'}) { + skip_symbols [qw( + PL_mmap_page_size + )]; +} + +unless ($define{'HAS_TIMES'} || $define{'PERL_NEED_TIMESBASE'}) { + skip_symbols [qw( + PL_timesbase + )]; +} + +unless ($define{'PERL_NEED_APPCTX'}) { + skip_symbols [qw( + PL_appctx + )]; +} + unless ($define{'USE_ITHREADS'}) { skip_symbols [qw( PL_thr_key @@ -733,6 +752,12 @@ unless ($define{'PERL_IMPLICIT_CONTEXT'}) { )]; } +if ($define{'PERL_IMPLICIT_CONTEXT'}) { + skip_symbols [qw( + PL_sig_sv + )]; +} + unless ($define{'PERL_IMPLICIT_SYS'}) { skip_symbols [qw( perl_alloc_using @@ -744,6 +769,26 @@ unless ($define{'FAKE_THREADS'}) { skip_symbols [qw(PL_curthr)]; } +unless ($define{'FAKE_DEFAULT_SIGNAL_HANDLERS'}) { + skip_symbols [qw( + PL_sig_defaulting + )]; +} + +unless ($define{'FAKE_PERSISTENT_SIGNAL_HANDLERS'}) { + skip_symbols [qw( + PL_sig_ignoring + )]; +} + +unless ($define{'FAKE_DEFAULT_SIGNAL_HANDLERS'} || + $define{'FAKE_PERSISTENT_SIGNAL_HANDLERS'}) +{ + skip_symbols [qw( + PL_sig_handlers_initted + )]; +} + unless ($define{'PL_OP_SLAB_ALLOC'}) { skip_symbols [qw( PL_OpPtr