X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=thread.h;h=aa3c86a2bea49761fe7f35b6bf20156c04191f11;hb=943795c2b00ef89ec677d4af7a0a6bfabab5c916;hp=5de28fb41937f94570647ef1ac670ee109330b2c;hpb=142c4186a0973c440f5caa0dda3e33e9e6ae7c11;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/thread.h b/thread.h
index 5de28fb..aa3c86a 100644
--- a/thread.h
+++ b/thread.h
@@ -1,6 +1,7 @@
 /*    thread.h
  *
- *    Copyright (C) 1999, 2000, 2001, 2002, 2004, by Larry Wall and others
+ *    Copyright (C) 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006,
+ *    by Larry Wall and others
  *
  *    You may distribute under the terms of either the GNU General Public
  *    License or the Artistic License, as specified in the README file.
@@ -97,6 +98,11 @@
 #  define THREAD_CREATE_NEEDS_STACK (32*1024)
 #endif
 
+#ifdef __VMS
+  /* Default is 1024 on VAX, 8192 otherwise */
+#  define THREAD_CREATE_NEEDS_STACK (32*1024)
+#endif
+
 #ifdef I_MACH_CTHREADS
 
 /* cthreads interface */
@@ -334,7 +340,7 @@
     STMT_START {						\
 	int _eC_;						\
 	if ((_eC_ = pthread_key_create(&PL_thr_key, 0))) {	\
-            write(2, "panic: pthread_key_create failed\n", 33); \
+            write(2, STR_WITH_LEN("panic: pthread_key_create failed\n")); \
 	    exit(1);						\
 	}							\
     } STMT_END