「Close」の版間の差分

提供:GizmoLabs - だいたい CAD LISP なサイト
編集の要約なし
(相違点なし)

2009年11月9日 (月) 10:14時点における版

構文
(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) 



関連事項