[fpc-pascal]Read STIN on FreeBSD

[Marco van de Voort]

> so how would one do say echo "hello world" | freepascal-program
> 
> Is that possible on FreeBSD ?

Sure, no problem. The CGI's even function that way. E.g. :

var c : Char;

begin
 While not EOF(input) DO
  begin
   read(c); 
   write(c);
  end;
end.