priority-sync 0.2.1.0 → 0.2.1.1
raw patch · 2 files changed
+8/−6 lines, 2 filesnew-component:exe:_PrioritySync_Internal_Tests
Files
- PrioritySync/Internal/Room.hs +1/−1
- priority-sync.cabal +7/−5
PrioritySync/Internal/Room.hs view
@@ -30,7 +30,7 @@ -- > forkIO $ claim Acquire (Default,room) $ putStrLn "Foo! Bar!" claim :: (RoomGroup c,ClaimContext c) => ClaimMode -> c -> IO a -> IO a claim claim_mode c actionIO = - do room_context_data <- newTVarIO (error "claim: BaseRoomContextData not yet available (please report a bug against the priority package)")+ do room_context_data <- newTVarIO (error "claim: BaseRoomContextData not yet available (please report a bug against the priority-sync package)") claim_ (Map.fromList $ Prelude.map (flip (,) claim_mode) $ roomsOf c) (\cs -> writeTVar room_context_data =<< approveClaimsEntering c cs) (\cs -> writeTVar room_context_data =<< approveClaimsExiting c cs)
priority-sync.cabal view
@@ -1,5 +1,5 @@ name: priority-sync-version: 0.2.1.0+version: 0.2.1.1 license: BSD3 license-file: LICENSE author: Christopher Lane Hinson@@ -9,13 +9,15 @@ category: Concurrency synopsis: Cooperative task prioritization. description: A strategy to prioritize access to limited resources.- .- The git repository is available at <http://www.downstairspeople.org/git/priority-sync.git>. -cabal-version: >= 1.2+cabal-version: >=1.6 build-type: Simple tested-with: GHC==6.12.1 +source-repository head+ type: git+ location: git://github.com/clanehin/priority-sync.git+ Library exposed-modules: PrioritySync.PrioritySync, PrioritySync.Internal.Room,@@ -36,7 +38,7 @@ ghc-prof-options: -prof -auto-all build-depends: base>4&&<5, containers >= 0.1.0.1, PSQueue, parallel >= 1.0.0.0, stm >= 2.1.1.2, random -Executable _PrioritySync.Internal_Tests+Executable _PrioritySync_Internal_Tests Main-Is: Tests.hs ghc-options: -Wall -threaded -fno-warn-type-defaults ghc-prof-options: -prof -auto-all