(loop(format t"~a "(read)))