Close

提供:GizmoLabs - だいたい CAD LISP なサイト
2016年5月31日 (火) 13:15時点におけるGizmon (トーク | 投稿記録)による版
(差分) ← 古い版 | 最新版 (差分) | 新しい版 → (差分)
構文
(close file-desc)


機能
開いているファイルを閉じる。


引数
  • file-desc : open 関数で取得されたファイル ディスクリプタ。


戻り値
file-desc が有効な場合は、nil。それ以外の場合は、エラー メッセージが表示される。
close の実行後、ファイル ディスクリプタは変化ないが、有効ではなくなる。 開いたファイルに追加されたデータは、そのファイルを閉じるまで、実際には書き出されない。


サンプル
次のコードは、ファイル somefile.txt の行数を数え、その数を変数 ct に格納する。
 (setq fil "SOMEFILE.TXT") 
 (setq x (open fil "r") ct 0) 
 (while (read-line x) 
   (setq ct (1+ ct)) 
 ) 
 (close x) 

関連事項