Safe Haskell | Safe-Inferred |
---|---|
Language | GHC2021 |
This module provides the core Env
type for Navi.
Synopsis
- class HasEvents env where
- class HasLogEnv env where
- getLogEnv :: env -> LogEnv
- localLogEnv :: (LogEnv -> LogEnv) -> env -> env
- class HasLogQueue env where
- getLogQueue :: env -> TBQueue LogStr
- class HasNoteQueue env where
- getNoteQueue :: env -> TBQueue NaviNote
- data Env = MkEnv {}
HasX-style Typeclasses
class HasEvents env where Source #
Retrieves the events.
class HasLogEnv env where Source #
Retrieves the log environment.
Instances
HasLogEnv Env Source # | |
HasLogEnv DBusEnv Source # | |
HasLogEnv NotifySendEnv Source # | |
Defined in Navi.Env.NotifySend getLogEnv :: NotifySendEnv -> LogEnv Source # localLogEnv :: (LogEnv -> LogEnv) -> NotifySendEnv -> NotifySendEnv Source # |
class HasLogQueue env where Source #
Retrieves the log queue.
getLogQueue :: env -> TBQueue LogStr Source #
Instances
HasLogQueue Env Source # | |
Defined in Navi.Env.Core | |
HasLogQueue DBusEnv Source # | |
Defined in Navi.Env.DBus | |
HasLogQueue NotifySendEnv Source # | |
Defined in Navi.Env.NotifySend getLogQueue :: NotifySendEnv -> TBQueue LogStr Source # |
class HasNoteQueue env where Source #
Retrieves the note queue.
getNoteQueue :: env -> TBQueue NaviNote Source #
Instances
HasNoteQueue Env Source # | |
Defined in Navi.Env.Core | |
HasNoteQueue DBusEnv Source # | |
Defined in Navi.Env.DBus | |
HasNoteQueue NotifySendEnv Source # | |
Defined in Navi.Env.NotifySend |
Concrete Env
Env
holds all of our environment data that is used while running navi.
Instances
HasEvents Env Source # | |
HasLogEnv Env Source # | |
HasLogQueue Env Source # | |
Defined in Navi.Env.Core | |
HasNoteQueue Env Source # | |
Defined in Navi.Env.Core | |
(k ~ A_Lens, a ~ NonEmpty AnyEvent, b ~ NonEmpty AnyEvent) => LabelOptic "events" k Env Env a b Source # | |
Defined in Navi.Env.Core | |
(k ~ A_Lens, a ~ LogEnv, b ~ LogEnv) => LabelOptic "logEnv" k Env Env a b Source # | |
Defined in Navi.Env.Core | |
(k ~ A_Lens, a ~ TBQueue LogStr, b ~ TBQueue LogStr) => LabelOptic "logQueue" k Env Env a b Source # | |
Defined in Navi.Env.Core | |
(k ~ A_Lens, a ~ TBQueue NaviNote, b ~ TBQueue NaviNote) => LabelOptic "noteQueue" k Env Env a b Source # | |
Defined in Navi.Env.Core |