summaryrefslogtreecommitdiff
path: root/lang/parrot/patches/patch-al
blob: fdc9699967d968ba925075bf043ea6b81c2e127e (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
$NetBSD: patch-al,v 1.3 2012/02/09 10:39:25 he Exp $

Parrot may end up doing usleep(1000000), which is disallowed by SUSv2.

--- src/scheduler.c.orig	2011-10-18 22:44:11.000000000 +0000
+++ src/scheduler.c
@@ -993,7 +993,7 @@ Parrot_cx_schedule_sleep(PARROT_INTERP, 
     Parrot_cx_runloop_wake(interp, interp->scheduler);
 
     /* A more primitive, platform-specific, non-threaded form of sleep. */
-    if (time > 1) {
+    if (time >= 1) {
         /* prevent integer overflow when converting to microseconds
          * and problems in platforms that doesn't allow usleep more
          * than 1 second */