•rand (simpler)

This commit is contained in:
Jesus Galan Lopez (yy) 2021-09-04 19:25:27 +02:00
parent 93caa03983
commit 72a5167813

View File

@ -422,10 +422,8 @@ B makeRand_c1(B t, B x) {
static B randNS;
B getRandNS() {
if (randNS.u == 0) {
B fn = bqn_exec(m_str32(U"•MakeRand"), emptyCVec(), emptySVec());
randNS = c1(fn,m_f64(RANDSEED));
randNS = c1(bi_makeRand,m_f64(RANDSEED));
gc_add(randNS);
dec(fn);
}
return inc(randNS);
}