09/06/14 02:06:33
Location: URLﾘﾝｸ(gigamonkeys.com)
Copyright ← 2003-2005, Peter Seibel
14. Files and File I/O
で
(let ((in (open "/some/file/name.txt" :if-does-not-exist nil)))
(when in
(format t "~a~%" (read-line in))
(close in)))
を習ったんだけど、一行ずつ足す方法ってどうやるんですか?
string-to-integerみたいな関数はないの?
$ seq 1 100 > /some/file/name.txt