This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Wonky example in perlthrtut
[perl5.git] / thread.h
index 7718d4b..3a059b5 100644 (file)
--- a/thread.h
+++ b/thread.h
 
 #ifdef __VMS
   /* Default is 1024 on VAX, 8192 otherwise */
-#  define THREAD_CREATE_NEEDS_STACK (32*1024)
+#  ifdef __ia64
+#    define THREAD_CREATE_NEEDS_STACK (48*1024)
+#  else
+#    define THREAD_CREATE_NEEDS_STACK (32*1024)
+#  endif
 #endif
 
 #ifdef I_MACH_CTHREADS