module Network.UDP.Types where

import Network.Socket

properUDPSize :: Int
properUDPSize :: Int
properUDPSize = Int
2048

properCMSGSize :: Int
properCMSGSize :: Int
properCMSGSize = Int
64

sockAddrFamily :: SockAddr -> Family
sockAddrFamily :: SockAddr -> Family
sockAddrFamily SockAddrInet{}  = Family
AF_INET
sockAddrFamily SockAddrInet6{} = Family
AF_INET6
sockAddrFamily SockAddr
_               = [Char] -> Family
forall a. HasCallStack => [Char] -> a
error [Char]
"sockAddrFamily"