Network.WebSockets.Simple.PingPong

Documentation

newtype PingPong a

Uses the JSON literal [] as the ping message

Constructors

PingPong

Fields

• getPingPong :: Maybe a

Instances

ToJSON a => ToJSON (PingPong a)

Assumes a isn't an Array of anything

Methods

toJSON :: PingPong a -> Value

toEncoding :: PingPong a -> Encoding

toJSONList :: [PingPong a] -> Value

toEncodingList :: [PingPong a] -> Encoding

FromJSON a => FromJSON (PingPong a)

Assumes a isn't an Array of anything

Methods

parseJSON :: Value -> Parser (PingPong a)

parseJSONList :: Value -> Parser [PingPong a]

pingPong

Arguments

:: (MonadBaseControl IO m stM, Extractable stM)

=> Int

Delay in microseconds

-> WebSocketsApp m receive send

-> m (WebSocketsApp m (PingPong receive) (PingPong send))