diff options
| author | Petter Rodhelind <petter.rodhelind@gmail.com> | 2017-09-28 11:20:22 +0200 |
|---|---|---|
| committer | Petter Rodhelind <petter.rodhelind@gmail.com> | 2017-09-28 11:20:22 +0200 |
| commit | ed9342b2a15fcb98a5e1641b291b9d51f00538e8 (patch) | |
| tree | fae6678eac643e3b220ac1cf5529a81f780fe475 /src/lib9 | |
| parent | 3792be8ab8fe8253fa4758a646963eb7fb95b390 (diff) | |
| parent | 3f8ac29339ad67f05d32064fcc810035d55a3985 (diff) | |
| download | plan9port-ed9342b2a15fcb98a5e1641b291b9d51f00538e8.tar.gz plan9port-ed9342b2a15fcb98a5e1641b291b9d51f00538e8.tar.bz2 plan9port-ed9342b2a15fcb98a5e1641b291b9d51f00538e8.zip | |
Merge remote-tracking branch 'upstream/master'
Diffstat (limited to 'src/lib9')
| -rw-r--r-- | src/lib9/frand.c | 17 | ||||
| -rw-r--r-- | src/lib9/mkfile | 1 |
2 files changed, 18 insertions, 0 deletions
diff --git a/src/lib9/frand.c b/src/lib9/frand.c new file mode 100644 index 00000000..841f9685 --- /dev/null +++ b/src/lib9/frand.c @@ -0,0 +1,17 @@ +#include <u.h> +#include <libc.h> + +#define MASK 0x7fffffffL +#define NORM (1.0/(1.0+MASK)) + +double +p9frand(void) +{ + double x; + + do { + x = lrand() * NORM; + x = (x + lrand()) * NORM; + } while(x >= 1); + return x; +} diff --git a/src/lib9/mkfile b/src/lib9/mkfile index 4bbd0f8b..8f7283ef 100644 --- a/src/lib9/mkfile +++ b/src/lib9/mkfile @@ -102,6 +102,7 @@ LIB9OFILES=\ execl.$O\ exitcode.$O\ fcallfmt.$O\ + frand.$O\ get9root.$O\ getcallerpc-$OBJTYPE.$O\ getenv.$O\ |