nullAddress4: all-zeroes ipv4 address.

1 files changed, 3 insertions, 0 deletions

diff --git a/network-addr/src/Network/Address.hs b/network-addr/src/Network/Address.hs
index 369ae864..2741b6dd 100644
--- a/network-addr/src/Network/Address.hs
+++ b/network-addr/src/Network/Address.hs
@@ -87,6 +87,7 @@ module Network.Address
        , getBindAddress
        , localhost4
        , localhost6
+       , nullAddress4
        , linesBy
        ) where
 
@@ -1250,3 +1251,5 @@ localhost6 = SockAddrInet6 0 0 (0,0,0,1) 0 -- [::1]:0
 localhost4 :: SockAddr
 localhost4 = SockAddrInet 0 16777343 -- 127.0.0.1:0
 
+nullAddress4 :: SockAddr
+nullAddress4 = SockAddrInet 0 0 -- 0.0.0.0:0