arc> (readline)hello world! "hello world!\r"
(def myreadline () (let x (readline) (if (is x "\r") (readline) x)))
arc> (repeat 3 (myreadline)) 1 2 3 nil arc>
-----