OS/2 threads

To: Mailing list Perl5 <perl5-porters@perl.org>
Message-ID: <19990126133946.A11594@monk.mps.ohio-state.edu>

p4raw-id: //depot/cfgperl@2769

diff --git a/os2/os2ish.h b/os2/os2ish.h
index 20b2196..97b489b 100644 (file)
--- a/os2/os2ish.h
+++ b/os2/os2ish.h
@@ -152,7 +152,7 @@ extern int rc;
 #define pthread_setspecific(k,v)       (*_threadstore()=v,0)
 #define pthread_self()                 _gettid()
 #define pthread_key_create(keyp,flag)  (*keyp=_gettid(),0)
-#define sched_yield()  DosSleep(0)
+#define YIELD                          DosSleep(0)
 
 #ifdef PTHREADS_INCLUDED               /* For ./x2p stuff. */
 int pthread_join(pthread_t tid, void **status);