franz lisp (random) bug

[Bruce Nemnich]

In the 4.2bsd franz (I don't know about others), (random) has the 
extremely non-random property of alternating even and odd numbers.

To repeat, (loop for i from 1 to 20. collecting (random 2)).

I am not an expert on random-number algorithms, so if anyone has a good
fix, please let me know.
-- 
--Bruce Nemnich, Thinking Machines Corporation, Waltham, MA
  {decvax!cca,ihnp4!mit-eddie,allegra!ias}!godot!bruce, BJN at MIT-MC.ARPA