diff options
author | wollman <wollman@FreeBSD.org> | 1994-09-23 00:37:55 +0000 |
---|---|---|
committer | wollman <wollman@FreeBSD.org> | 1994-09-23 00:37:55 +0000 |
commit | 4c045ca123398a5109e2d35cf6cbfb3c2bb9df93 (patch) | |
tree | 765891a14c11280bc539082a7de5e9dd7846bb99 /lib/libc/gen/erand48.c | |
parent | eed32da9d43503cb4e88bc1ce7ca4ab638214d91 (diff) | |
download | FreeBSD-src-4c045ca123398a5109e2d35cf6cbfb3c2bb9df93.zip FreeBSD-src-4c045ca123398a5109e2d35cf6cbfb3c2bb9df93.tar.gz |
Added *ran48 functions, and put them in the correct place this time.
Obtained from: 1.1.5
Diffstat (limited to 'lib/libc/gen/erand48.c')
-rw-r--r-- | lib/libc/gen/erand48.c | 23 |
1 files changed, 23 insertions, 0 deletions
diff --git a/lib/libc/gen/erand48.c b/lib/libc/gen/erand48.c new file mode 100644 index 0000000..286904c --- /dev/null +++ b/lib/libc/gen/erand48.c @@ -0,0 +1,23 @@ +/* + * Copyright (c) 1993 Martin Birgmeier + * All rights reserved. + * + * You may redistribute unmodified or modified versions of this source + * code provided that the above copyright notice and this and the + * following conditions are retained. + * + * This software is provided ``as is'', and comes with no warranties + * of any kind. I shall in no event be liable for anything that happens + * to anyone/anything when using this software. + */ + +#include "rand48.h" + +double +erand48(unsigned short xseed[3]) +{ + _dorand48(xseed); + return ldexp((double) xseed[0], -48) + + ldexp((double) xseed[1], -32) + + ldexp((double) xseed[2], -16); +} |