module Sound.ALSA.Sequencer.Client.Info
( T
, get
, getAny
, queryFirst
, queryNext
, queryLoop_
, queryLoop
, set
, copy
, clone
, getClient
, getType
, getName
, getBroadcastFilter
, getErrorBounce
, getNumPorts
, getEventLost
, setClient
, setName
, setBroadcastFilter
, setErrorBounce
, filterClear
, filterAdd
, filterDel
, filterCheck
) where
import Sound.ALSA.Sequencer.Marshal.ClientInfo
import qualified Sound.ALSA.Sequencer.Client.Info.EventFilter as Filter
import qualified Sound.ALSA.Sequencer.Marshal.Sequencer as Seq
import qualified Sound.ALSA.Sequencer.Marshal.Event as Event
import qualified Sound.ALSA.Sequencer.Query as Query
queryFirst :: Seq.T mode -> IO T
queryFirst :: forall mode. T mode -> IO T
queryFirst = forall info mode. C info => T mode -> IO info
Query.first
queryLoop_ :: Seq.T mode -> (T -> IO ()) -> IO ()
queryLoop_ :: forall mode. T mode -> (T -> IO ()) -> IO ()
queryLoop_ T mode
h = forall info mode.
C info =>
T mode -> (info -> IO ()) -> (info -> IO ()) -> IO ()
Query.loop_ T mode
h (forall a b. a -> b -> a
const forall a b. (a -> b) -> a -> b
$ forall (m :: * -> *) a. Monad m => a -> m a
return ())
queryLoop :: Seq.T mode -> (T -> IO a) -> IO [a]
queryLoop :: forall mode a. T mode -> (T -> IO a) -> IO [a]
queryLoop T mode
h = forall info mode a.
C info =>
T mode -> (info -> IO ()) -> (info -> IO a) -> IO [a]
Query.loop T mode
h (forall a b. a -> b -> a
const forall a b. (a -> b) -> a -> b
$ forall (m :: * -> *) a. Monad m => a -> m a
return ())
filterClear :: T -> IO ()
filterAdd :: Event.Type e => T -> e -> IO ()
filterDel :: Event.Type e => T -> e -> IO ()
filterCheck :: Event.Type e => T -> e -> IO Bool
filterClear :: T -> IO ()
filterClear = T -> IO ()
Filter.clear
filterAdd :: forall e. Type e => T -> e -> IO ()
filterAdd = forall e. Type e => T -> e -> IO ()
Filter.add
filterDel :: forall e. Type e => T -> e -> IO ()
filterDel = forall e. Type e => T -> e -> IO ()
Filter.delete
filterCheck :: forall e. Type e => T -> e -> IO Bool
filterCheck = forall e. Type e => T -> e -> IO Bool
Filter.check