ref: c2a5d7e3f28e86aeef1e4e37e2b88e46af90b62c
dir: /sys/src/libc/port/lnrand.c/
#include <u.h>
#include <libc.h>
#define MASK 0x7fffffffL
long
lnrand(long n)
{
long slop, v;
if(n < 0)
return n;
slop = MASK % n;
do
v = lrand();
while(v <= slop);
return v % n;
}