musl-tcc/src/prng/lrand48.c

14 lines
196 B
C
Raw Normal View History

2022-03-20 08:48:53 +00:00
#include <stdlib.h>
#include <inttypes.h>
#include "rand48.h"
long nrand48(unsigned short s[3])
{
return __rand48_step(s, __seed48+3) >> 17;
}
long lrand48(void)
{
return nrand48(__seed48);
}