From 20b634c2cddd73f32cb58e435a5061f5c6e53570 Mon Sep 17 00:00:00 2001 From: Jarkko Hietaniemi Date: Thu, 1 May 2003 07:45:06 +0000 Subject: z/OS: More threaded build tweaks from Brian De Pradine-- apparently now it works! p4raw-id: //depot/perl@19368 --- thread.h | 12 +++++++----- 1 file changed, 7 insertions(+), 5 deletions(-) (limited to 'thread.h') diff --git a/thread.h b/thread.h index 3f7b2df540..af46690a4b 100644 --- a/thread.h +++ b/thread.h @@ -40,6 +40,12 @@ # ifdef __OPEN_VM # define pthread_addr_t void * # endif +# ifdef OEMVS +# define pthread_addr_t void * +# define pthread_mutexattr_settype(a,t) pthread_mutexattr_setkind_np(a,t) +# define pthread_create(t,a,s,d) pthread_create(t,&(a),s,d) +# define pthread_keycreate pthread_key_create +# endif # ifdef VMS # define pthread_attr_init(a) pthread_attr_create(a) # define PTHREAD_ATTR_SETDETACHSTATE(a,s) pthread_setdetach_np(a,s) @@ -57,7 +63,7 @@ # define pthread_mutexattr_init(a) pthread_mutexattr_create(a) # define pthread_mutexattr_settype(a,t) pthread_mutexattr_setkind_np(a,t) # endif -# if defined(DJGPP) || defined(__OPEN_VM) +# if defined(DJGPP) || defined(__OPEN_VM) || defined(OEMVS) # define PTHREAD_ATTR_SETDETACHSTATE(a,s) pthread_attr_setdetachstate(a,&(s)) # define YIELD pthread_yield(NULL) # endif @@ -273,11 +279,7 @@ #ifdef HAS_PTHREAD_UNCHECKED_GETSPECIFIC_NP # define PTHREAD_GETSPECIFIC(key) pthread_unchecked_getspecific_np(key) #else -# ifdef OEMVS -# define PTHREAD_GETSPECIFIC(key) pthread_getspecific_d8_np(key) -# else # define PTHREAD_GETSPECIFIC(key) pthread_getspecific(key) -# endif #endif #ifndef PERL_GET_CONTEXT -- cgit v1.2.1