From westfeld at inf.tu-dresden.de  Mon Mar 13 10:52:25 2006
From: westfeld at inf.tu-dresden.de (westfeld@inf.tu-dresden.de)
Date: Mon, 13 Mar 2006 10:52:25 +0100 (CET)
Subject: [Rd] Sys.sleep waits forever + workaround (PR#8678)
Message-ID: <20060313095225.256D629C30@slim.kubism.ku.dk>

When I tried to schedule a calculation for the next day (waiting several
10000 seconds), I noticed that Sys.sleep does never return (R version
2.1.0 on Linux). From the C code I expect that the maximum number of
seconds is about 2000 (2^31/1e6), which is system-dependent.

##Sys.sleep <- function(time)
##    invisible(.Internal(Sys.sleep(time)))

Sys.sleep <- function(time) {
        nloops <- time%/%1000
        while (nloops>0) {
                nloops <- nloops-1
                .Internal(Sys.sleep(1000))
        }
        invisible(.Internal(Sys.sleep(time%%1000)))
}


-- 
Andreas Westfeld, 0432 01CC F511 9E2B 0B57 5993 0B22 98F8 4AD8 EEEA
<westfeld at inf.tu-dresden.de> http://www.inf.tu-dresden.de/~aw4
TU Dresden Fakult?t Informatik, Institut f?r Systemarchitektur
Datenschutz und Datensicherheit, Tel. +49-351-463-37918



[Rd] Sys.sleep waits forever + workaround (PR#8678)
westfeld@inf.tu-dresden.de