33bf088 · distributed-process

git.iko.soy/distributed-process

Relax upper bounds in dependencies.

commit33bf0885fbe2f56bff4afdc4be88fd176c8b3327 authorFacundo Domínguez <facundo.dominguez@tweag.io> dateTue 22 Aug 2017, 14:57 (9 years ago) parent2dd3d76

6 files changed+16−11

compare with master

unifiedsplit

benchmarks/Channels.hs+2−1 benchmarks/Latency.hs+2−1 benchmarks/ProcessRing.hs+2−1 benchmarks/Spawns.hs+2−1 benchmarks/Throughput.hs+2−1 distributed-process.cabal+6−6

benchmarks/Channels.hs+2−1

@@ -36,6 +36,7 @@ initialProcess "CLIENT" = do

3636main :: IO ()

3737main = do

3838 [role, host, port] <- getArgs

39− Right transport <- createTransport host port defaultTCPParameters

39+ Right transport <- createTransport

40+ host port (\sn -> (host, port)) defaultTCPParameters

4041 node <- newLocalNode transport initRemoteTable

4142 runProcess node $ initialProcess role

benchmarks/Latency.hs+2−1

@@ -31,6 +31,7 @@ initialProcess "CLIENT" = do

3131main :: IO ()

3232main = do

3333 [role, host, port] <- getArgs

34− Right transport <- createTransport host port defaultTCPParameters

34+ Right transport <- createTransport

35+ host port (\sn -> (host, sn)) defaultTCPParameters

3536 node <- newLocalNode transport initRemoteTable

3637 runProcess node $ initialProcess role

benchmarks/ProcessRing.hs+2−1

@@ -110,7 +110,8 @@ main = do

110110 argv <- getArgs

111111 (opt, _) <- parseArgv argv

112112 putStrLn $ "options: " ++ (show opt)

113− Right transport <- createTransport "127.0.0.1" "8090" defaultTCPParameters

113+ Right transport <- createTransport

114+ "127.0.0.1" "8090" (\sn -> ("127.0.0.1", sn)) defaultTCPParameters

114115 node <- newLocalNode transport initRemoteTable

115116 catch (void $ runProcess node $ initialProcess opt)

116117 (\(e :: SomeException) -> putStrLn $ "ERROR: " ++ (show e))

benchmarks/Spawns.hs+2−1

@@ -42,6 +42,7 @@ initialProcess "CLIENT" = do

4242main :: IO ()

4343main = do

4444 [role, host, port] <- getArgs

45− Right transport <- createTransport host port defaultTCPParameters

45+ Right transport <- createTransport

46+ host port (\sn -> (host, sn)) defaultTCPParameters

4647 node <- newLocalNode transport initRemoteTable

4748 runProcess node $ initialProcess role

benchmarks/Throughput.hs+2−1

@@ -67,6 +67,7 @@ initialProcess "CLIENT" = do

6767main :: IO ()

6868main = do

6969 [role, host, port] <- getArgs

70− Right transport <- createTransport host port defaultTCPParameters

70+ Right transport <- createTransport

71+ host port (\sn -> (host, sn)) defaultTCPParameters

7172 node <- newLocalNode transport initRemoteTable

7273 runProcess node $ initialProcess role

distributed-process.cabal+6−6

@@ -52,7 +52,7 @@ Library

5252 bytestring >= 0.9 && < 0.11,

5353 random >= 1.0 && < 1.2,

5454 distributed-static >= 0.2 && < 0.4,

55− rank1dynamic >= 0.1 && < 0.4,

55+ rank1dynamic >= 0.1 && < 0.5,

5656 syb >= 0.3 && < 0.8,

5757 exceptions >= 0.5,

5858 containers >= 0.5 && < 0.6,

@@ -121,7 +121,7 @@ benchmark distributed-process-throughput

121121 Type: exitcode-stdio-1.0

122122 Build-Depends: base >= 4.6 && < 5,

123123 distributed-process,

124− network-transport-tcp >= 0.3 && < 0.6,

124+ network-transport-tcp >= 0.3 && < 0.7,

125125 bytestring >= 0.9 && < 0.11,

126126 binary >= 0.6.3 && < 0.9

127127 Main-Is: benchmarks/Throughput.hs

@@ -131,7 +131,7 @@ benchmark distributed-process-latency

131131 Type: exitcode-stdio-1.0

132132 Build-Depends: base >= 4.6 && < 5,

133133 distributed-process,

134− network-transport-tcp >= 0.3 && < 0.6,

134+ network-transport-tcp >= 0.3 && < 0.7,

135135 bytestring >= 0.9 && < 0.11,

136136 binary >= 0.6.3 && < 0.9

137137 Main-Is: benchmarks/Latency.hs

@@ -141,7 +141,7 @@ benchmark distributed-process-channels

141141 Type: exitcode-stdio-1.0

142142 Build-Depends: base >= 4.6 && < 5,

143143 distributed-process,

144− network-transport-tcp >= 0.3 && < 0.6,

144+ network-transport-tcp >= 0.3 && < 0.7,

145145 bytestring >= 0.9 && < 0.11,

146146 binary >= 0.6.3 && < 0.9

147147 Main-Is: benchmarks/Channels.hs

@@ -151,7 +151,7 @@ benchmark distributed-process-spawns

151151 Type: exitcode-stdio-1.0

152152 Build-Depends: base >= 4.6 && < 5,

153153 distributed-process,

154− network-transport-tcp >= 0.3 && < 0.6,

154+ network-transport-tcp >= 0.3 && < 0.7,

155155 bytestring >= 0.9 && < 0.11,

156156 binary >= 0.6.3 && < 0.9

157157 Main-Is: benchmarks/Spawns.hs

@@ -161,7 +161,7 @@ benchmark distributed-process-ring

161161 Type: exitcode-stdio-1.0

162162 Build-Depends: base >= 4.6 && < 5,

163163 distributed-process,

164− network-transport-tcp >= 0.3 && < 0.6,

164+ network-transport-tcp >= 0.3 && < 0.7,

165165 bytestring >= 0.9 && < 0.11,

166166 binary >= 0.6.3 && < 0.9

167167 Main-Is: benchmarks/ProcessRing.hs