/*-
 * Copyright (c) 1979 The Regents of the University of California.
 * All rights reserved.
 *
 * %sccs.include.redist.c%
 */

#ifndef lint
static char sccsid[] = "@(#)SCLCK.c	1.4 (Berkeley) 06/29/90";
#endif /* not lint */

#include <sys/time.h>
#include <sys/resource.h>

long
SCLCK()
{
	struct rusage ru;

	if (getrusage(RUSAGE_SELF, &ru) < 0)
		return (-1);
	return (ru.ru_stime.tv_sec * 1000 + ru.ru_stime.tv_usec / 1000);
}