9 lines
189 B
Text
9 lines
189 B
Text
|
(import (otus random!))
|
||
|
|
|
||
|
|
(for-each (lambda (str)
|
||
|
|
(define timeout (rand! 999))
|
||
|
|
(async (lambda ()
|
||
|
|
(sleep timeout)
|
||
|
|
(print str))))
|
||
|
|
'("Enjoy" "Rosetta" "Code"))
|