From: Michael Orlitzky Date: Wed, 6 Jul 2016 19:37:38 +0000 (-0400) Subject: Fix a monomorphism restriction warning (GHC 8). X-Git-Tag: 0.4.5~1 X-Git-Url: https://gitweb.michael.orlitzky.com/?a=commitdiff_plain;h=a555c07f5692995bdda0ac03cec1cb0cd5a68225;p=haeredes.git Fix a monomorphism restriction warning (GHC 8). --- diff --git a/src/Main.hs b/src/Main.hs index 3e8d8c0..f513ec6 100644 --- a/src/Main.hs +++ b/src/Main.hs @@ -113,7 +113,7 @@ main = do -- Set the timeout from the command line. The resolvTimeout field is -- in microseconds, so we multiply by one million. - let a_million = 1000 * 1000 + let a_million = 1000 * 1000 :: Int let rc = rc' { resolvTimeout = a_million * seconds (timeout cfg) } rs <- makeResolvSeed rc