Upgrade to Devel::PPPort 3.10_01

[p5sagit/p5-mst-13.2.git] / ext / Devel / PPPort / parts / inc / threads

diff --git a/ext/Devel/PPPort/parts/inc/threads b/ext/Devel/PPPort/parts/inc/threads
index 9302db6..6a05d07 100644 (file)
--- a/ext/Devel/PPPort/parts/inc/threads
+++ b/ext/Devel/PPPort/parts/inc/threads
@@ -1,8 +1,8 @@
 ################################################################################
 ##
-##  $Revision: 5 $
+##  $Revision: 7 $
 ##  $Author: mhx $
-##  $Date: 2006/01/14 18:08:00 +0100 $
+##  $Date: 2006/12/02 14:19:29 +0100 $
 ##
 ################################################################################
 ##
@@ -18,6 +18,9 @@
 =provides
 
 __UNDEFINED__
+aTHXR
+aTHXR_
+dTHXR
 
 =implementation
 
@@ -31,6 +34,21 @@ __UNDEFINED__  pTHX_
 __UNDEFINED__  aTHX
 __UNDEFINED__  aTHX_
 
+#if { VERSION < 5.6.0 }
+#  ifdef USE_THREADS
+#    define aTHXR  thr
+#    define aTHXR_ thr, 
+#  else
+#    define aTHXR
+#    define aTHXR_
+#  endif
+#  define dTHXR  dTHR
+#else
+#  define aTHXR  aTHX
+#  define aTHXR_ aTHX_
+#  define dTHXR  dTHX
+#endif
+
 __UNDEFINED__  dTHXoa(x)  dTHXa(x)
 
 =xsubs