===================================================================
RCS file: /home/cvs/OpenXM/src/asir-doc/parts/builtin/io.texi,v
retrieving revision 1.12
retrieving revision 1.13
diff -u -p -r1.12 -r1.13
--- OpenXM/src/asir-doc/parts/builtin/io.texi	2003/11/01 23:58:44	1.12
+++ OpenXM/src/asir-doc/parts/builtin/io.texi	2003/11/27 15:56:08	1.13
@@ -1,4 +1,4 @@
-@comment $OpenXM: OpenXM/src/asir-doc/parts/builtin/io.texi,v 1.11 2003/04/20 08:01:28 noro Exp $
+@comment $OpenXM: OpenXM/src/asir-doc/parts/builtin/io.texi,v 1.12 2003/11/01 23:58:44 takayama Exp $
 \BJP
 @node 入出力,,, 組み込み函数
 @section 入出力
@@ -16,6 +16,7 @@
 * bsave bload::
 * bload27::
 * print::
+* access::
 * open_file close_file get_line get_byte put_byte purge_stdin::
 @end menu
 
@@ -532,6 +533,32 @@ print(""); @}
 [9] cat([xyz,123,"gahaha"])$
 xyz123gahaha
 @end example
+
+\JP @node access,,, 入出力
+\EG @node aceess,,, Inputs and Outputs
+@subsection @code{access}
+@findex access
+
+@table @t
+@item access(@var{file})
+\JP :: @var{file} の存在をテストする. 
+\EG :: testing an existence of @var{file}.
+@end table
+
+@table @var
+@item return
+0 or 1
+@item file
+\JP ファイル名
+\EG filename
+@end table
+
+@itemize @bullet
+\BJP
+@item
+@var{file} が存在すれば 1, 存在しなければ 0 を返す. 
+\E
+@end itemize
 
 \JP @node open_file close_file get_line get_byte put_byte purge_stdin,,, 入出力
 \EG @node open_file close_file get_line get_byte put_byte purge_stdin,,, Inputs and Outputs