1*1700Smckusick /* Copyright (c) 1979 Regents of the University of California */ 2*1700Smckusick 3*1700Smckusick static char sccsid[] = "@(#)SEED.c 1.1 10/30/80"; 4*1700Smckusick 5*1700Smckusick SEED(value) 6*1700Smckusick 7*1700Smckusick long value; 8*1700Smckusick { 9*1700Smckusick static long seed; 10*1700Smckusick long tmp; 11*1700Smckusick 12*1700Smckusick srand(value); 13*1700Smckusick tmp = seed; 14*1700Smckusick seed = value; 15*1700Smckusick return tmp; 16*1700Smckusick } 17