summaryrefslogtreecommitdiff
path: root/ext/Thread/Thread.xs
diff options
context:
space:
mode:
authorJarkko Hietaniemi <jhi@iki.fi>2001-05-16 13:00:12 +0000
committerJarkko Hietaniemi <jhi@iki.fi>2001-05-16 13:00:12 +0000
commit8e9464f100f3a92c77a6886c84855b4d1f587e2d (patch)
tree8d03f37ef55e70dc953d45fe8e88ba481b67a3e1 /ext/Thread/Thread.xs
parentb7dad2dc25528ee3fc23c1bca51116d48f988b04 (diff)
downloadperl-8e9464f100f3a92c77a6886c84855b4d1f587e2d.tar.gz
DG-UX threading patches, including a README.dgux,
from Takis Psarogiannakopoulos. p4raw-id: //depot/perl@10121
Diffstat (limited to 'ext/Thread/Thread.xs')
-rw-r--r--ext/Thread/Thread.xs4
1 files changed, 4 insertions, 0 deletions
diff --git a/ext/Thread/Thread.xs b/ext/Thread/Thread.xs
index cb2e395051..c3b94eb6a8 100644
--- a/ext/Thread/Thread.xs
+++ b/ext/Thread/Thread.xs
@@ -280,6 +280,10 @@ newthread (pTHX_ SV *startsv, AV *initargs, char *classname)
attr_inited = 1;
err = pthread_attr_init(&attr);
# ifdef PTHREAD_ATTR_SETDETACHSTATE
+#ifdef DGUX
+ if (err == 0)
+ err = pthread_attr_setstacksize(&attr, (1024*16));
+#endif
if (err == 0)
err = PTHREAD_ATTR_SETDETACHSTATE(&attr, attr_joinable);