From: Steve Hay <SteveHay@planit.com>
Date: Tue, 5 Dec 2006 16:06:31 +0000 (+0000)
Subject: Extend d_pseudofork to Win32-land and set it when appropriate
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=27bdbd07da4037be18a7347ab1c0d4093e037413;p=p5sagit%2Fp5-mst-13.2.git

Extend d_pseudofork to Win32-land and set it when appropriate
(namely, when we have USE_ITHREADS and PERL_IMPLICIT_SYSTEM)

p4raw-id: //depot/perl@29469
---

diff --git a/win32/config.bc b/win32/config.bc
index 4e892e9..f87e399 100644
--- a/win32/config.bc
+++ b/win32/config.bc
@@ -333,6 +333,7 @@ d_poll='undef'
 d_portable='define'
 d_printf_format_null='undef'
 d_procselfexe='undef'
+d_pseudofork='undef'
 d_pthread_atfork='undef'
 d_pthread_attr_setscope='undef'
 d_pthread_yield='undef'
diff --git a/win32/config.gc b/win32/config.gc
index 2652139..72afe61 100644
--- a/win32/config.gc
+++ b/win32/config.gc
@@ -333,6 +333,7 @@ d_poll='undef'
 d_portable='define'
 d_printf_format_null='undef'
 d_procselfexe='undef'
+d_pseudofork='undef'
 d_pthread_atfork='undef'
 d_pthread_attr_setscope='undef'
 d_pthread_yield='undef'
diff --git a/win32/config.vc b/win32/config.vc
index ecae562..5339125 100644
--- a/win32/config.vc
+++ b/win32/config.vc
@@ -333,6 +333,7 @@ d_poll='undef'
 d_portable='define'
 d_printf_format_null='undef'
 d_procselfexe='undef'
+d_pseudofork='undef'
 d_pthread_atfork='undef'
 d_pthread_attr_setscope='undef'
 d_pthread_yield='undef'
diff --git a/win32/config.vc64 b/win32/config.vc64
index 43d4041..0602555 100644
--- a/win32/config.vc64
+++ b/win32/config.vc64
@@ -333,6 +333,7 @@ d_poll='undef'
 d_portable='define'
 d_printf_format_null='undef'
 d_procselfexe='undef'
+d_pseudofork='undef'
 d_pthread_atfork='undef'
 d_pthread_attr_setscope='undef'
 d_pthread_yield='undef'
diff --git a/win32/config_H.bc b/win32/config_H.bc
index fab75f2..3a75907 100644
--- a/win32/config_H.bc
+++ b/win32/config_H.bc
@@ -3274,6 +3274,12 @@
  */
 /*#define HAS_VFORK	/**/
 
+/* HAS_PSEUDOFORK:
+ *	This symbol, if defined, indicates that an emulation of the
+ *	fork routine is available.
+ */
+/*#define HAS_PSEUDOFORK	/**/
+
 /* Signal_t:
  *	This symbol's value is either "void" or "int", corresponding to the
  *	appropriate return type of a signal handler.  Thus, you can declare
diff --git a/win32/config_H.gc b/win32/config_H.gc
index e872524..0fdff18 100644
--- a/win32/config_H.gc
+++ b/win32/config_H.gc
@@ -3290,6 +3290,12 @@
  */
 /*#define HAS_VFORK	/**/
 
+/* HAS_PSEUDOFORK:
+ *	This symbol, if defined, indicates that an emulation of the
+ *	fork routine is available.
+ */
+/*#define HAS_PSEUDOFORK	/**/
+
 /* Signal_t:
  *	This symbol's value is either "void" or "int", corresponding to the
  *	appropriate return type of a signal handler.  Thus, you can declare
diff --git a/win32/config_H.vc b/win32/config_H.vc
index 9a6872f..c85f0aa 100644
--- a/win32/config_H.vc
+++ b/win32/config_H.vc
@@ -3286,6 +3286,12 @@
  */
 /*#define HAS_VFORK	/**/
 
+/* HAS_PSEUDOFORK:
+ *	This symbol, if defined, indicates that an emulation of the
+ *	fork routine is available.
+ */
+/*#define HAS_PSEUDOFORK	/**/
+
 /* Signal_t:
  *	This symbol's value is either "void" or "int", corresponding to the
  *	appropriate return type of a signal handler.  Thus, you can declare
diff --git a/win32/config_H.vc64 b/win32/config_H.vc64
index 44c47dd..b5d708c 100644
--- a/win32/config_H.vc64
+++ b/win32/config_H.vc64
@@ -3274,6 +3274,12 @@
  */
 /*#define HAS_VFORK	/**/
 
+/* HAS_PSEUDOFORK:
+ *	This symbol, if defined, indicates that an emulation of the
+ *	fork routine is available.
+ */
+/*#define HAS_PSEUDOFORK	/**/
+
 /* Signal_t:
  *	This symbol's value is either "void" or "int", corresponding to the
  *	appropriate return type of a signal handler.  Thus, you can declare
diff --git a/win32/config_sh.PL b/win32/config_sh.PL
index 1d9a831..3f819fe 100644
--- a/win32/config_sh.PL
+++ b/win32/config_sh.PL
@@ -109,6 +109,10 @@ if ($opt{uselargefiles} ne 'define') {
     $opt{lseektype} = 'off_t';
 }
 
+if ($opt{useithreads} eq 'define' && $opt{ccflags} =~ / -DPERL_IMPLICIT_SYS/) {
+    $opt{d_pseudofork} = 'define';
+}
+
 while (<>) {
     s/~([\w_]+)~/$opt{$1}/g;
     if (/^([\w_]+)=(.*)$/) {