X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=thread.h;h=9b7524586c6517a5f3e527e5115e2aa81b2d363d;hb=dcb4812c733545a68ef39b77c2dc4f7d440de203;hp=2c6e192a7fa81590cd4ac17a396a1c21cc0bbd80;hpb=fbbbcc485c1d03c76a91f998e1e4492c8ad56b38;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/thread.h b/thread.h
index 2c6e192..9b75245 100644
--- a/thread.h
+++ b/thread.h
@@ -36,10 +36,12 @@
 #endif
 
 #ifndef YIELD
-#  ifdef HAS_PTHREAD_YIELD
-#    define YIELD pthread_yield()
-#  else
+#  ifdef HAS_SCHED_YIELD
 #    define YIELD sched_yield()
+#  else
+#    ifdef HAS_PTHREAD_YIELD
+#      define YIELD pthread_yield()
+#    endif
 #  endif
 #endif
 
@@ -225,7 +227,7 @@ typedef struct condpair {
 #define THR
 /* Rats: if dTHR is just blank then the subsequent ";" throws an error */
 #ifdef WIN32
-#define dTHR
+#define dTHR extern int Perl___notused
 #else
 #define dTHR extern int errno
 #endif