eventloop 0.8.1.1 → 0.8.1.2

raw patch · 3 files changed

+4/−4 lines, 3 filesdep ~aesondep ~base

Dependency ranges changed: aeson, base

Files

• eventloop.cabal +1/−1
• src/Eventloop/Module/StatefulGraphics/StatefulGraphics.hs +1/−1
• src/Eventloop/System/EventloopThread.hs +2/−2

@@ -6,7 +6,7 @@ -- PVP summary:      +-+------- breaking API changes
 --                   | | +----- non-breaking API additions
 --                   | | | +--- code changes with no API change
-version:             0.8.1.1
+version:             0.8.1.2
 synopsis:            A different take on an IO system. Based on Amanda's IO loop, this eventloop takes a function that maps input events to output events. It can easily be extended by modules that represent IO devices or join multiple modules together.
 description:         A different take on an IO system. Based on Amanda's IO loop, this eventloop takes a function that maps input events to output events. It can easily be extended by modules that represent IO devices or join multiple modules together.
                      Each module exists of a initialize and teardown function that are both called once at startup and shutting down. During run-time, a module can provice a preprocessor function (which transforms input events before they get to the eventloop),

@@ -128,7 +128,7 @@         (_, toRedraw', toRemove') = calculateRedrawsForRemoved (state, toRedraw, toRemove) sg  calculateRedraws state ((Modified sg):performed)-    -- | noDimChange oldGraphic newGraphic = calculateDraws toCheck toRedraw (Drawn sg) TODO Modified -> Drawn optimalization+    --  noDimChange oldGraphic newGraphic = calculateDraws toCheck toRedraw (Drawn sg) TODO Modified -> Drawn optimalization     = calculateRedraws state ((Removed sg):(Drawn sg):performed)  calculateRedraws state (NoOp:performed)

@@ -56,7 +56,7 @@         moduleProcessors = map (\(id, ioConst, iostate, (Just processFunc)) -> (id, ioConst, iostate, processFunc)) moduleProcessorsJ
 
         
-eventloopSteps :: (progstateT -> In -> (progstateT, [Out])) {-| eventloop function -}
+eventloopSteps :: (progstateT -> In -> (progstateT, [Out])) {-^ eventloop function -}
                -> TVar progstateT
                -> [In]
                -> IO [Out]
@@ -67,7 +67,7 @@         sequencedSteps = sequence inEventSteps
     
         
-eventloopStep :: (progstateT -> In -> (progstateT, [Out])) {-| eventloop function -}
+eventloopStep :: (progstateT -> In -> (progstateT, [Out])) {-^ eventloop function -}
               -> TVar progstateT
               -> In
               -> IO [Out]