1 |
|
|
/* $OpenBSD: nrand48.c,v 1.3 2005/08/08 08:05:37 espie Exp $ */ |
2 |
|
|
/* |
3 |
|
|
* Copyright (c) 1993 Martin Birgmeier |
4 |
|
|
* All rights reserved. |
5 |
|
|
* |
6 |
|
|
* You may redistribute unmodified or modified versions of this source |
7 |
|
|
* code provided that the above copyright notice and this and the |
8 |
|
|
* following conditions are retained. |
9 |
|
|
* |
10 |
|
|
* This software is provided ``as is'', and comes with no warranties |
11 |
|
|
* of any kind. I shall in no event be liable for anything that happens |
12 |
|
|
* to anyone/anything when using this software. |
13 |
|
|
*/ |
14 |
|
|
|
15 |
|
|
#include "rand48.h" |
16 |
|
|
|
17 |
|
|
long |
18 |
|
|
nrand48(unsigned short xseed[3]) |
19 |
|
|
{ |
20 |
|
|
__dorand48(xseed); |
21 |
|
|
return ((long) xseed[2] << 15) + ((long) xseed[1] >> 1); |
22 |
|
|
} |