Update of /cvsroot/q-lang/q/modules/clib
In directory sc8-pr-cvs16.sourceforge.net:/tmp/cvs-serv2239
Modified Files:
clib.c
Log Message:
bugfix: timeout is specified in seconds, not milliseconds
Index: clib.c
===================================================================
RCS file: /cvsroot/q-lang/q/modules/clib/clib.c,v
retrieving revision 1.86
retrieving revision 1.87
diff -C2 -d -r1.86 -r1.87
*** clib.c 22 Feb 2008 07:47:51 -0000 1.86
--- clib.c 22 Feb 2008 08:12:38 -0000 1.87
***************
*** 5784,5788 ****
unsigned long secs;
unsigned long nsecs;
! fp = modf(t/1e3, &ip);
if (ip > LONG_MAX) { ip = (double)LONG_MAX; fp = 0.0; }
secs = (unsigned long)ip;
--- 5784,5788 ----
unsigned long secs;
unsigned long nsecs;
! fp = modf(t, &ip);
if (ip > LONG_MAX) { ip = (double)LONG_MAX; fp = 0.0; }
secs = (unsigned long)ip;
***************
*** 5897,5901 ****
unsigned long secs;
unsigned long nsecs;
! fp = modf(t/1e3, &ip);
if (ip > LONG_MAX) { ip = (double)LONG_MAX; fp = 0.0; }
secs = (unsigned long)ip;
--- 5897,5901 ----
unsigned long secs;
unsigned long nsecs;
! fp = modf(t, &ip);
if (ip > LONG_MAX) { ip = (double)LONG_MAX; fp = 0.0; }
secs = (unsigned long)ip;
|
