diff options
| author | Ben Sima <ben@bsima.me> | 2019-10-27 09:48:52 -0700 |
|---|---|---|
| committer | Ben Sima <ben@bsima.me> | 2019-10-27 12:14:40 -0700 |
| commit | c790672cc244ac4caba1bda3572829a6c6862891 (patch) | |
| tree | 2706bb8044f7b14840c5f90f215b79b433e81045 /lore/Control/Concurrent/Sima.hs | |
| parent | 44df4ba39f65c3afd84bee6b03f47d9b061e9038 (diff) | |
move everything to namespace directories
Diffstat (limited to 'lore/Control/Concurrent/Sima.hs')
| -rw-r--r-- | lore/Control/Concurrent/Sima.hs | 12 |
1 files changed, 0 insertions, 12 deletions
diff --git a/lore/Control/Concurrent/Sima.hs b/lore/Control/Concurrent/Sima.hs deleted file mode 100644 index b69c0bb..0000000 --- a/lore/Control/Concurrent/Sima.hs +++ /dev/null @@ -1,12 +0,0 @@ -module Control.Concurrent.Sima - ( mapPool - ) -where - -import qualified Control.Concurrent.MSem as Sem - --- | Simaphore-based throttled 'mapConcurrently'. -mapPool :: Traversable t => Int -> (a -> IO b) -> t a -> IO (t b) -mapPool n f xs = do - sima <- Sem.new n - mapConcurrently (Sem.with sima . f) xs |