Home | History | Annotate | Line # | Download | only in stdlib
nrand48.c revision 1.10
      1  1.10     matt /*	$NetBSD: nrand48.c,v 1.10 2013/10/22 08:08:51 matt Exp $	*/
      2   1.4    perry 
      3   1.1   brezak /*
      4   1.1   brezak  * Copyright (c) 1993 Martin Birgmeier
      5   1.1   brezak  * All rights reserved.
      6   1.1   brezak  *
      7   1.1   brezak  * You may redistribute unmodified or modified versions of this source
      8   1.1   brezak  * code provided that the above copyright notice and this and the
      9   1.1   brezak  * following conditions are retained.
     10   1.1   brezak  *
     11   1.1   brezak  * This software is provided ``as is'', and comes with no warranties
     12   1.1   brezak  * of any kind. I shall in no event be liable for anything that happens
     13   1.1   brezak  * to anyone/anything when using this software.
     14   1.1   brezak  */
     15   1.1   brezak 
     16   1.9    lukem #include <sys/cdefs.h>
     17   1.9    lukem #if defined(LIBC_SCCS) && !defined(lint)
     18  1.10     matt __RCSID("$NetBSD: nrand48.c,v 1.10 2013/10/22 08:08:51 matt Exp $");
     19   1.9    lukem #endif /* LIBC_SCCS and not lint */
     20   1.9    lukem 
     21   1.3      jtc #include "namespace.h"
     22   1.6    lukem 
     23   1.6    lukem #include <assert.h>
     24   1.6    lukem 
     25   1.1   brezak #include "rand48.h"
     26   1.3      jtc 
     27   1.3      jtc #ifdef __weak_alias
     28   1.8  mycroft __weak_alias(nrand48,_nrand48)
     29   1.3      jtc #endif
     30   1.1   brezak 
     31   1.1   brezak long
     32   1.1   brezak nrand48(unsigned short xseed[3])
     33   1.1   brezak {
     34   1.6    lukem 	_DIAGASSERT(xseed != NULL);
     35   1.6    lukem 
     36   1.2      jtc 	__dorand48(xseed);
     37  1.10     matt 	return xseed[2] * 32768 + (xseed[1] >> 1);
     38   1.1   brezak }
     39