summaryrefslogtreecommitdiff
path: root/fpcdocs/refex/ex19.pp
blob: f9b6c6254c1a9fb16982e6d2a98067730c10bbfd (plain)
1
2
3
4
5
6
7
8
9
10
11
12
Program Example19;

{ Program to demonstrate the Eoln function. }

begin
  { This program waits for keyboard input. }
  { It will print True when an empty line is put in,
    and false when you type a non-empty line.
    It will only stop when you press enter.}
  While not Eoln do
    Writeln (eoln);
end.