diff options
| author | Andreas Voellmy <andreas.voellmy@gmail.com> | 2013-01-03 18:18:36 +0100 |
|---|---|---|
| committer | Johan Tibell <johan.tibell@gmail.com> | 2013-02-11 21:38:07 -0800 |
| commit | 3c0dab5b75b1fd7156cdd2bf7dcf80cf7d35bd81 (patch) | |
| tree | 2e992a302741b8353311434107e8847c1514212a /libraries/base/GHC/Event/Manager.hs | |
| parent | 63981cb6bbc575f6625d41ffb71bcbac31b3f6c5 (diff) | |
| download | haskell-3c0dab5b75b1fd7156cdd2bf7dcf80cf7d35bd81.tar.gz | |
Improve comment on GHC.Event.Manager.closeFd_.
Making this comment stand alone and not reference the comment on closeFd.
Diffstat (limited to 'libraries/base/GHC/Event/Manager.hs')
| -rw-r--r-- | libraries/base/GHC/Event/Manager.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/libraries/base/GHC/Event/Manager.hs b/libraries/base/GHC/Event/Manager.hs index f6ba9b2353..cb1eace726 100644 --- a/libraries/base/GHC/Event/Manager.hs +++ b/libraries/base/GHC/Event/Manager.hs @@ -353,7 +353,7 @@ closeFd mgr close fd = do return (newMap, fds) forM_ fds $ \(FdData reg ev cb) -> cb reg (ev `mappend` evtClose) --- | Does everything that closeFd does, except for updating the callback tables. +-- | Close a file descriptor in a race-safe way. -- It assumes the caller will update the callback tables and that the caller -- holds the callback table lock for the fd. closeFd_ :: EventManager -> IM.IntMap [FdData] -> Fd -> IO (IM.IntMap [FdData]) |