1/*	$NetBSD: lcong48.c,v 1.7 2000/01/22 22:19:19 mycroft Exp $	*/
2
3/*
4 * Copyright (c) 1993 Martin Birgmeier
5 * All rights reserved.
6 *
7 * You may redistribute unmodified or modified versions of this source
8 * code provided that the above copyright notice and this and the
9 * following conditions are retained.
10 *
11 * This software is provided ``as is'', and comes with no warranties
12 * of any kind. I shall in no event be liable for anything that happens
13 * to anyone/anything when using this software.
14 */
15
16#include <sys/cdefs.h>
17#if defined(LIBC_SCCS) && !defined(lint)
18__RCSID("$NetBSD$");
19#endif /* LIBC_SCCS and not lint */
20
21#include "namespace.h"
22
23#include <assert.h>
24
25#include "rand48.h"
26
27#ifdef __weak_alias
28__weak_alias(lcong48,_lcong48)
29#endif
30
31void
32lcong48(unsigned short p[7])
33{
34	_DIAGASSERT(p != NULL);
35
36	__rand48_seed[0] = p[0];
37	__rand48_seed[1] = p[1];
38	__rand48_seed[2] = p[2];
39	__rand48_mult[0] = p[3];
40	__rand48_mult[1] = p[4];
41	__rand48_mult[2] = p[5];
42	__rand48_add = p[6];
43}
44