jrand48.c revision 1.3 
11.1Sbrezak/*
21.1Sbrezak * Copyright (c) 1993 Martin Birgmeier
31.1Sbrezak * All rights reserved.
41.1Sbrezak *
51.1Sbrezak * You may redistribute unmodified or modified versions of this source
61.1Sbrezak * code provided that the above copyright notice and this and the
71.1Sbrezak * following conditions are retained.
81.1Sbrezak *
91.1Sbrezak * This software is provided ``as is'', and comes with no warranties
101.1Sbrezak * of any kind. I shall in no event be liable for anything that happens
111.1Sbrezak * to anyone/anything when using this software.
121.1Sbrezak */
131.1Sbrezak
141.3Sjtc#include "namespace.h"
151.1Sbrezak#include "rand48.h"
161.3Sjtc
171.3Sjtc#ifdef __weak_alias
181.3Sjtc__weak_alias(jrand48,_jrand48);
191.3Sjtc#endif
201.1Sbrezak
211.1Sbrezaklong
221.1Sbrezakjrand48(unsigned short xseed[3])
231.1Sbrezak{
241.2Sjtc	__dorand48(xseed);
251.1Sbrezak	return ((long) xseed[2] << 16) + (long) xseed[1];
261.1Sbrezak}
27