Source position: unixutils.pp line 115
procedure fcntl(
Handle: Integer;
Command: Integer;
var Lock: TFlock
);