diff --git a/Network/DNS/Resolver.hs b/Network/DNS/Resolver.hs
--- a/Network/DNS/Resolver.hs
+++ b/Network/DNS/Resolver.hs
@@ -440,11 +440,11 @@
         Just res -> return $ Right res
 
 #if mingw32_HOST_OS == 1
-    -- Windows does not support sendAll in Network.ByteString.Lazy.
-    -- This implements sendAll with Haskell Strings.
-    sendAll sock bs = do
-	sent <- send sock (LB.unpack bs)
-	when (sent < fromIntegral (LB.length bs)) $ sendAll sock (LB.drop (fromIntegral sent) bs)
+-- Windows does not support sendAll in Network.ByteString.Lazy.
+-- This implements sendAll with Haskell Strings.
+sendAll sock bs = do
+sent <- send sock (LB.unpack bs)
+when (sent < fromIntegral (LB.length bs)) $ sendAll sock (LB.drop (fromIntegral sent) bs)
 #endif
 
 isIllegal :: Domain -> Bool
diff --git a/Network/DNS/StateBinary.hs b/Network/DNS/StateBinary.hs
--- a/Network/DNS/StateBinary.hs
+++ b/Network/DNS/StateBinary.hs
@@ -125,7 +125,7 @@
     getWord16be = do
         a <- word8'
         b <- word8'
-        return $ a * 256 + b
+        return $ a * 0x100 + b
 
 get32 :: SGet Word32
 get32 = ST.lift getWord32be <* addPosition 4
@@ -136,7 +136,7 @@
         b <- word8'
         c <- word8'
         d <- word8'
-        return $ a * 1677721 + b * 65536 + c * 256 + d
+        return $ a * 0x1000000 + b * 0x10000 + c * 0x100 + d
 
 getInt8 :: SGet Int
 getInt8 = fromIntegral <$> get8
diff --git a/dns.cabal b/dns.cabal
--- a/dns.cabal
+++ b/dns.cabal
@@ -1,5 +1,5 @@
 Name:                   dns
-Version:                2.0.10
+Version:                2.0.11
 Author:                 Kazu Yamamoto <kazu@iij.ad.jp>
 Maintainer:             Kazu Yamamoto <kazu@iij.ad.jp>
 License:                BSD3
@@ -30,7 +30,6 @@
                       , attoparsec
                       , binary
                       , bytestring
-                      , bytestring-builder
                       , conduit >= 1.1
                       , conduit-extra >= 1.1
                       , containers
@@ -45,7 +44,6 @@
                       , attoparsec
                       , binary
                       , bytestring
-                      , bytestring-builder
                       , conduit >= 1.1
                       , conduit-extra >= 1.1
                       , containers