Add type annotation to avoid monomorphism restriction
authorKlaus Aehlig <aehlig@google.com>
Mon, 10 Jun 2013 14:45:17 +0000 (16:45 +0200)
committerKlaus Aehlig <aehlig@google.com>
Mon, 10 Jun 2013 15:04:56 +0000 (17:04 +0200)
commite7aa0b0309381344d1dc360ffb27a78ac5cc95fc
treeb64b8c5ecbba1272b9ce515b9db6602fc203bf1e
parent30ce253ed87a7df73dfb5e19eef64b0db5e46662
Add type annotation to avoid monomorphism restriction

Even though we need the let-bound variable showMoves only
at type [(String, String)] -> IO (), it's most general type
would be (PrintfArg a, PrintfArg b) => [(a, b)] -> IO ().
This causes the monomorphism restriction apply to that binding,
which is a warning (and, thanks to -Werror, fatal) on some
ghc versions.

Signed-off-by: Klaus Aehlig <aehlig@google.com>
Reviewed-by: Thomas Thrainer <thomasth@google.com>
src/Ganeti/HTools/Program/Hroller.hs