1 /* Copyright (c) 1979 Regents of the University of California */ 2 3 static char sccsid[] = "@(#)SCLCK.c 1.2 03/07/81"; 4 5 long 6 SCLCK() 7 { 8 long tim[4]; 9 10 times(tim); 11 return (tim[1] * 50) / 3; 12 } 13