4 * Copyright (c) 1997-8 Graham Barr <gbarr@pobox.com>. All rights reserved.
5 * This program is free software; you can redistribute it and/or
6 * modify it under the same terms as Perl itself.
13 #if (defined(HAS_POLL) && defined(I_POLL)) || defined(POLLWRBAND)
19 /* We shall emulate poll using select */
21 #define EMULATE_POLL_WITH_SELECT
26 #define poll Perl_my_poll
28 typedef struct pollfd {
35 #define POLLPRI 0x0002
36 #define POLLOUT 0x0004
37 #define POLLRDNORM 0x0040
38 #define POLLWRNORM POLLOUT
39 #define POLLRDBAND 0x0080
40 #define POLLWRBAND 0x0100
41 #define POLLNORM POLLRDNORM
43 /* Return ONLY events (NON testable) */
45 #define POLLERR 0x0008
46 #define POLLHUP 0x0010
47 #define POLLNVAL 0x0020
49 int poll (struct pollfd *, unsigned long, int);
55 #endif /* HAS_SELECT */