fix all remaining -Wall warnings on Windows
This commit is contained in:
parent
360ecb9f35
commit
3f6e4b8c7c
13 changed files with 57 additions and 44 deletions
|
@ -23,7 +23,6 @@ import Network.HTTP.Types
|
|||
import System.Log.Logger
|
||||
import qualified Data.CaseInsensitive as CI
|
||||
import Network.Socket
|
||||
import Control.Exception
|
||||
import "crypto-api" Crypto.Random
|
||||
import qualified Web.ClientSession as CS
|
||||
import qualified Data.ByteString.Lazy as L
|
||||
|
@ -39,6 +38,10 @@ import Control.Concurrent
|
|||
#ifdef __ANDROID__
|
||||
import Data.Endian
|
||||
#endif
|
||||
#if defined(__ANDROID__) || defined (mingw32_HOST_OS)
|
||||
#else
|
||||
import Control.Exception (bracketOnError)
|
||||
#endif
|
||||
|
||||
localhost :: HostName
|
||||
localhost = "localhost"
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue