Skip to content
New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

using strict language extensions. #752

Merged
merged 1 commit into from
Jun 17, 2019
Merged
Show file tree
Hide file tree
Changes from all commits
Commits
File filter

Filter by extension

Filter by extension

Conversations
Failed to load comments.
Jump to
Jump to file
Failed to load files.
Diff view
Diff view
2 changes: 2 additions & 0 deletions auto-update/auto-update.cabal
Original file line number Diff line number Diff line change
Expand Up @@ -21,6 +21,8 @@ library
other-modules: Control.AutoUpdate.Util
build-depends: base >= 4 && < 5
default-language: Haskell2010
if impl(ghc >= 8)
default-extensions: Strict StrictData

-- Test suite is currently not robust enough, gives too many false negatives.

Expand Down
5 changes: 4 additions & 1 deletion warp-tls/warp-tls.cabal
Original file line number Diff line number Diff line change
Expand Up @@ -8,7 +8,7 @@ Maintainer: michael@snoyman.com
Homepage: http://github.com/yesodweb/wai
Category: Web, Yesod
Build-Type: Simple
Cabal-Version: >=1.6
Cabal-Version: >= 1.10
Stability: Stable
description: SSLv1 and SSLv2 are obsoleted by IETF.
We should use TLS 1.2 (or TLS 1.1 or TLS 1.0 if necessary).
Expand All @@ -32,6 +32,9 @@ Library
ghc-options: -Wall
if os(windows)
Cpp-Options: -DWINDOWS
if impl(ghc >= 8)
Default-Extensions: Strict StrictData
Default-Language: Haskell2010


source-repository head
Expand Down
4 changes: 2 additions & 2 deletions warp/test/RunSpec.hs
Original file line number Diff line number Diff line change
Expand Up @@ -411,13 +411,13 @@ spec = do
it "streaming echo #249" $ do
countVar <- newTVarIO (0 :: Int)
let app req f = f $ responseStream status200 [] $ \write _ -> do
let loop = do
let loop = do
bs <- getRequestBodyChunk req
unless (S.null bs) $ do
write $ byteString bs
atomically $ modifyTVar countVar (+ 1)
loop
loop
loop
withApp defaultSettings app $ \port -> do
(sock, _addr) <- getSocketTCP "127.0.0.1" port
sendAll sock "POST / HTTP/1.1\r\ntransfer-encoding: chunked\r\n\r\n"
Expand Down
14 changes: 13 additions & 1 deletion warp/warp.cabal
Original file line number Diff line number Diff line change
Expand Up @@ -8,7 +8,7 @@ Maintainer: michael@snoyman.com
Homepage: http://github.com/yesodweb/wai
Category: Web, Yesod
Build-Type: Simple
Cabal-Version: >=1.8
Cabal-Version: >= 1.10
Stability: Stable
description: HTTP\/1.0, HTTP\/1.1 and HTTP\/2 are supported.
For HTTP\/2, Warp supports direct and ALPN (in TLS)
Expand Down Expand Up @@ -112,6 +112,9 @@ Library
else
Build-Depends: unix
Other-modules: Network.Wai.Handler.Warp.MultiMap
if impl(ghc >= 8)
Default-Extensions: Strict StrictData
Default-Language: Haskell2010

Test-Suite doctest
Type: exitcode-stdio-1.0
Expand All @@ -122,6 +125,9 @@ Test-Suite doctest
, doctest >= 0.10.1
if os(windows)
Buildable: False
if impl(ghc >= 8)
Default-Extensions: Strict StrictData
Default-Language: Haskell2010

Test-Suite spec
Main-Is: Spec.hs
Expand Down Expand Up @@ -223,6 +229,9 @@ Test-Suite spec
if os(windows)
Cpp-Options: -DWINDOWS
Build-Depends: time
if impl(ghc >= 8)
Default-Extensions: Strict StrictData
Default-Language: Haskell2010

Benchmark parser
Type: exitcode-stdio-1.0
Expand Down Expand Up @@ -256,6 +265,9 @@ Benchmark parser
if os(windows)
Cpp-Options: -DWINDOWS
Build-Depends: time
if impl(ghc >= 8)
Default-Extensions: Strict StrictData
Default-Language: Haskell2010

Source-Repository head
Type: git
Expand Down