| version 1.9, 2002/09/03 01:50:59 |
version 1.16, 2008/07/17 15:01:10 |
|
|
| @comment $OpenXM: OpenXM/src/asir-doc/parts/builtin/io.texi,v 1.8 2002/07/15 01:58:24 takayama Exp $ |
@comment $OpenXM: OpenXM/src/asir-doc/parts/builtin/io.texi,v 1.15 2003/12/20 13:38:04 ohara Exp $ |
| \BJP |
\BJP |
| @node $BF~=PNO(B,,, $BAH$_9~$_H!?t(B |
@node $BF~=PNO(B,,, $BAH$_9~$_H!?t(B |
| @section $BF~=PNO(B |
@section $BF~=PNO(B |
|
|
| * bsave bload:: |
* bsave bload:: |
| * bload27:: |
* bload27:: |
| * print:: |
* print:: |
| |
* access:: |
| |
* remove_file:: |
| * open_file close_file get_line get_byte put_byte purge_stdin:: |
* open_file close_file get_line get_byte put_byte purge_stdin:: |
| @end menu |
@end menu |
| |
|
| Line 492 On Windows one has to use @samp{/} as the separator of |
|
| Line 494 On Windows one has to use @samp{/} as the separator of |
|
| @var{obj} $B$rI>2A$7$FI=<($9$k(B. |
@var{obj} $B$rI>2A$7$FI=<($9$k(B. |
| @item |
@item |
| $BBh(B 2 $B0z?t$,$J$$$+(B, $B$^$?$O(B 0, 2 $B0J30$N>l9g(B, $B2~9T$9$k(B. |
$BBh(B 2 $B0z?t$,$J$$$+(B, $B$^$?$O(B 0, 2 $B0J30$N>l9g(B, $B2~9T$9$k(B. |
| $BBh(B 2 $B0z?t$,(B 1 $B$N>l9g(B, $B2~9T$;$:(B, $B=PNO$O%P%C%U%!$K=q$-9~$^$l(B, |
$BBh(B 2 $B0z?t$,(B 0 $B$N>l9g(B, $B2~9T$;$:(B, $B=PNO$O%P%C%U%!$K=q$-9~$^$l(B, |
| $B%P%C%U%!$O%U%i%C%7%e$5$l$J$$(B. |
$B%P%C%U%!$O%U%i%C%7%e$5$l$J$$(B. |
| $BBh(B 2 $B0z?t$,(B 2 $B$N>l9g(B, $B2~9T$7$J$$$,%P%C%U%!$O%U%i%C%7%e$5$l$k(B. |
$BBh(B 2 $B0z?t$,(B 2 $B$N>l9g(B, $B2~9T$7$J$$$,%P%C%U%!$O%U%i%C%7%e$5$l$k(B. |
| @item |
@item |
| Line 521 The last 0 will not be printed. ) |
|
| Line 523 The last 0 will not be printed. ) |
|
| @item |
@item |
| Formatted outputs are not currently supported. |
Formatted outputs are not currently supported. |
| If one wishes to output multiple objects by a single @code{print()} command, |
If one wishes to output multiple objects by a single @code{print()} command, |
| use list like @code{[@var{obj1,...}]}, which is not so beautiful, but |
use list like @code{[@var{obj1},...]}, which is not so beautiful, but |
| convenient to minimize programming efforts. |
convenient to minimize programming efforts. |
| \E |
\E |
| @end itemize |
@end itemize |
| |
|
| @example |
@example |
| [8] def cat(L) @{ while ( L != [] ) @{ print(car(L),0); L = cdr(L);@} print(""); @} |
[8] def cat(L) @{ while ( L != [] ) @{ print(car(L),0); L = cdr(L);@} |
| |
print(""); @} |
| [9] cat([xyz,123,"gahaha"])$ |
[9] cat([xyz,123,"gahaha"])$ |
| xyz123gahaha |
xyz123gahaha |
| @end example |
@end example |
| |
|
| |
\JP @node access,,, $BF~=PNO(B |
| |
\EG @node access,,, Inputs and Outputs |
| |
@subsection @code{access} |
| |
@findex access |
| |
|
| |
@table @t |
| |
@item access(@var{file}) |
| |
\JP :: @var{file} $B$NB8:_$r%F%9%H$9$k(B. |
| |
\EG :: testing an existence of @var{file}. |
| |
@end table |
| |
|
| |
@table @var |
| |
@item return |
| |
(1|0) |
| |
@item file |
| |
\JP $B%U%!%$%kL>(B |
| |
\EG filename |
| |
@end table |
| |
|
| |
@itemize @bullet |
| |
\BJP |
| |
@item |
| |
@var{file} $B$,B8:_$9$l$P(B 1, $BB8:_$7$J$1$l$P(B 0 $B$rJV$9(B. |
| |
\E |
| |
@end itemize |
| |
|
| |
\JP @node remove_file,,, $BF~=PNO(B |
| |
\EG @node remove_file,,, Inputs and Outputs |
| |
@subsection @code{remove_file} |
| |
@findex remove_file |
| |
|
| |
@table @t |
| |
@item remove_file(@var{file}) |
| |
\JP :: @var{file} $B$r>C5n$9$k(B. |
| |
\EG :: Delete an file @var{file}. |
| |
@end table |
| |
|
| |
@table @var |
| |
@item return |
| |
1 |
| |
@item file |
| |
\JP $B%U%!%$%kL>(B |
| |
\EG filename |
| |
@end table |
| |
|
| \JP @node open_file close_file get_line get_byte put_byte purge_stdin,,, $BF~=PNO(B |
\JP @node open_file close_file get_line get_byte put_byte purge_stdin,,, $BF~=PNO(B |
| \EG @node open_file close_file get_line get_byte put_byte purge_stdin,,, Inputs and Outputs |
\EG @node open_file close_file get_line get_byte put_byte purge_stdin,,, Inputs and Outputs |
| @subsection @code{open_file}, @code{close_file}, @code{get_line}, @code{get_byte}, @code{put_byte}, @code{purge_stdin} |
@subsection @code{open_file}, @code{close_file}, @code{get_line}, @code{get_byte}, @code{put_byte}, @code{purge_stdin} |
|
|
| \JP :: $B<1JL;R(B @var{num} $B$N%U%!%$%k$K(B 1 $B%P%$%H(B @var{c} $B$r=q$/(B. |
\JP :: $B<1JL;R(B @var{num} $B$N%U%!%$%k$K(B 1 $B%P%$%H(B @var{c} $B$r=q$/(B. |
| \EG :: Writes a byte @var{c} to the file indicated by a descriptor @var{num}. |
\EG :: Writes a byte @var{c} to the file indicated by a descriptor @var{num}. |
| @item purge_stdin() |
@item purge_stdin() |
| @item purge_stdin() |
|
| \JP :: $BI8=`F~NO$N%P%C%U%!$r%/%j%"$9$k(B. |
\JP :: $BI8=`F~NO$N%P%C%U%!$r%/%j%"$9$k(B. |
| \EG :: Clears the buffer for the standard input. |
\EG :: Clears the buffer for the standard input. |
| @end table |
@end table |
|
|
| $BMQ$N>l9g(B @code{"w"}, $BKvHxDI2C$N>l9g(B @code{"a"} $B$J$I(B. |
$BMQ$N>l9g(B @code{"w"}, $BKvHxDI2C$N>l9g(B @code{"a"} $B$J$I(B. |
| $B@.8y$7$?>l9g(B, $B%U%!%$%k<1JL;R$H$7$FHsIi@0?t$rJV$9(B. $B<:GT$N>l9g%(%i!<$H$J$k(B. |
$B@.8y$7$?>l9g(B, $B%U%!%$%k<1JL;R$H$7$FHsIi@0?t$rJV$9(B. $B<:GT$N>l9g%(%i!<$H$J$k(B. |
| $BITMW$K$J$C$?%U%!%$%k$O(B @code{close_file()} $B$G%/%m!<%:$9$k(B. |
$BITMW$K$J$C$?%U%!%$%k$O(B @code{close_file()} $B$G%/%m!<%:$9$k(B. |
| |
$BFCJL$J%U%!%$%kL>(B unix://stdin, unix://stdout, unix://stderr $B$rM?$($k$H(B |
| |
$B$=$l$>$lI8=`F~NO(B, $BI8=`=PNO(B, $BI8=`%(%i!<=PNO$r%*!<%W%s$9$k(B. |
| |
$B$3$N>l9g%b!<%I;XDj$OL5;k$5$l$k(B. |
| @item @code{get_line()} $B$O8=:_%*!<%W%s$7$F$$$k%U%!%$%k$+$i(B 1 $B9TFI$_(B, |
@item @code{get_line()} $B$O8=:_%*!<%W%s$7$F$$$k%U%!%$%k$+$i(B 1 $B9TFI$_(B, |
| $BJ8;zNs$H$7$FJV$9(B. $B0z?t$,$J$$>l9g(B, $BI8=`F~NO$+$i(B 1 $B9TFI$`(B. |
$BJ8;zNs$H$7$FJV$9(B. $B0z?t$,$J$$>l9g(B, $BI8=`F~NO$+$i(B 1 $B9TFI$`(B. |
| @item @code{get_byte()} $B$O8=:_%*!<%W%s$7$F$$$k%U%!%$%k$+$i(B 1 $B%P%$%HFI$_(B |
@item @code{get_byte()} $B$O8=:_%*!<%W%s$7$F$$$k%U%!%$%k$+$i(B 1 $B%P%$%HFI$_(B |
| Line 614 The stream pointer is set at the end of the file. |
|
| Line 664 The stream pointer is set at the end of the file. |
|
| If successful, it returns a non-negative integer as the file descriptor. |
If successful, it returns a non-negative integer as the file descriptor. |
| Otherwise the system error function is called. |
Otherwise the system error function is called. |
| Unnecessary files should be closed by @code{close_file()}. |
Unnecessary files should be closed by @code{close_file()}. |
| |
If the special file name unix://stdin or unix://stdout or unix://stderr |
| |
is given, it returns the file descriptor for the standard input or |
| |
the standard output or the standard error stream respectively. |
| |
The mode argument is ignored in this case. |
| @item @code{get_line()} reads a line from an opened file and returns the |
@item @code{get_line()} reads a line from an opened file and returns the |
| line as a string. If no argument is supplied, it reads a line from the |
line as a string. If no argument is supplied, it reads a line from the |
| standard input. |
standard input. |
![[BACK]](/icons/cvsweb/back.gif){kind=icon}
Return to io.texi CVS log ![[TXT]](/icons/cvsweb/text.gif){kind=icon}
![[DIR]](/icons/cvsweb/dir.gif){kind=icon}
Up to [local] / OpenXM / src / asir-doc / parts / builtin