flaw-websocket-client/Flaw/Network/WebSocket.hs

Summary

Maintainability
Test Coverage

Parse error
Open

  callback <- asyncCallback1 $ \messageEvent -> do

Found

} <- atomically $ newBiuoSocket 1

>   callback <- asyncCallback1 $ \messageEvent -> do
      let bytes = case WME.getData $ unsafeCoerce messageEvent of
        WME.StringData s -> T.encodeUtf8 $ textFromJSString s

remove it.

There are no issues that match your filters.

Category
Status