summaryrefslogtreecommitdiff
path: root/lib/Hosts.hs
diff options
context:
space:
mode:
authorAndrew Cady <d@jerkface.net>2019-07-13 16:25:13 -0400
committerAndrew Cady <d@jerkface.net>2019-07-13 16:25:13 -0400
commit8820af82d2fccadb6de7e2623c87e48fb11378c5 (patch)
tree51d25e17c2b9262abf15418007b8be5829a5facc /lib/Hosts.hs
parent803d8a03e5c787d1d57b327cbc30a5beb9f1ec7a (diff)
remove more old cpp cruft
Diffstat (limited to 'lib/Hosts.hs')
-rw-r--r--lib/Hosts.hs7
1 files changed, 0 insertions, 7 deletions
diff --git a/lib/Hosts.hs b/lib/Hosts.hs
index 9d6ef92..f0610ad 100644
--- a/lib/Hosts.hs
+++ b/lib/Hosts.hs
@@ -1,9 +1,6 @@
1{-# LANGUAGE CPP #-} 1{-# LANGUAGE CPP #-}
2{-# LANGUAGE ScopedTypeVariables #-} 2{-# LANGUAGE ScopedTypeVariables #-}
3{-# LANGUAGE OverloadedStrings #-} 3{-# LANGUAGE OverloadedStrings #-}
4#if ! MIN_VERSION_network(2,4,0)
5{-# LANGUAGE StandaloneDeriving #-}
6#endif
7module Hosts 4module Hosts
8 ( Hosts 5 ( Hosts
9 , assignName 6 , assignName
@@ -37,10 +34,6 @@ import Control.Monad (mplus)
37import Network.Socket 34import Network.Socket
38import ControlMaybe ( handleIO_ ) 35import ControlMaybe ( handleIO_ )
39 36
40#if ! MIN_VERSION_network(2,4,0)
41deriving instance Ord SockAddr
42#endif
43
44inet_pton :: String -> Maybe SockAddr 37inet_pton :: String -> Maybe SockAddr
45inet_pton p = n 38inet_pton p = n
46 where 39 where