RosettaCodeData/Task/Input-loop/Picat/input-loop.picat
2023-07-01 13:44:08 -04:00

7 lines
141 B
Text

main =>
Reader = open("file.txt"),
while(not at_end_of_stream(Reader))
L = read_line(Reader),
println(L)
end,
close(Reader).