summaryrefslogtreecommitdiffstats
path: root/compat/gettod.c
diff options
context:
space:
mode:
authordkf <dkf@noemail.net>2007-04-16 13:36:33 (GMT)
committerdkf <dkf@noemail.net>2007-04-16 13:36:33 (GMT)
commit456b27b65d6a747ee743d375a87577bc18563b23 (patch)
tree88437ef1c667959b00a3b86ee638cc3a94300aab /compat/gettod.c
parentc6c59eac39637cd6e0216f003ce2a25559a1d714 (diff)
downloadtcl-456b27b65d6a747ee743d375a87577bc18563b23.zip
tcl-456b27b65d6a747ee743d375a87577bc18563b23.tar.gz
tcl-456b27b65d6a747ee743d375a87577bc18563b23.tar.bz2
Complete the purge of K&R function definitions from manually-written code.
FossilOrigin-Name: 645aed2fcdcd55ca81df269a4ea262eeca2b9ff2
Diffstat (limited to 'compat/gettod.c')
-rw-r--r--compat/gettod.c9
1 files changed, 5 insertions, 4 deletions
diff --git a/compat/gettod.c b/compat/gettod.c
index 98758e6..179491b 100644
--- a/compat/gettod.c
+++ b/compat/gettod.c
@@ -9,7 +9,7 @@
* See the file "license.terms" for information on usage and redistribution
* of this file, and for a DISCLAIMER OF ALL WARRANTIES.
*
- * RCS: @(#) $Id: gettod.c,v 1.3 2004/04/06 22:25:47 dgp Exp $
+ * RCS: @(#) $Id: gettod.c,v 1.4 2007/04/16 13:36:34 dkf Exp $
*/
#include "tclPort.h"
@@ -18,11 +18,12 @@
#undef timezone
int
-gettimeofday(tp, tz)
-struct timeval *tp;
-struct timezone *tz;
+gettimeofday(
+ struct timeval *tp,
+ struct timezone *tz)
{
struct timeb t;
+
ftime(&t);
tp->tv_sec = t.time;
tp->tv_usec = t. millitm * 1000;