Commit db313f98 authored by Ben Gamari's avatar Ben Gamari 🐢 Committed by Marge Bot

base/Event/Poll: Drop POLLRDHUP enum item

Previously the Event enumeration produced by hsc2hs would sometimes
include a currently-unused POLLRDHUP item. This unused binding would
result in a build failure. Drop it.
parent 4138bf86
......@@ -162,24 +162,12 @@ newtype Event = Event CShort
, FiniteBits -- ^ @since 4.7.0.0
)
-- We have to duplicate the whole enum like this in order for the
-- hsc2hs cross-compilation mode to work
#if defined(POLLRDHUP)
#{enum Event, Event
, pollIn = POLLIN
, pollOut = POLLOUT
, pollRdHup = POLLRDHUP
, pollErr = POLLERR
, pollHup = POLLHUP
}
#else
#{enum Event, Event
, pollIn = POLLIN
, pollOut = POLLOUT
, pollErr = POLLERR
, pollHup = POLLHUP
}
#endif
fromEvent :: E.Event -> Event
fromEvent e = remap E.evtRead pollIn .|.
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment