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

diff --git a/thread.h b/thread.h
index 6141cf3..9b75245 100644
--- a/thread.h
+++ b/thread.h
@@ -226,5 +226,9 @@ typedef struct condpair {
 
 #define THR
 /* Rats: if dTHR is just blank then the subsequent ";" throws an error */
+#ifdef WIN32
+#define dTHR extern int Perl___notused
+#else
 #define dTHR extern int errno
+#endif
 #endif /* USE_THREADS */