Add type signatures to fix monomorphism restriction warnings (GHC 8).

[hath.git] / src / Main.hs

diff --git a/src/Main.hs b/src/Main.hs
index 5b75533863c11b515f7f104df7b09948065a9e59..d66b6009c5187b643b0ea12e588cda26873eb39e 100644 (file)
--- a/src/Main.hs
+++ b/src/Main.hs
@@ -102,7 +102,7 @@ main = do
   input <- getContents
 
   let cidr_strings = splitWs input
-  let cidrs = map readMaybe cidr_strings
+  let cidrs = map readMaybe cidr_strings :: [Maybe Cidr]
 
   when (any isNothing cidrs) $ do
     hPutStrLn stderr "ERROR: not valid CIDR notation:"