•rand (simpler)
This commit is contained in:
parent
93caa03983
commit
72a5167813
@ -422,10 +422,8 @@ B makeRand_c1(B t, B x) {
|
|||||||
static B randNS;
|
static B randNS;
|
||||||
B getRandNS() {
|
B getRandNS() {
|
||||||
if (randNS.u == 0) {
|
if (randNS.u == 0) {
|
||||||
B fn = bqn_exec(m_str32(U"•MakeRand"), emptyCVec(), emptySVec());
|
randNS = c1(bi_makeRand,m_f64(RANDSEED));
|
||||||
randNS = c1(fn,m_f64(RANDSEED));
|
|
||||||
gc_add(randNS);
|
gc_add(randNS);
|
||||||
dec(fn);
|
|
||||||
}
|
}
|
||||||
return inc(randNS);
|
return inc(randNS);
|
||||||
}
|
}
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user