const POLLIN = $001; POLLPRI = $002; POLLOUT = $004; POLLRDNORM = $040; POLLRDBAND = $080; POLLWRNORM = $100; POLLWRBAND = $200; POLLMSG = $400; POLLERR = $008; POLLHUP = $010; POLLNVAL = $020; { --------------------------------------------------------------------- Borland compatibility types ---------------------------------------------------------------------} // Type