XPost: comp.lang.scheme
Ken Tilton wrote:
How about?:
(loop for drink in list-of-drinks
collecting (list drink (random 100)))
Gauche Scheme
(use srfi-27) ;; random-integer
(map (cut list <> (random-integer 100)) '(g h i j))
===>
((g 79) (h 3) (i 36) (j 84))
--- SoupGate-Win32 v1.05
* Origin: fsxNet Usenet Gateway (21:1/5)