remove Drained state

This commit is contained in:
Evgeny Poberezkin
2020-05-25 09:20:22 +01:00
parent bdec751725
commit dc7835992c
2 changed files with 1 additions and 3 deletions
+1
View File
@@ -50,6 +50,7 @@ executables:
api-docs:
source-dirs: src
main: Main.hs
ghc-options: -threaded
tests:
simplex-definitions-doctests:
@@ -45,7 +45,6 @@ $(singletons [d|
| Confirmed -- (recipient) confirmed by sender with the broker
| Secured -- (all) secured with the broker
| Disabled -- (broker, recipient) disabled with the broker by recipient
| Drained -- (broker, recipient) drained (no messages)
deriving (Show, ShowSing, Eq)
data ConnSubscription = Subscribed | Idle
@@ -59,7 +58,6 @@ $(predicate [d|
BrkNew :: BrokerCS New
BrkSecured :: BrokerCS Secured
BrkDisabled :: BrokerCS Disabled
BrkDrained :: BrokerCS Drained
BrkNone :: BrokerCS None
-- sender connection states
@@ -89,7 +87,6 @@ instance Prf1 SenderCS s => Prf HasState Sender s
data EstablishedState (s :: ConnectionState) :: Type where
ESecured :: EstablishedState Secured
EDisabled :: EstablishedState Disabled
EDrained :: EstablishedState Drained
-- connection type stub for all participants, TODO move from idris