2

我有一个片段，在打开连接后看起来像这样

receiveEvents :: WS.Connection -> Document -> IO()
receiveEvents conn document = forever $ do
        putStrLn "receive events"
        evnt <- WS.receiveData conn
        let val = fromJust $ decode' evnt
        liftIO $ atomically $ do
                              writeTChan (eventQueue document) val

如果从客户端发送事件，则此代码有效，但在关闭某些不活动连接后，我在客户端（web javascript）连接关闭时收到错误（调用 websockets 的 onclose）。websockets 在一些不活动后是否关闭。另外，如果这是在主线程中，它可以正常工作吗？

4

0 回答 0