aivika-transformers 4.3.2 → 4.3.3
raw patch · 4 files changed
+4/−4 lines, 4 files
Files
- Simulation/Aivika/IO/Resource/Preemption.hs +1/−1
- Simulation/Aivika/IO/Resource/Preemption/Base.hs +1/−1
- Simulation/Aivika/Trans/Internal/Cont.hs +1/−1
- aivika-transformers.cabal +1/−1
Simulation/Aivika/IO/Resource/Preemption.hs view
@@ -330,7 +330,7 @@ do liftIO $ PQ.enqueue (resourceActingQueue r) (- priority) $ ResourceActingItem priority pid invokeEvent p $ updateResourceWaitTime r (pointTime p - t) invokeEvent p $ updateResourceUtilisationCount r 1- invokeEvent p $ enqueueEvent (pointTime p) $ resumeCont c ()+ invokeEvent p $ enqueueEvent (pointTime p) $ reenterCont c () Right (ResourcePreemptedItem priority t pid) -> do f <- invokeEvent p $ processCancelled pid case f of
Simulation/Aivika/IO/Resource/Preemption/Base.hs view
@@ -220,7 +220,7 @@ invokeEvent p $ releaseResource' r Just c -> do liftIO $ PQ.enqueue (resourceActingQueue r) (- priority) $ ResourceActingItem priority pid- invokeEvent p $ enqueueEvent (pointTime p) $ resumeCont c ()+ invokeEvent p $ enqueueEvent (pointTime p) $ reenterCont c () Right (ResourcePreemptedItem priority pid) -> do f <- invokeEvent p $ processCancelled pid case f of
Simulation/Aivika/Trans/Internal/Cont.hs view
@@ -861,7 +861,7 @@ ContPreemptionEnding -> invokeEvent p $ enqueueEvent (pointTime p) $- resumeCont c a+ reenterCont c a ContPreemptionBeginning -> error "The computation was already preempted: sleepCont." invokeEvent p $ writeRef rh (Just h)
aivika-transformers.cabal view
@@ -1,5 +1,5 @@ name: aivika-transformers-version: 4.3.2+version: 4.3.3 synopsis: Transformers for the Aivika simulation library description: This package is a generalization of the Aivika [1] simulation library