X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=ext%2Fthreads%2Fthreads.xs;h=de571de784406ae581e5f5d8a59761667ca3e923;hb=58a3a76cb3552fafeb21957d1f17da114f2f65ec;hp=e85c6c732733b00a0788a477eade78b1767317ba;hpb=09337566c6851d5b25319f9b447a1c2fdeee1b7b;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/ext/threads/threads.xs b/ext/threads/threads.xs
index e85c6c7..de571de 100755
--- a/ext/threads/threads.xs
+++ b/ext/threads/threads.xs
@@ -620,11 +620,14 @@ S_ithread_create(
         /* Try to get thread's actual stack size */
         {
             size_t stacksize;
-            if (! pthread_attr_getstacksize(&attr, &stacksize)) {
-                if (stacksize) {
+#ifdef HPUX1020
+            stacksize = pthread_attr_getstacksize(attr);
+#else
+            if (! pthread_attr_getstacksize(&attr, &stacksize))
+#endif
+                if (stacksize > 0) {
                     thread->stack_size = (IV)stacksize;
                 }
-            }
         }
 #  endif
     }