ref: 740b766e5a9b0101225c23a5f9920d7d8b8fc67d
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; }