Browse Source

BrokerClient: set correlate/relaxed options on socket

master
Denis Tereshkin 11 months ago
parent
commit
c838dd586a
  1. 5
      src/ATrade/Broker/Client.hs

5
src/ATrade/Broker/Client.hs

@ -54,7 +54,8 @@ import System.ZMQ4 (Context, Event (In),
Sub (Sub), Switch (On), Sub (Sub), Switch (On),
connect, poll, receive, connect, poll, receive,
receiveMulti, restrict, send, receiveMulti, restrict, send,
setLinger, setTcpKeepAlive, setLinger, setReqCorrelate,
setReqRelaxed, setTcpKeepAlive,
setTcpKeepAliveCount, setTcpKeepAliveCount,
setTcpKeepAliveIdle, setTcpKeepAliveIdle,
setTcpKeepAliveInterval, setTcpKeepAliveInterval,
@ -101,6 +102,8 @@ brokerClientThread socketIdentity ctx ep cmd comp killMv secParams logger = fina
else do else do
return ()) $ withSocket ctx Req (\sock -> do return ()) $ withSocket ctx Req (\sock -> do
setLinger (restrict 0) sock setLinger (restrict 0) sock
setReqCorrelate True sock
setReqRelaxed True sock
case cspCertificate secParams of case cspCertificate secParams of
Just clientCert -> zapApplyCertificate clientCert sock Just clientCert -> zapApplyCertificate clientCert sock

Loading…
Cancel
Save