File tree Expand file tree Collapse file tree 5 files changed +8
-6
lines changed Expand file tree Collapse file tree 5 files changed +8
-6
lines changed Original file line number Diff line number Diff line change @@ -196,7 +196,7 @@ mkInvalidRecvArgError loc = ioeSetErrorString (mkIOError
196
196
InvalidArgument
197
197
loc Nothing Nothing ) " non-positive length"
198
198
199
- -- | Send data from the socket using sendmsg(2).
199
+ -- | Send data to the socket using sendmsg(2).
200
200
sendBufMsg :: SocketAddress sa
201
201
=> Socket -- ^ Socket
202
202
-> sa -- ^ Destination address
Original file line number Diff line number Diff line change @@ -286,7 +286,7 @@ withWSABuffromBS cs f = do
286
286
getBufsiz :: ByteString -> IO (Ptr Word8 , Int )
287
287
getBufsiz (PS fptr off len) = withForeignPtr fptr $ \ ptr -> return (ptr `plusPtr` off, len)
288
288
289
- -- | Send data from the socket using sendmsg(2).
289
+ -- | Send data to the socket using sendmsg(2).
290
290
sendMsg :: Socket -- ^ Socket
291
291
-> SockAddr -- ^ Destination address
292
292
-> [ByteString ] -- ^ Data to be sent
Original file line number Diff line number Diff line change @@ -290,8 +290,8 @@ instance Storable StructLinger where
290
290
(# poke struct linger, l_linger) p linger
291
291
#endif
292
292
293
- -- | Executes the given action and ignoring the result only when the specified
294
- -- socket option is valid .
293
+ -- | Execute the given action only when the specified socket option is
294
+ -- supported. Any return value is ignored .
295
295
whenSupported :: SocketOption -> IO a -> IO ()
296
296
whenSupported s action
297
297
| isSupportedSocketOption s = action >> return ()
Original file line number Diff line number Diff line change @@ -83,7 +83,9 @@ filterCmsg cid cmsgs = filter (\cmsg -> cmsgId cmsg == cid) cmsgs
83
83
84
84
----------------------------------------------------------------
85
85
86
- -- | A class to encode and decode control message.
86
+ -- | Control message type class.
87
+ -- Each control message type has a numeric 'CmsgId' and a 'Storable'
88
+ -- data representation.
87
89
class Storable a => ControlMessage a where
88
90
controlMessageId :: a -> CmsgId
89
91
Original file line number Diff line number Diff line change @@ -74,7 +74,7 @@ sendBufTo = G.sendBufTo
74
74
recvBufFrom :: Socket -> Ptr a -> Int -> IO (Int , SockAddr )
75
75
recvBufFrom = G. recvBufFrom
76
76
77
- -- | Send data from the socket using sendmsg(2).
77
+ -- | Send data to the socket using sendmsg(2).
78
78
sendBufMsg :: Socket -- ^ Socket
79
79
-> SockAddr -- ^ Destination address
80
80
-> [(Ptr Word8 ,Int )] -- ^ Data to be sent
You can’t perform that action at this time.
0 commit comments