mirrors/ecl
1
Fork 0
mirror of https://gitlab.com/embeddable-common-lisp/ecl.git synced 2026-01-15 22:01:36 -08:00
Code Issues Projects Releases Packages Wiki Activity

ecl_musleep() no longer disables interrupts.

Browse source
This commit is contained in:
Juan Jose Garcia Ripoll 2012-03-17 19:35:33 +01:00
parent 607ecaea2a
commit 0782f9a2fb
1 changed files with 0 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

2
src/c/time.d
View file

@ -117,11 +117,9 @@ ecl_musleep(double time, bool alertable)
tm.tv_sec = (time_t)floor(time);
tm.tv_nsec = (long)((time - floor(time)) * 1e9);
AGAIN:
ecl_disable_interrupts();
code = nanosleep(&tm, &tm);
{
int old_errno = errno;
ecl_enable_interrupts();
if (code < 0 && old_errno == EINTR && !alertable) {
goto AGAIN;
}