Anonymous user
File input/output: Difference between revisions
→{{header|PicoLisp}}
(Added PicoLisp) |
|||
Line 920:
(out "output.txt"
(echo) ) )</lang>
=={{header|PL/I}}==
<lang PL/I>
declare in file, out file;
open file (in) title ('/INPUT.TXT,type(text),recsize(100)') input;
open file (out) title ('/OUTPUT.TXT,type(text),recsize(100) output;
do forever;
get file (in) edit (line) (L);
put file (out) edit (line) (A);
end;
</lang>
=={{header|Pop11}}==
| |||