# test the improved readline handling that does not care whether its
# Macintosh, Unix or Windows text format.
var
inp: TFile
line: string
if openFile(inp, "readme.txt"):
while not EndOfFile(inp):
line = readLine(inp)
echo("#" & line & "#")
closeFile(inp)