integrate cfgperl contents into mainline
Gurusamy Sarathy [Sat, 4 Sep 1999 20:21:59 +0000 (20:21 +0000)]
p4raw-id: //depot/perl@4076

1  2 
perl.h
perlapi.c

diff --cc perl.h
--- 1/perl.h
--- 2/perl.h
+++ b/perl.h
@@@ -1685,6 -1702,6 +1702,22 @@@ typedef pthread_key_t  perl_key
  #  endif
  #endif
  
++#if defined(PERL_IMPLICIT_CONTEXT) && !defined(PERL_GET_THX)
++#  ifdef USE_THREADS
++#    define PERL_GET_THX              THR
++#  else
++#  ifdef MULTIPLICITY
++#    define PERL_GET_THX              PERL_GET_INTERP
++#  else
++#  ifdef PERL_OBJECT
++#    define PERL_GET_THX              ((CPerlObj*)PERL_GET_INTERP)
++#  else
++#    define PERL_GET_THX              ((void*)0)
++#  endif
++#  endif
++#  endif
++#endif
++
  /* Some unistd.h's give a prototype for pause() even though
     HAS_PAUSE ends up undefined.  This causes the #define
     below to be rejected by the compmiler.  Sigh.
diff --cc perlapi.c
index f409754,1945146..1945146
mode 100644,100755..100644
+++ b/perlapi.c