1 files changed, 4 insertions, 2 deletions
diff --git a/thread.h b/thread.h
index 09ed596a52..72292b50c1 100644
--- a/thread.h
+++ b/thread.h
@@ -264,8 +264,10 @@
 #ifndef ALLOC_THREAD_KEY
 #  define ALLOC_THREAD_KEY \
     STMT_START {						\
-	if (pthread_key_create(&PL_thr_key, 0))			\
-	    Perl_croak(aTHX_ "panic: pthread_key_create");	\
+	if (pthread_key_create(&PL_thr_key, 0))	{		\
+	    fprintf(stderr, "panic: pthread_key_create");	\
+	    exit(1);						\
+	}							\
     } STMT_END
 #endif