Calamity.Gateway.Shard

The shard logic

Documentation

data Shard

Constructors

Shard

Fields

• shardID :: Int
• shardCount :: Int
• gateway :: Text
• evtIn :: InChan CalamityEvent
• cmdOut :: OutChan ControlMessage
• shardState :: IORef ShardState
• token :: Text
• initialStatus :: Maybe StatusUpdateData
• intents :: Maybe Intents

Instances

Generic Shard

Defined in Calamity.Gateway.Types

Associated Types

type Rep Shard :: Type -> Type

Methods

from :: Shard -> Rep Shard x

to :: Rep Shard x -> Shard

type Rep Shard

Defined in Calamity.Gateway.Types

type Rep Shard = D1 ('MetaData "Shard" "Calamity.Gateway.Types" "calamity-0.1.14.7-inplace" 'False) (C1 ('MetaCons "Shard" 'PrefixI 'True) (((S1 ('MetaSel ('Just "shardID") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Int) :*: S1 ('MetaSel ('Just "shardCount") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Int)) :*: (S1 ('MetaSel ('Just "gateway") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text) :*: S1 ('MetaSel ('Just "evtIn") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (InChan CalamityEvent)))) :*: ((S1 ('MetaSel ('Just "cmdOut") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (OutChan ControlMessage)) :*: S1 ('MetaSel ('Just "shardState") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (IORef ShardState))) :*: (S1 ('MetaSel ('Just "token") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text) :*: (S1 ('MetaSel ('Just "initialStatus") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe StatusUpdateData)) :*: S1 ('MetaSel ('Just "intents") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Intents)))))))

newShard :: Members '[LogEff, MetricEff, Embed IO, Final IO, Async] r => Text -> Int -> Int -> Token -> Maybe StatusUpdateData -> Maybe Intents -> InChan CalamityEvent -> Sem r (InChan ControlMessage, Async (Maybe ()))

Creates and launches a shard