rand.c

来自「unix v7是最后一个广泛发布的研究型UNIX版本」· C语言 代码 · 共 13 行

static	long	randx = 1;

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

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