refactor/optimize server queue/message store (#340)

* refactor/optimize server queue/message store

* change fst to pattern match

* server store - wrap QueueRec into TVar
This commit is contained in:
Evgeny Poberezkin authored and GitHub committed 2022-03-28 10:29:21 +01:00
1 parent c380431b94
commit 6ef6bedc03
5 files changed
+77 -102

No files matched your search

@@ -15,6 +15,7 @@ data QueueRec = QueueRec
notifier :: Maybe (NotifierId, NtfPublicVerifyKey),
status :: QueueStatus
}
deriving (Eq, Show)
data QueueStatus = QueueActive | QueueOff deriving (Eq, Show)