482aaa8 · distributed-process

git.iko.soy/distributed-process

on master help sign in

Don't use the deprecated extensions field in .cabal.

482aaa8Mathieu Boespflug11 years ago

benchmarks/ProcessRing.hs+4−1

compare with master

unifiedsplit

@@ -4,6 +4,10 @@ To run the benchmarks, select a value for the ring size (sz) and

4the number of times to send a message around the ring

6-}

8+{-# LANGUAGE BangPatterns #-}

9+{-# LANGUAGE ScopedTypeVariables #-}

10+

7import Control.Monad

11import Control.Monad

8import Control.Distributed.Process hiding (catch)

12import Control.Distributed.Process hiding (catch)

9import Control.Distributed.Process.Node

13import Control.Distributed.Process.Node

@@ -110,4 +114,3 @@ main = do

110 node <- newLocalNode transport initRemoteTable

114 node <- newLocalNode transport initRemoteTable

111 catch (void $ runProcess node $ initialProcess opt)

115 catch (void $ runProcess node $ initialProcess opt)

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

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

113−

benchmarks/Spawns.hs+2

@@ -1,3 +1,5 @@

1+{-# LANGUAGE BangPatterns #-}

1-- | Like Throughput, but send every ping from a different process

3-- | Like Throughput, but send every ping from a different process

2-- (i.e., require a lightweight connection per ping)

4-- (i.e., require a lightweight connection per ping)

3import System.Environment

5import System.Environment

benchmarks/Throughput.hs+2

@@ -1,4 +1,6 @@

1+{-# LANGUAGE BangPatterns #-}

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveDataTypeable #-}

2import System.Environment

4import System.Environment

3import Control.Monad

5import Control.Monad

4import Control.Applicative

6import Control.Applicative

distributed-process.cabal−5

@@ -86,7 +86,6 @@ Library

86 Control.Distributed.Process.Management.Internal.Trace.Remote,

87 Control.Distributed.Process.Management.Internal.Trace.Types,

88 Control.Distributed.Process.Management.Internal.Trace.Tracer

89− -- Extensions: -- we use explicit per-file LANGUAGE pragmas

90 ghc-options: -Wall

89 ghc-options: -Wall

91 HS-Source-Dirs: src

90 HS-Source-Dirs: src

92 if impl(ghc <= 7.4.2)

91 if impl(ghc <= 7.4.2)

@@ -118,7 +117,6 @@ benchmark distributed-process-throughput

118 binary >= 0.6.3 && < 0.8

117 binary >= 0.6.3 && < 0.8

119 Main-Is: benchmarks/Throughput.hs

118 Main-Is: benchmarks/Throughput.hs

120 ghc-options: -Wall

119 ghc-options: -Wall

121− Extensions: BangPatterns

122

120

123benchmark distributed-process-latency

121benchmark distributed-process-latency

124 Type: exitcode-stdio-1.0

122 Type: exitcode-stdio-1.0

@@ -129,7 +127,6 @@ benchmark distributed-process-latency

129 binary >= 0.6.3 && < 0.8

127 binary >= 0.6.3 && < 0.8

130 Main-Is: benchmarks/Latency.hs

128 Main-Is: benchmarks/Latency.hs

131 ghc-options: -Wall

129 ghc-options: -Wall

132− Extensions: BangPatterns

133

130

134benchmark distributed-process-channels

131benchmark distributed-process-channels

135 Type: exitcode-stdio-1.0

132 Type: exitcode-stdio-1.0

@@ -140,7 +137,6 @@ benchmark distributed-process-channels

140 binary >= 0.6.3 && < 0.8

137 binary >= 0.6.3 && < 0.8

141 Main-Is: benchmarks/Channels.hs

138 Main-Is: benchmarks/Channels.hs

142 ghc-options: -Wall

139 ghc-options: -Wall

143− Extensions: BangPatterns

144

140

145benchmark distributed-process-spawns

141benchmark distributed-process-spawns

146 Type: exitcode-stdio-1.0

142 Type: exitcode-stdio-1.0

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

151 binary >= 0.6.3 && < 0.8

147 binary >= 0.6.3 && < 0.8

152 Main-Is: benchmarks/Spawns.hs

148 Main-Is: benchmarks/Spawns.hs

153 ghc-options: -Wall

149 ghc-options: -Wall

154− Extensions: BangPatterns

155

150

156benchmark distributed-process-ring

151benchmark distributed-process-ring

157 Type: exitcode-stdio-1.0

152 Type: exitcode-stdio-1.0