const
   FIOSETOWN = $8901;
   SIOCSPGRP = $8902;
   FIOGETOWN = $8903;
   SIOCGPGRP = $8904;
   SIOCATMARK = $8905;
   SIOCGSTAMP = $8906;

{ ---------------------------------------------------------------------
    Borland compatibility types
  ---------------------------------------------------------------------}

// Type