uni-events 2.2.2.0 → 2.2.2.1
raw patch · 3 files changed
+8/−7 lines, 3 filessetup-changedPVP: major bump suggested
API removals or changes: PVP suggests a major version bump
API changes (from Hackage documentation)
- Events.Channels: instance HasReceive Channel
- Events.Channels: instance HasSend Channel
- Events.EqGuard: instance Ord key => Guard (EqMatch key)
- Events.EqGuard: instance Ord key => HasAdd (EqGuardQueue key) (EqMatch key)
- Events.EqGuard: instance Ord key => HasAdd (EqValueQueue key value) (key, value)
- Events.EqGuard: instance Ord key => HasEmpty (EqGuardQueue key)
- Events.EqGuard: instance Ord key => HasEmpty (EqValueQueue key value)
- Events.EqGuard: instance Ord key => HasRemove (EqGuardQueue key) (key, value) (EqMatch key)
- Events.EqGuard: instance Ord key => HasRemove (EqValueQueue key value) (EqMatch key) (key, value)
- Events.Events: instance Applicative Event
- Events.Events: instance Functor Event
- Events.Events: instance HasEvent Event
- Events.Events: instance Monad Event
- Events.GuardedChannels: instance (Guard guard, HasEmpty guardQueue, HasEmpty valueQueue, CanSendX guardQueue valueQueue guard value, CanSendX valueQueue guardQueue value guard) => HasGuardedChannel guardQueue valueQueue guard value
- Events.GuardedChannels: instance (HasRemove yQueue x y, HasAdd xQueue x) => CanSendX xQueue yQueue x y
- Events.GuardedChannels: instance Guard guard => HasReceive (GuardedChannel guard)
- Events.GuardedChannels: instance HasListen GuardedChannel
- Events.GuardedChannels: instance HasSend (GuardedChannel guard)
- Events.GuardedEvents: instance Guard guard => HasEvent (GuardedEvent guard)
- Events.GuardedEvents: instance Guard guard => HasGuard (GuardedEvent guard) guard
- Events.NullGuard: instance Guard ()
- Events.NullGuard: instance HasAdd (NullValueQueue value) value
- Events.NullGuard: instance HasAdd NullGuardQueue ()
- Events.NullGuard: instance HasEmpty (NullValueQueue value)
- Events.NullGuard: instance HasEmpty NullGuardQueue
- Events.NullGuard: instance HasRemove (NullValueQueue value) () value
- Events.NullGuard: instance HasRemove NullGuardQueue value ()
+ Events.Channels: instance Events.Events.HasReceive Events.Channels.Channel
+ Events.Channels: instance Events.Events.HasSend Events.Channels.Channel
+ Events.EqGuard: instance GHC.Classes.Ord key => Events.GuardedChannels.HasAdd (Events.EqGuard.EqGuardQueue key) (Events.EqGuard.EqMatch key)
+ Events.EqGuard: instance GHC.Classes.Ord key => Events.GuardedChannels.HasAdd (Events.EqGuard.EqValueQueue key value) (key, value)
+ Events.EqGuard: instance GHC.Classes.Ord key => Events.GuardedChannels.HasEmpty (Events.EqGuard.EqGuardQueue key)
+ Events.EqGuard: instance GHC.Classes.Ord key => Events.GuardedChannels.HasEmpty (Events.EqGuard.EqValueQueue key value)
+ Events.EqGuard: instance GHC.Classes.Ord key => Events.GuardedChannels.HasRemove (Events.EqGuard.EqGuardQueue key) (key, value) (Events.EqGuard.EqMatch key)
+ Events.EqGuard: instance GHC.Classes.Ord key => Events.GuardedChannels.HasRemove (Events.EqGuard.EqValueQueue key value) (Events.EqGuard.EqMatch key) (key, value)
+ Events.EqGuard: instance GHC.Classes.Ord key => Events.GuardedEvents.Guard (Events.EqGuard.EqMatch key)
+ Events.Events: infixl 1 +>
+ Events.Events: infixl 2 >>>
+ Events.Events: instance Control.Monad.Fail.MonadFail Events.Events.Event
+ Events.Events: instance Events.Events.HasEvent Events.Events.Event
+ Events.Events: instance GHC.Base.Applicative Events.Events.Event
+ Events.Events: instance GHC.Base.Functor Events.Events.Event
+ Events.Events: instance GHC.Base.Monad Events.Events.Event
+ Events.GuardedChannels: instance (Events.GuardedChannels.HasRemove yQueue x y, Events.GuardedChannels.HasAdd xQueue x) => Events.GuardedChannels.CanSendX xQueue yQueue x y
+ Events.GuardedChannels: instance (Events.GuardedEvents.Guard guard, Events.GuardedChannels.HasEmpty guardQueue, Events.GuardedChannels.HasEmpty valueQueue, Events.GuardedChannels.CanSendX guardQueue valueQueue guard value, Events.GuardedChannels.CanSendX valueQueue guardQueue value guard) => Events.GuardedChannels.HasGuardedChannel guardQueue valueQueue guard value
+ Events.GuardedChannels: instance Events.Events.HasSend (Events.GuardedChannels.GuardedChannel guard)
+ Events.GuardedChannels: instance Events.GuardedEvents.Guard guard => Events.Events.HasReceive (Events.GuardedChannels.GuardedChannel guard)
+ Events.GuardedChannels: instance Events.GuardedEvents.HasListen Events.GuardedChannels.GuardedChannel
+ Events.GuardedEvents: infixr 2 |>
+ Events.GuardedEvents: instance Events.GuardedEvents.Guard guard => Events.Events.HasEvent (Events.GuardedEvents.GuardedEvent guard)
+ Events.GuardedEvents: instance Events.GuardedEvents.Guard guard => Events.GuardedEvents.HasGuard (Events.GuardedEvents.GuardedEvent guard) guard
+ Events.NullGuard: instance Events.GuardedChannels.HasAdd (Events.NullGuard.NullValueQueue value) value
+ Events.NullGuard: instance Events.GuardedChannels.HasAdd Events.NullGuard.NullGuardQueue ()
+ Events.NullGuard: instance Events.GuardedChannels.HasEmpty (Events.NullGuard.NullValueQueue value)
+ Events.NullGuard: instance Events.GuardedChannels.HasEmpty Events.NullGuard.NullGuardQueue
+ Events.NullGuard: instance Events.GuardedChannels.HasRemove (Events.NullGuard.NullValueQueue value) () value
+ Events.NullGuard: instance Events.GuardedChannels.HasRemove Events.NullGuard.NullGuardQueue value ()
+ Events.NullGuard: instance Events.GuardedEvents.Guard ()
- Events.Events: Awaiting :: (IO ()) -> Result
+ Events.Events: Awaiting :: IO () -> Result
- Events.Events: AwaitingAlways :: (IO ()) -> Result
+ Events.Events: AwaitingAlways :: IO () -> Result
- Events.GuardedEvents: GuardedEvent :: !(guard -> Event a) -> !guard -> GuardedEvent guard a
+ Events.GuardedEvents: GuardedEvent :: !guard -> Event a -> !guard -> GuardedEvent guard a
Files
- Events/Events.hs +2/−1
- Setup.hs +0/−2
- uni-events.cabal +6/−4
Events/Events.hs view
@@ -67,6 +67,7 @@ import Control.Concurrent import Control.Applicative import Control.Monad+import Control.Monad.Fail import Util.Computation @@ -366,6 +367,7 @@ (>>) = thenEvent return = doneEvent +instance MonadFail Event where fail str = always (ioError (userError str)) instance Applicative Event where@@ -439,4 +441,3 @@ case maybeA of Nothing -> return (reverse acc) Just a -> gAQ event (a:acc)-
− Setup.hs
@@ -1,2 +0,0 @@-import Distribution.Simple-main = defaultMain
uni-events.cabal view
@@ -1,5 +1,5 @@ name: uni-events-version: 2.2.2.0+version: 2.2.2.1 build-type: Simple license: LGPL license-file: LICENSE@@ -7,9 +7,9 @@ maintainer: c.maeder@jacobs-university.de homepage: http://www.informatik.uni-bremen.de/uniform/wb/ category: Uniform-synopsis: Event handling for the uniform workbench-description: uni events-cabal-version: >= 1.4+synopsis: uni events+description: Event handling for the uniform workbenchuni events+cabal-version: >= 1.10 library exposed-modules:@@ -32,3 +32,5 @@ build-depends: base >=4 && < 5, containers, uni-util ghc-options: -fwarn-unused-imports -fno-warn-warnings-deprecations++ default-language: Haskell98