ストリームのパス
pathname でとれたのね。
(setq x (open "/tmp/foo" :direction :output))
;;=> #<SB-SYS:FD-STREAM for "file /tmp/foo" {100A91F581}>
(pathname x)
;;=> #P"/tmp/foo"
(close x)
;;=> T
(pathname x)
;;=> #P"/tmp/foo"
pathname でとれたのね。
(setq x (open "/tmp/foo" :direction :output))
;;=> #<SB-SYS:FD-STREAM for "file /tmp/foo" {100A91F581}>
(pathname x)
;;=> #P"/tmp/foo"
(close x)
;;=> T
(pathname x)
;;=> #P"/tmp/foo"
投稿者 Yoshinori Tahara 時刻: 23:04
ラベル: Common Lisp
0 件のコメント:
コメントを投稿