Chameleon

Chameleon Svn Source Tree

Root/branches/Chimera/i386/modules/klibc/srand48.c

1/*
2 * srand48.c
3 */
4
5#include <stdlib.h>
6#include <stdint.h>
7
8extern unsigned short __rand48_seed[3];/* Common with mrand48.c, lrand48.c */
9
10void srand48(long seedval)
11{
12__rand48_seed[0] = 0x330e;
13__rand48_seed[1] = (unsigned short)seedval;
14__rand48_seed[2] = (unsigned short)((uint32_t) seedval >> 16);
15}
16

Archive Download this file

Revision: 2225