} STMT_END
#endif
-void Perl_atfork_lock(void);
-void Perl_atfork_unlock(void);
-
#ifndef PTHREAD_ATFORK
-# define PTHREAD_ATFORK(prepare,parent,child) \
- pthread_atfork(prepare,parent,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