xref: /csrg-svn/lib/libc/stdlib/rand.c (revision 1976)
1*1976Swnj /* @(#)rand.c	4.1 (Berkeley) 12/21/80 */
2*1976Swnj static	long	randx = 1;
3*1976Swnj 
4*1976Swnj srand(x)
5*1976Swnj unsigned x;
6*1976Swnj {
7*1976Swnj 	randx = x;
8*1976Swnj }
9*1976Swnj 
10*1976Swnj rand()
11*1976Swnj {
12*1976Swnj 	return((randx = randx * 1103515245 + 12345) & 0x7fffffff);
13*1976Swnj }
14