/* * gettod.c -- * * This file provides the gettimeofday function on systems * that only have the System V ftime function. * * Copyright (c) 1995 Sun Microsystems, Inc. * * 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.1.1.1 2007/07/10 15:04:23 duncan Exp $ */ #include "tcl.h" #include "tclPort.h" #include #undef timezone int gettimeofday(tp, tz) struct timeval *tp; struct timezone *tz; { struct timeb t; ftime(&t); tp->tv_sec = t.time; tp->tv_usec = t. millitm * 1000; return 0; }