diff --git a/.github/workflows/tests.yml b/.github/workflows/tests.yml index 29061f948..2fe69936f 100755 --- a/.github/workflows/tests.yml +++ b/.github/workflows/tests.yml @@ -1,10 +1,10 @@ name: Tests on: - pull_request: - push: - branches: - - master + push: + branches: [ 'master', 'ci' ] + pull_request: + branches: [ 'master' ] jobs: stack: diff --git a/stack-lts-18.yaml b/stack-lts-18.yaml index 91bd5dbf0..00f981328 100644 --- a/stack-lts-18.yaml +++ b/stack-lts-18.yaml @@ -26,7 +26,7 @@ extra-deps: - crypton-x509-1.7.6 - crypton-x509-store-1.6.9 - crypton-x509-validation-1.6.12 - - http2-5.0.0 + - http2-5.1.0 - network-byte-order-0.1.7 - network-control-0.0.2 - tls-1.7.0 diff --git a/stack-lts-19.yaml b/stack-lts-19.yaml index aaffb25b0..c2b3c265d 100644 --- a/stack-lts-19.yaml +++ b/stack-lts-19.yaml @@ -30,8 +30,8 @@ extra-deps: - crypton-x509-system-1.6.7 - crypton-x509-validation-1.6.12 - fast-logger-3.2.2 - - http2-5.0.0 - - http3-0.0.7 + - http2-5.1.0 + - http3-0.0.8 - memory-0.18.0 - network-3.1.4.0 - network-byte-order-0.1.7 diff --git a/stack-lts-20.yaml b/stack-lts-20.yaml index de991d56b..8e0b107b5 100644 --- a/stack-lts-20.yaml +++ b/stack-lts-20.yaml @@ -31,8 +31,8 @@ extra-deps: - crypton-x509-system-1.6.7 - crypton-x509-validation-1.6.12 - fast-logger-3.2.2 - - http2-5.0.0 - - http3-0.0.7 + - http2-5.1.0 + - http3-0.0.8 - memory-0.18.0 - multipart-0.2.1 - network-byte-order-0.1.7 diff --git a/stack-lts-21.yaml b/stack-lts-21.yaml index 935d841d6..e09e0c785 100644 --- a/stack-lts-21.yaml +++ b/stack-lts-21.yaml @@ -29,8 +29,8 @@ extra-deps: - crypton-x509-store-1.6.9 - crypton-x509-system-1.6.7 - crypton-x509-validation-1.6.12 - - http2-5.0.0 - - http3-0.0.7 + - http2-5.1.0 + - http3-0.0.8 - network-control-0.0.2 - network-udp-0.0.0 - quic-0.1.12 diff --git a/stack-nightly.yaml b/stack-nightly.yaml index 2527fef3c..cc371ba5f 100644 --- a/stack-nightly.yaml +++ b/stack-nightly.yaml @@ -25,7 +25,8 @@ nix: - zlib extra-deps: - crypto-token-0.1.0 - - http3-0.0.7 + - http2-5.1.0 + - http3-0.0.8 - network-udp-0.0.0 - quic-0.1.15 - sockaddr-0.0.1 \ No newline at end of file diff --git a/stack.yaml b/stack.yaml index 9923c3dce..f6b7791e8 100644 --- a/stack.yaml +++ b/stack.yaml @@ -24,7 +24,8 @@ nix: - zlib extra-deps: - crypto-token-0.1.0 - - http3-0.0.7 + - http2-5.1.0 + - http3-0.0.8 - network-udp-0.0.0 - quic-0.1.14 - sockaddr-0.0.1 diff --git a/warp/test/PackIntSpec.hs b/warp/test/PackIntSpec.hs new file mode 100644 index 000000000..cfaf0cdf5 --- /dev/null +++ b/warp/test/PackIntSpec.hs @@ -0,0 +1,14 @@ +module PackIntSpec (spec) where + +import qualified Data.ByteString.Char8 as C8 +import Network.Wai.Handler.Warp.PackInt +import Test.Hspec +import Test.Hspec.QuickCheck +import qualified Test.QuickCheck as QC + +spec :: Spec +spec = describe "readInt64" $ do + prop "" $ \n -> packIntegral (abs n :: Int) == C8.pack (show (abs n)) + prop "" $ \(QC.Large n) -> + let n' = fromIntegral (abs n :: Int) + in packIntegral (n' :: Int) == C8.pack (show n')