summaryrefslogtreecommitdiff
path: root/gnu/usr.bin/perl/thread.h
diff options
context:
space:
mode:
authorTodd C. Miller <millert@cvs.openbsd.org>2009-10-12 18:11:22 +0000
committerTodd C. Miller <millert@cvs.openbsd.org>2009-10-12 18:11:22 +0000
commit3340aa359b7f1a5408b241506d923a8819934dce (patch)
tree7f684f171494914b3fc7979f440e6d6033ce01f1 /gnu/usr.bin/perl/thread.h
parent64682a72ac119a8b4edb1b8bd9f7419964f9c778 (diff)
import perl 5.10.1
Diffstat (limited to 'gnu/usr.bin/perl/thread.h')
-rw-r--r--gnu/usr.bin/perl/thread.h18
1 files changed, 16 insertions, 2 deletions
diff --git a/gnu/usr.bin/perl/thread.h b/gnu/usr.bin/perl/thread.h
index 7ff71fad2ab..3a059b5f861 100644
--- a/gnu/usr.bin/perl/thread.h
+++ b/gnu/usr.bin/perl/thread.h
@@ -100,7 +100,11 @@
#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
@@ -156,7 +160,7 @@
#define THREAD_RET_CAST(x) ((any_t) x)
#define DETACH(t) cthread_detach(t->self)
-#define JOIN(t, avp) (*(avp) = (AV *)cthread_join(t->self))
+#define JOIN(t, avp) (*(avp) = MUTABLE_AV(cthread_join(t->self)))
#define PERL_SET_CONTEXT(t) cthread_set_data(cthread_self(), t)
#define PERL_GET_CONTEXT cthread_data(cthread_self())
@@ -472,3 +476,13 @@
#ifndef INIT_THREADS
# define INIT_THREADS NOOP
#endif
+
+/*
+ * Local variables:
+ * c-indentation-style: bsd
+ * c-basic-offset: 4
+ * indent-tabs-mode: t
+ * End:
+ *
+ * ex: set ts=8 sts=4 sw=4 noet:
+ */