path: root/fpcsrc/tests/test/tforin19.pp

{$mode objfpc}
{$apptype console}
var
  ch: Char;
begin
  for ch in [] do Writeln(ch);
end.