aboutsummaryrefslogtreecommitdiff
path: root/jim-signal.c
diff options
context:
space:
mode:
authorSteve Bennett <steveb@workware.net.au>2014-01-04 12:11:50 +1000
committerSteve Bennett <steveb@workware.net.au>2014-01-15 07:46:30 +1000
commit4454f2a3aaa7ee629b70274687d3cb4dbf1107dd (patch)
tree0ddb9e08de3dc74ec10cbaf8d63daaf77baec668 /jim-signal.c
parentbb53a41ac64e00e3bb5e882290e5ef6eba4bf626 (diff)
downloadjimtcl-4454f2a3aaa7ee629b70274687d3cb4dbf1107dd.zip
jimtcl-4454f2a3aaa7ee629b70274687d3cb4dbf1107dd.tar.gz
jimtcl-4454f2a3aaa7ee629b70274687d3cb4dbf1107dd.tar.bz2
sleep: support sub-second sleep > 1
e.g. sleep 1.5 Signed-off-by: Steve Bennett <steveb@workware.net.au>
Diffstat (limited to 'jim-signal.c')
-rw-r--r--jim-signal.c7
1 files changed, 2 insertions, 5 deletions
diff --git a/jim-signal.c b/jim-signal.c
index 065c0f9..fad8913 100644
--- a/jim-signal.c
+++ b/jim-signal.c
@@ -436,12 +436,9 @@ static int Jim_SleepCmd(Jim_Interp *interp, int argc, Jim_Obj *const *argv)
ret = Jim_GetDouble(interp, argv[1], &t);
if (ret == JIM_OK) {
#ifdef HAVE_USLEEP
- if (t < 1) {
- usleep(t * 1e6);
- }
- else
+ usleep((int)((t - (int)t) * 1e6));
#endif
- sleep(t);
+ sleep(t);
}
}