[fpc-pascal] Flushing serial inque on Linux

[Bernd Mueller]

Hello,

I am trying to flush the serial inque on Linux with no success. So far I 
have:

procedure FlushInQue(lHandle: Longint);
var
    QueSelector: Longint;
begin
    QueSelector:= TCIFLUSH;
    Fpioctl(lHandle, TCFLSH, @QueSelector);
end;

I can read incoming characters, so the connection is ok and lHandle is 
valid. I tried TCIOFLUSH as another QueSelector and tried also ioctl 
instead of Fpioctl.

BTW, I am new to Linux (Ubuntu 6.06) and not really sure, which units I 
have to include: baseunix, oldlinux unix. I tried several combinations.

Thanks, Bernd.