mirror of
https://github.com/c3lang/c3c.git
synced 2026-02-27 12:01:16 +00:00
5c77c9a754
- Order of attribute declaration is changed for `alias`. - Added `LANGUAGE_DEV_VERSION` env constant. - Rename `anyfault` -> `fault`. - Changed `fault` -> `faultdef`. - Added `attrdef` instead of `alias` for attribute aliases.
35 lines
1.1 KiB
Plaintext
35 lines
1.1 KiB
Plaintext
module std::math::random;
|
|
|
|
typedef SimpleRandom (Random) = ulong;
|
|
|
|
|
|
fn void SimpleRandom.set_seed(&self, char[] seed) @dynamic
|
|
{
|
|
char[8] full;
|
|
foreach (i, c : seed)
|
|
{
|
|
full[i % 8] ^= c;
|
|
}
|
|
*self = (SimpleRandom)(bitcast(full, ulong) ^ SIMPLE_RANDOM_MULTIPLIER) & SIMPLE_RANDOM_MASK;
|
|
}
|
|
|
|
fn uint SimpleRandom.next_int(&self) @dynamic
|
|
{
|
|
ulong nextseed = ((ulong)*self * SIMPLE_RANDOM_MULTIPLIER + SIMPLE_RANDOM_ADDEND) & SIMPLE_RANDOM_MASK;
|
|
*self = (SimpleRandom)nextseed;
|
|
return (uint)(nextseed >> (48 - 32));
|
|
}
|
|
|
|
<*
|
|
@require bytes.len > 0
|
|
*>
|
|
fn void SimpleRandom.next_bytes(&self, char[] bytes) @dynamic => @random_value_to_bytes(self.next_int, bytes);
|
|
fn uint128 SimpleRandom.next_int128(&self) @dynamic => @long_to_int128(self.next_long());
|
|
fn ulong SimpleRandom.next_long(&self) @dynamic => @int_to_long(self.next_int());
|
|
fn ushort SimpleRandom.next_short(&self) @dynamic => (ushort)self.next_int();
|
|
fn char SimpleRandom.next_byte(&self) @dynamic => (char)self.next_int();
|
|
|
|
const long SIMPLE_RANDOM_MULTIPLIER @local = 0x5DEECE66D;
|
|
const long SIMPLE_RANDOM_ADDEND @local = 0xB;
|
|
const long SIMPLE_RANDOM_MASK @local = (1u64 << 48) - 1;
|