Revision 3e02cd3c src/Ganeti/Query/Server.hs

b/src/Ganeti/Query/Server.hs
196 196
  return True
197 197

  
198 198
-- | Handles one iteration of the client protocol: receives message,
199
-- checks for validity and decods, returns response.
199
-- checks it for validity and decodes it, returns response.
200 200
handleClient :: Client -> ConfigReader -> IO Bool
201 201
handleClient client creader = do
202 202
  !msg <- recvMsgExt client

Also available in: Unified diff