11700Smckusick /* Copyright (c) 1979 Regents of the University of California */ 21700Smckusick 3*3031Smckusic static char sccsid[] = "@(#)SEED.c 1.5 03/07/81"; 41700Smckusick 52181Smckusic #include "h00vars.h" 61818Smckusic 7*3031Smckusic long 81700Smckusick SEED(value) 92181Smckusic long value; 101700Smckusick { 112181Smckusic long tmp; 121700Smckusick 132181Smckusic tmp = _seed; 142181Smckusic _seed = value; 151700Smckusick return tmp; 161700Smckusick } 17