2.9BSD/usr/src/lib/c/gen/rand.c

Compare this file to the similar file:
Show the results in this format:

/*	@(#)rand.c	2.1	SCCS id keyword	*/
static	long	randx = 1;

srand(x)
unsigned x;
{
	randx = x;
}

rand()
{
	return(((randx = randx*1103515245 + 12345)>>16) & 077777);
}