Displaying 1 result from an estimated 1 matches for "tblmask".
Did you mean:
tblack
2017 Oct 18
1
uniform sampling without replacement algorithm
...ining, with linear search. */
/* Decide on the size of the hash table. */
unsigned tblsize, mintblsize;
mintblsize = 1.5 * k;
tblsize = 32;
while (tblsize < 0x80000000U && tblsize < mintblsize)
tblsize <<= 1;
unsigned tblmask = tblsize - 1;
/* Allocate hash table, as auto variable if small, else with R_alloc. */
struct tblentry { int pos, val; } *tbl;
struct tblentry local [ tblsize < 1000 ? tblsize : 1 ];
void *vmax = VMAXGET();
tbl = tblsize < 1000 ? local...