「Close」の版間の差分

提供:GizmoLabs - だいたい CAD LISP なサイト
編集の要約なし
 
編集の要約なし
16行目: 16行目:
; サンプル
; サンプル
: 次のコードは、ファイル somefile.txt の行数を数え、その数を変数 ct に格納する。
: 次のコードは、ファイル somefile.txt の行数を数え、その数を変数 ct に格納する。
<pre class="brush:autolisp;">
  (setq fil "SOMEFILE.TXT")  
  (setq fil "SOMEFILE.TXT")  
  (setq x (open fil "r") ct 0)  
  (setq x (open fil "r") ct 0)  
22行目: 23行目:
  )  
  )  
  (close x)  
  (close x)  
 
</pre>


-----
-----

2011年3月22日 (火) 09:08時点における版

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

関連事項