eeva/gRPC-haskell
1
0
Fork 0
mirror of https://github.com/unclechu/gRPC-haskell.git synced 2024-11-23 03:29:42 +01:00
Code Issues Projects Releases Wiki Activity

serverPort => clientServerPort

Browse source
This commit is contained in:
Parnell Springmeyer 2017-04-30 18:01:45 -05:00
parent 169dbb7fff
commit 82000dadd4
No known key found for this signature in database
GPG key ID: DCCF89258EAD874A
1 changed files with 2 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
tests/LowLevelTests.hs
View file

@ -7,7 +7,6 @@
{-# LANGUAGE RecordWildCards #-}
{-# LANGUAGE ScopedTypeVariables #-}
{-# LANGUAGE TupleSections #-}
{-# LANGUAGE ViewPatterns #-}
{-# OPTIONS_GHC -fno-warn-orphans #-}
module LowLevelTests where
@ -24,9 +23,9 @@ import qualified Data.Map.Strict as M
import qualified Data.Set as S
import GHC.Exts (fromList, toList)
import Network.GRPC.LowLevel
import Network.GRPC.LowLevel.GRPC (threadDelaySecs)
import qualified Network.GRPC.LowLevel.Call.Unregistered as U
import qualified Network.GRPC.LowLevel.Client.Unregistered as U
import Network.GRPC.LowLevel.GRPC (threadDelaySecs)
import qualified Network.GRPC.LowLevel.Server.Unregistered as U
import qualified Pipes as P
import Test.Tasty
@ -339,7 +338,7 @@ testAuthMetadataPropagate = testCase "auth metadata inherited by children" $ do
(Just "tests/ssl/localhost.crt")
Nothing
(Just server1ClientPlugin)),
serverPort = 50052
clientServerPort = 50052
}
server = do