(def readstring1 (s (o eof nil)) (w/instring i s (read i eof)))

From arc.arc ©