21 lines
281 B
C
21 lines
281 B
C
#if !defined(lint) && defined(SCCSIDS)
|
|
static char sccsid[] = "@(#)rand.c 1.1 92/07/30 SMI"; /* from S5R2 1.2 */
|
|
#endif
|
|
|
|
/*LINTLIBRARY*/
|
|
|
|
static long randx=1;
|
|
|
|
void
|
|
srand(x)
|
|
unsigned x;
|
|
{
|
|
randx = x;
|
|
}
|
|
|
|
int
|
|
rand()
|
|
{
|
|
return(((randx = randx * 1103515245L + 12345)>>16) & 0x7fff);
|
|
}
|