diff options
Diffstat (limited to 'lib/Hosts.hs')
-rw-r--r-- | lib/Hosts.hs | 7 |
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 | ||
7 | module Hosts | 4 | module Hosts |
8 | ( Hosts | 5 | ( Hosts |
9 | , assignName | 6 | , assignName |
@@ -37,10 +34,6 @@ import Control.Monad (mplus) | |||
37 | import Network.Socket | 34 | import Network.Socket |
38 | import ControlMaybe ( handleIO_ ) | 35 | import ControlMaybe ( handleIO_ ) |
39 | 36 | ||
40 | #if ! MIN_VERSION_network(2,4,0) | ||
41 | deriving instance Ord SockAddr | ||
42 | #endif | ||
43 | |||
44 | inet_pton :: String -> Maybe SockAddr | 37 | inet_pton :: String -> Maybe SockAddr |
45 | inet_pton p = n | 38 | inet_pton p = n |
46 | where | 39 | where |