From: Helga Velroyen <helgav@google.com>
Date: Wed, 19 Dec 2012 12:07:40 +0000 (+0100)
Subject: Remove superfluous typing to Int
X-Git-Tag: v2.7.0beta1~278
X-Git-Url: https://code.grnet.gr/git/ganeti-local/commitdiff_plain/712da82f42c8ba9516670b93e3ebdbda23a9eb8a?ds=sidebyside

Remove superfluous typing to Int

Forgot to fix that after the review of patch
"Haskell/python compatibility test for networks".

Signed-off-by: Helga Velroyen <helgav@google.com>
Reviewed-by: Iustin Pop <iustin@google.com>
---

diff --git a/htest/Test/Ganeti/TestCommon.hs b/htest/Test/Ganeti/TestCommon.hs
index 0a33931..a684a2b 100644
--- a/htest/Test/Ganeti/TestCommon.hs
+++ b/htest/Test/Ganeti/TestCommon.hs
@@ -245,7 +245,7 @@ genIp4Net = do
 -- | Helper function to compute the number of hosts in a network
 -- given the netmask. (For IPv4 only.)
 netmask2NumHosts :: Int -> Int
-netmask2NumHosts n = (2::Int)^((32::Int)-n)
+netmask2NumHosts n = 2^(32-n)
 
 -- | Generates an arbitrary IPv6 network address in textual form.
 -- The generated address is not simpflified, e. g. an address like