Mercurial > hg > octave-nkf
changeset 2631:0774c3f023e8
[project @ 1997-01-27 19:22:05 by jwe]
author | jwe |
---|---|
date | Mon, 27 Jan 1997 19:22:05 +0000 |
parents | fdee6fe3e73b |
children | b8a3dd7e2e1a |
files | src/sysdep.cc |
diffstat | 1 files changed, 5 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/src/sysdep.cc +++ b/src/sysdep.cc @@ -579,15 +579,16 @@ warning ("usleep: NaN is an invalid delay"); else { +#if defined (HAVE_USLEEP) int delay = NINT (dval); -#if defined (HAVE_USLEEP) + if (delay > 0) usleep (delay); #else - // Kluge alert. + int delay = NINT (dval / 1e6); - if (delay > 500000) - sleep (delay / 1000000); + if (delay > 0) + sleep (delay); #endif } }