[fpc-pascal] eof strangeness

[John Coppens]

Hi all.

While modifying some older programs, I found a strange effect with eof
(input). When calling eof(input), the program needs an <enter> key to
continue. 

The definition of eof (according to the FPC docs) is that it immediately
returns... which is what I need. Can anyone suggest a solution for this?

program testeof;

begin
  if eof then
    writeln('EOF found')
  else
    writeln('No EOF found');
end.

This sample program doesn't return till <enter> is pressed.

TIA,
John