#endif
#ifndef PTHREAD_ATFORK
-typedef void(*Perl_pthread_atfork_t)(void);
-# define PTHREAD_ATFORK(prepare,parent,child) \
- pthread_atfork((Perl_pthread_atfork_t)prepare,\
- (Perl_pthread_atfork_t)parent,\
- (Perl_pthread_atfork_t)child)
+# ifdef HAS_PTHREAD_ATFORK
+# define PTHREAD_ATFORK(prepare,parent,child) \
+ pthread_atfork(prepare,parent,child)
+# else
+# define PTHREAD_ATFORK(prepare,parent,child) \
+ NOOP
+# endif
#endif
#ifndef THREAD_RET_TYPE
#ifndef INIT_THREADS
# define INIT_THREADS NOOP
#endif
-
-#ifndef PTHREAD_ATFORK
-# define PTHREAD_ATFORK(prepare,parent,child) NOOP
-#endif