Add Configure directive -Dusereentrant for Artur's ithreads work,

extremely experimental, not even prompted for.

p4raw-id: //depot/perl@10569

diff --git a/Configure b/Configure
index 075963f..62b7685 100755 (executable)
--- a/Configure
+++ b/Configure
@@ -20,7 +20,7 @@
 
 # $Id: Head.U,v 3.0.1.9 1997/02/28 15:02:09 ram Exp $
 #
-# Generated on Tue Jun 12 02:31:11 EET DST 2001 [metaconfig 3.0 PL70]
+# Generated on Wed Jun 13 21:10:05 EET DST 2001 [metaconfig 3.0 PL70]
 # (with additional metaconfig patches by perlbug@perl.org)
 
 cat >c1$$ <<EOF
@@ -963,6 +963,7 @@ usesocks=''
 d_oldpthreads=''
 use5005threads=''
 useithreads=''
+usereentrant=''
 usethreads=''
 incpath=''
 mips_type=''
@@ -17016,6 +17017,7 @@ usenm='$usenm'
 useopcode='$useopcode'
 useperlio='$useperlio'
 useposix='$useposix'
+usereentrant='$usereentrant'
 usesfio='$usesfio'
 useshrplib='$useshrplib'
 usesocks='$usesocks'

diff --git a/Porting/Glossary b/Porting/Glossary
index 6995d08..7a5e580 100644 (file)
--- a/Porting/Glossary
+++ b/Porting/Glossary
@@ -3756,6 +3756,13 @@ useposix (Extensions.U):
        for hints files to indicate that POSIX will not compile
        on a particular system.
 
+usereentrant (usethreads.U):
+       This variable conditionally defines the USE_REENTRANT_API symbol,
+       which indicates that the thread code may try to use the various
+       _r versions of library functions.  This is only potentially
+       meaningful if usethreads is set and is very experimental, it is
+       not even prompted for.
+
 usesfio (d_sfio.U):
        This variable is set to true when the user agrees to use sfio.
        It is set to false when sfio is not available or when the user

diff --git a/Porting/config.sh b/Porting/config.sh
index f225a7b..a7c490c 100644 (file)
--- a/Porting/config.sh
+++ b/Porting/config.sh
@@ -8,7 +8,7 @@
 
 # Package name      : perl5
 # Source directory  : .
-# Configuration time: Fri Jun  8 18:08:58 EET DST 2001
+# Configuration time: Wed Jun 13 21:04:31 EET DST 2001
 # Configured by     : jhi
 # Target system     : osf1 alpha.hut.fi v4.0 878 alpha 
 
@@ -63,7 +63,7 @@ ccsymbols='__alpha=1 __LANGUAGE_C__=1 __osf__=1 __unix__=1 _LONGLONG=1 _SYSTYPE_
 ccversion='V5.6-082'
 cf_by='jhi'
 cf_email='yourname@yourhost.yourplace.com'
-cf_time='Fri Jun  8 18:08:58 EET DST 2001'
+cf_time='Wed Jun 13 21:04:31 EET DST 2001'
 charsize='1'
 chgrp=''
 chmod=''
@@ -670,7 +670,7 @@ patchlevel='7'
 path_sep=':'
 perl5='/u/vieraat/vieraat/jhi/Perl/bin/perl'
 perl=''
-perl_patchlevel='10475'
+perl_patchlevel='10537'
 perladmin='yourname@yourhost.yourplace.com'
 perllibs='-lm -liconv -lutil -lpthread -lexc'
 perlpath='/opt/perl/bin/perl'
@@ -809,6 +809,7 @@ usenm='true'
 useopcode='true'
 useperlio='define'
 useposix='true'
+usereentrant=''
 usesfio='false'
 useshrplib='true'
 usesocks='undef'
@@ -865,7 +866,7 @@ PERL_SUBVERSION=1
 PERL_API_REVISION=5
 PERL_API_VERSION=5
 PERL_API_SUBVERSION=0
-PERL_PATCHLEVEL=10475
+PERL_PATCHLEVEL=10537
 PERL_CONFIG_SH=true
 # Variables propagated from previous config.sh file.
 pp_sys_cflags='ccflags="$ccflags -DNO_EFF_ONLY_OK"'

diff --git a/Porting/config_H b/Porting/config_H
index fa60e91..3e85c17 100644 (file)
--- a/Porting/config_H
+++ b/Porting/config_H
@@ -17,7 +17,7 @@
 /*
  * Package name      : perl5
  * Source directory  : .
- * Configuration time: Fri Jun  8 18:08:58 EET DST 2001
+ * Configuration time: Wed Jun 13 21:04:31 EET DST 2001
  * Configured by     : jhi
  * Target system     : osf1 alpha.hut.fi v4.0 878 alpha 
  */

diff --git a/config_h.SH b/config_h.SH
index b3a8c7e..8ba725d 100644 (file)
--- a/config_h.SH
+++ b/config_h.SH
@@ -3267,12 +3267,18 @@ sed <<!GROK!THIS! >$CONFIG_H -e 's!^#undef\(.*/\)\*!/\*#define\1 \*!' -e 's!^#un
  *     This symbol, if defined, indicates that Perl should
  *     be built to use the old draft POSIX threads API.
  */
