diff options
Diffstat (limited to 'lib')
-rw-r--r-- | lib/Hosts.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/Hosts.hs b/lib/Hosts.hs index 0f1d9a6..9d6ef92 100644 --- a/lib/Hosts.hs +++ b/lib/Hosts.hs | |||
@@ -79,7 +79,7 @@ parseLine s = (addr,names) | |||
79 | a <- fmap L.unpack $ listToMaybe addr0 | 79 | a <- fmap L.unpack $ listToMaybe addr0 |
80 | n <- inet_pton a | 80 | n <- inet_pton a |
81 | return $ n -- inet_ntop n | 81 | return $ n -- inet_ntop n |
82 | 82 | ||
83 | uncom s = fst $ L.break (=='#') s | 83 | uncom s = fst $ L.break (=='#') s |
84 | 84 | ||
85 | empty :: Hosts | 85 | empty :: Hosts |
@@ -87,7 +87,7 @@ empty = Hosts { lineCount = 0 | |||
87 | , numline = Map.empty | 87 | , numline = Map.empty |
88 | , addrnum = Map.empty | 88 | , addrnum = Map.empty |
89 | , namenum = Map.empty | 89 | , namenum = Map.empty |
90 | } | 90 | } |
91 | 91 | ||
92 | {- | 92 | {- |
93 | parseHosts fname = do | 93 | parseHosts fname = do |