get_line(-result)
get_line(+stream, -result)
get_line/1/2
行を1行読み込みます。ファイルの終了時には失敗します。
引数
result atom
stream atom
例
ファイルをコピーします。minerva -l copyfile aaa.txt bbb.txtで呼び出してください。
main([Infile,Outfile|_]) :-
open(Infile,read,Instream),
open(Outfile,write,Outstream),
copy(Instream,Outstream),
close(Instream),
close(Outstream).
copy(Instream,Outstream) :-
get_line(Instream,Line),
write(Outstream,Line),nl(Outstream),
copy(Instream,Outstream).
copy(_Instream,Outstream) :-
flush_output(Outstream).
標準
この述語は、ISO-Prolog標準に含まれない。
See also
regular expression,
match/2/3,
match_all/3,
substitute/4,
substitute_all/4,
split/2/3,
chop/2,
get_line/1/2,
|
