Word description Call the quot, which should output an object and a bool, and collect the objects in array until quot outputs f. Do collect the last object.
Examples
USING: sequences.extras prettyprint io.encodings.binary
random random.mersenne-twister kernel math ;
123 <mersenne-twister> [
[
10 random dup 5 >
] loop>array* .
] with-random { 6 7 2 }