readstring1

[procedure] readstring1 s (o eof nil)

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