time.c

数据挖掘经典的hierarchial clustering algorithm

==============================

  Under no circumstances is this software to be copied, distributed,
  or altered in any way without prior permission from the DEVise
  Development Group.
*/

/*
  $Id: Time.c,v 1.6 1996/10/01 14:00:26 wenger Exp $

  $Log: Time.c,v $
  Revision 1.6  1996/10/01 14:00:26  wenger
  Removed extra path info from includes.

  Revision 1.5  1996/07/17 00:47:03  jussi
  Switched the order of header file inclusions to get around
  some problems.

  Revision 1.4  1996/03/26 15:34:36  wenger
  Fixed various compile warnings and errors; added 'clean' and
  'mostlyclean' targets to makefiles; changed makefiles so that
  object lists are derived from source lists.

  Revision 1.3  1995/12/02 20:55:53  jussi
  Substituted DeviseTime for Time and added copyright notice.

  Revision 1.2  1995/09/05 21:13:05  jussi
  Added/updated CVS header.
*/

#include <time.h>

#include "machdep.h"
#include "Time.h"

struct timeval DeviseTime::_beginning;

/***********************************************************/

void DeviseTime::Init()
{
  struct timezone zone;
  gettimeofday(&_beginning, &zone);
}

/***********************************************************/

long DeviseTime::Now()
{
  struct timezone zone;
  struct timeval now;
  gettimeofday(&now,&zone);

  return (now.tv_sec - _beginning.tv_sec) * 1000+
    (now.tv_usec - _beginning.tv_usec) / 1000;
}