Reactive.Banana.JACK.Process

make JACK reactive

data Context

Constructors

Context

Fields

contextCycleStartRef :: IORef AbsoluteTicks

contextInQueueRef :: IORef InQueue

contextClient :: Client

newtype Schedule

Constructors

Schedule Int

Instances

Enum Schedule

Eq Schedule

Ord Schedule

Show Schedule

newtype Reactor t a

Constructors

Reactor

Fields

runReactor :: ReaderT Context (StateT Schedule (Moment t)) a

Instances

Moment Reactor

Reactor Reactor

Timed Reactor

C Reactor

Monad (Reactor t)

Functor (Reactor t)

MonadFix (Reactor t)

Applicative (Reactor t)

Frameworks t => MonadIO (Reactor t)

data InEvent

Constructors

InEvent (Map Schedule [Handler AbsoluteTicks]) [T]

Instances

Monoid InEvent

inEventBeat :: T InEvent (Map Schedule [Handler AbsoluteTicks])

type InQueue = Map NFrames InEvent

type OutQueue = Map NFrames [T]

run :: ThrowsErrno e => (forall t. Frameworks t => Event t T -> Event t [T]) -> ReaderT Handle (ExceptionalT e IO) ()

runM :: ThrowsErrno e => (forall t. Frameworks t => Behavior t AbsoluteTicks -> Event t T -> Reactor t (Event t [T])) -> ReaderT Handle (ExceptionalT e IO) ()

type Handler a = a -> IO ()

viewQueueL :: InQueue -> Maybe ((NFrames, Either [Handler AbsoluteTicks] T), InQueue)

normalizeInQueue :: InQueue -> InQueue

reduceQueueTime :: NFrames -> Map NFrames a -> Map NFrames a

process :: Handle -> IORef AbsoluteTicks -> IORef InQueue -> IORef OutQueue -> Handler (NFrames, NFrames) -> Handler T -> NFrames -> ExceptionalT Errno IO ()

type RelativeTicks = T Reactor Relative Ticks

type AbsoluteTicks = T Reactor Absolute Ticks

type RelativeSeconds = T Reactor Relative Seconds

nframesFromTicks :: RelativeTicks -> NFrames

ticksFromNFrames :: NFrames -> RelativeTicks

absTicksFromNFrames :: NFrames -> AbsoluteTicks

sendBeat :: Context -> Schedule -> Handler AbsoluteTicks -> AbsoluteTicks -> IO ()

cancelBeats :: Context -> Schedule -> IO ()