Ticket #8307: extend-darwin-fixes-to-ios.patch

File extend-darwin-fixes-to-ios.patch, 765 bytes (added by lukexi, 20 months ago)
  • GHC/Event/Manager.hs

    diff --git a/GHC/Event/Manager.hs b/GHC/Event/Manager.hs
    index 5c87d0c..14f7098 100644
    a b callbackTableVar mgr fd = emFds mgr ! hashFd fd 
    135135 
    136136haveOneShot :: Bool 
    137137{-# INLINE haveOneShot #-} 
    138 #if defined(darwin_HOST_OS) 
     138#if defined(darwin_HOST_OS) || defined(ios_HOST_OS) 
    139139haveOneShot = False 
    140140#elif defined(HAVE_EPOLL) || defined(HAVE_KQUEUE) 
    141141haveOneShot = True 
    registerFd mgr cb fd evs = do 
    353353-} 
    354354-- | Wake up the event manager. 
    355355wakeManager :: EventManager -> IO () 
    356 #if defined(darwin_HOST_OS) 
     356#if defined(darwin_HOST_OS) || defined(ios_HOST_OS) 
    357357wakeManager mgr = sendWakeup (emControl mgr) 
    358358#elif defined(HAVE_EPOLL) || defined(HAVE_KQUEUE) 
    359359wakeManager _ = return ()