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