+/* USE_REENTRANT_API:
+ *     This symbol, if defined, indicates that Perl should
+ *     try to use the various _r versions of library functions.
+ *     This is extremely experimental.
+ */
 #$use5005threads       USE_5005THREADS         /**/
 #$useithreads  USE_ITHREADS            /**/
 #if defined(USE_5005THREADS) && !defined(USE_ITHREADS)
 #define                USE_THREADS             /* until src is revised*/
 #endif
 #$d_oldpthreads        OLD_PTHREADS_API                /**/
+#$usereentrant USE_REENTRANT_API       /**/
 
 /* PERL_VENDORARCH:
  *     If defined, this symbol contains the name of a private library.

diff --git a/configure.com b/configure.com
index 7b02485..1d09675 100644 (file)
--- a/configure.com
+++ b/configure.com
@@ -5573,6 +5573,7 @@ $ WC "usemultiplicity='" + usemultiplicity + "'"
 $ WC "usemymalloc='" + usemymalloc + "'"
 $ WC "useperlio='" + useperlio + "'"
 $ WC "useposix='false'"
+$ WC "usereentrant='undef'"
 $ WC "usesocks='undef'"
 $ WC "usethreads='" + usethreads + "'"
 $ WC "usevfork='true'"

diff --git a/epoc/config.sh b/epoc/config.sh
index e9a5cd6..0e5549e 100644 (file)
--- a/epoc/config.sh
+++ b/epoc/config.sh
@@ -735,6 +735,7 @@ usenm=''
 useopcode=''
 useperlio='undef'
 useposix=''
+usereentrant='undef'
 usesfio=''
 useshrplib=''
 usesocks='undef'

diff --git a/perl.h b/perl.h
index 457838f..ba0c5c7 100644 (file)
--- a/perl.h
+++ b/perl.h
@@ -3809,6 +3809,8 @@ extern void moncontrol(int);
    HAS_STRUCT_MSGHDR
    HAS_STRUCT_CMSGHDR
 
+   USE_REENTRANT_API
+
    so that Configure picks them up. */
 
 #endif /* Include guard */

diff --git a/uconfig.h b/uconfig.h
index 7084a28..08799f2 100644 (file)
--- a/uconfig.h
+++ b/uconfig.h
@@ -3243,12 +3243,18 @@
  *     This symbol, if defined, indicates that Perl should
  *     be built to use the old draft POSIX threads API.
  */
+/* USE_REENTRANT_API:
+ *     This symbol, if defined, indicates that Perl should
+ *     try to use the various _r versions of library functions.
+ *     This is extremely experimental.
+ */
 /*#define      USE_5005THREADS         / **/
 /*#define      USE_ITHREADS            / **/
 #if defined(USE_5005THREADS) && !defined(USE_ITHREADS)
 #define                USE_THREADS             /* until src is revised*/
 #endif
 /*#define      OLD_PTHREADS_API                / **/
+/*#define      USE_REENTRANT_API       / **/
 
 /* PERL_VENDORARCH:
  *     If defined, this symbol contains the name of a private library.

diff --git a/uconfig.sh b/uconfig.sh
index 5fdadea..5ffccae 100755 (executable)
--- a/uconfig.sh
+++ b/uconfig.sh
@@ -571,6 +571,7 @@ usenm='false'
 useopcode='true'
 useperlio='undef'
 useposix='true'
+usereentrant='undef'
 usesfio='false'
 useshrplib='false'
 usesocks='undef'

diff --git a/vos/config.alpha.def b/vos/config.alpha.def
index 6b4b5a9..0fb92e3 100644 (file)
--- a/vos/config.alpha.def
+++ b/vos/config.alpha.def
@@ -510,6 +510,7 @@ $uselongdouble='define'
 $usemorebits='undef'
 $usemultiplicity='undef'
 $useperlio='undef'
+$usereentrant='undef'
 $usesocks='undef'
 $uvoformat='"o"'
 $uvsize='4'

diff --git a/vos/config.ga.def b/vos/config.ga.def
index cfede44..ffcd3cf 100644 (file)
--- a/vos/config.ga.def
+++ b/vos/config.ga.def
@@ -510,6 +510,7 @@ $uselongdouble='define'
 $usemorebits='undef'
 $usemultiplicity='undef'
 $useperlio='undef'
+$usereentrant='undef'
 $usesocks='undef'
 $uvoformat='"o"'
 $uvsize='4'

diff --git a/win32/config.bc b/win32/config.bc
index ee160fd..e1eeca8 100644 (file)
--- a/win32/config.bc
+++ b/win32/config.bc
@@ -794,6 +794,7 @@ usenm='false'
 useopcode='true'
 useperlio='~USE_PERLIO~'
 useposix='true'
+usereentrant='undef'
 usesfio='false'
 useshrplib='yes'
 usesocks='undef'

diff --git a/win32/config.gc b/win32/config.gc
index 8adbe23..7085cd2 100644 (file)
--- a/win32/config.gc
+++ b/win32/config.gc
@@ -794,6 +794,7 @@ usenm='false'
 useopcode='true'
 useperlio='~USE_PERLIO~'
 useposix='true'
+usereentrant='undef'
 usesfio='false'
 useshrplib='yes'
 usesocks='undef'

diff --git a/win32/config.vc b/win32/config.vc
index 5a7b20d..c01ce0c 100644 (file)
--- a/win32/config.vc
+++ b/win32/config.vc
@@ -794,6 +794,7 @@ usenm='false'
 useopcode='true'
 useperlio='~USE_PERLIO~'
 useposix='true'
+usereentrant='undef'
 usesfio='false'
 useshrplib='yes'
 usesocks='undef'