2004-06-13 Steven G. Kargl <kargls@comcast.net>

* random.c (random_r4): Burn a random number.
(random_r8): fix infinite loop.


git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@83062 138bc75d-0d04-0410-961f-82ee72b054a4