| Index: fusl/src/prng/lrand48.c
|
| diff --git a/fusl/src/prng/lrand48.c b/fusl/src/prng/lrand48.c
|
| new file mode 100644
|
| index 0000000000000000000000000000000000000000..a3c4e4e2b2bb09e69627a7bbd0ff655c1f4eec8a
|
| --- /dev/null
|
| +++ b/fusl/src/prng/lrand48.c
|
| @@ -0,0 +1,15 @@
|
| +#include <stdlib.h>
|
| +#include <inttypes.h>
|
| +
|
| +uint64_t __rand48_step(unsigned short *xi, unsigned short *lc);
|
| +extern unsigned short __seed48[7];
|
| +
|
| +long nrand48(unsigned short s[3])
|
| +{
|
| + return __rand48_step(s, __seed48+3) >> 17;
|
| +}
|
| +
|
| +long lrand48(void)
|
| +{
|
| + return nrand48(__seed48);
|
| +}
|
|
|