close (AutoLISP)

開いているファイルを閉じます。

サポートされているプラットフォーム: Windows および Mac OS

構文と要素

(close file-desc)

file-desc

タイプ: ファイル

open 関数で取得されたファイル ディスクリプタ。

戻り値

タイプ: nil

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)