f4237bf · streamly · git.iko.soy

strands.cabal → asyncly.cabalrenamed+17−13

compare with master

unifiedsplit

@@ -1,11 +1,15 @@

1−name: strands

1+name: asyncly

2version: 0.5.5

3−synopsis: Compose multithreaded or event driven programs in a convenient and scalable manner.

3+synopsis: Compose asynchronous and multithreaded tasks

4−description: An experimental package based on the transient package. Provides a

4+description: Asyncly allows you to compose asynchronous, concurrent

5− simple interface to integrate with other libraries and monad transformers.

5+ and parallel tasks in a convenient manner without

6+ requiring the programmer to know the gory details

7+ of concurrent and multithreaded programming.

8+ This library is based on the wonderful work of

9+ Alberto G. Corona, see

6− See <http://github.com/agocorona/transient>

10+ <http://github.com/agocorona/transient>

7−homepage: http://github.com/harendra-kumar/strands

11+homepage: http://github.com/harendra-kumar/asyncly

8−bug-reports: https://github.com/harendra-kumar/strands/issues

12+bug-reports: https://github.com/harendra-kumar/asyncly/issues

9license: MIT

13license: MIT

10license-file: LICENSE

14license-file: LICENSE

11author: Alberto G. Corona, Harendra Kumar

15author: Alberto G. Corona, Harendra Kumar

@@ -19,10 +23,10 @@ cabal-version: >= 1.10

19

23

20library

24library

21 hs-source-dirs: src

25 hs-source-dirs: src

22− exposed-modules: Strands

26+ exposed-modules: Asyncly

23− , Strands.Context

27+ , Asyncly.Context

24− , Strands.AsyncT

28+ , Asyncly.AsyncT

25− , Strands.Threads

29+ , Asyncly.Threads

26

30

27 default-language: Haskell2010

31 default-language: Haskell2010

28 ghc-options: -Wall -fwarn-identities -fwarn-incomplete-record-updates

32 ghc-options: -Wall -fwarn-identities -fwarn-incomplete-record-updates

@@ -51,9 +55,9 @@ test-suite test

51 base >= 4.7 && < 5

55 base >= 4.7 && < 5

52 , hspec >= 2.0 && < 3

56 , hspec >= 2.0 && < 3

53 , containers

57 , containers

54− , strands

58+ , asyncly

55 default-language: Haskell2010

59 default-language: Haskell2010

56

60

57source-repository head

61source-repository head

58 type: git

62 type: git

59− location: https://github.com/harendra-kumar/strands

63+ location: https://github.com/harendra-kumar/asyncly

src/Strands.hs → src/Asyncly.hsrenamed+5−5

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

1-- |

2−-- Module : Strands

2+-- Module : Asyncly

4--

5-- License : MIT-style

@@ -8,7 +8,7 @@

8-- Portability : GHC

9--

10

11−module Strands

11+module Asyncly

12 ( AsyncT

13 , MonadAsync

14 , wait

@@ -30,6 +30,6 @@ module Strands

30 )

31where

32

33−import Strands.AsyncT (AsyncT)

33+import Asyncly.AsyncT (AsyncT)

34−import Strands.Context (Log, Loggable)

34+import Asyncly.Context (Log, Loggable)

35−import Strands.Threads

35+import Asyncly.Threads

src/Strands/AsyncT.hs → src/Asyncly/AsyncT.hsrenamed+2−2

@@ -9,7 +9,7 @@

9{-# LANGUAGE TypeFamilies #-}

10{-# LANGUAGE UndecidableInstances #-}

11

12−module Strands.AsyncT

12+module Asyncly.AsyncT

13 ( AsyncT (..)

14 , (<**)

15 , (**>)

@@ -28,7 +28,7 @@ import Control.Monad.Trans.Control (ComposeSt, MonadBaseControl (..),

28 defaultLiftBaseWith,

29 defaultRestoreM)

30

31−import Strands.Context

31+import Asyncly.Context

32

33--import Debug.Trace (traceM)

34

src/Strands/Backtrack.hs → src/Asyncly/Backtrack.hsrenamed

The content is the same.

src/Strands/Context.hs → src/Asyncly/Context.hsrenamed+1−1

@@ -3,7 +3,7 @@

3{-# LANGUAGE FlexibleContexts #-}

4{-# LANGUAGE RecordWildCards #-}

5

6−module Strands.Context

6+module Asyncly.Context

7 ( ChildEvent(..)

8 , Loggable

9 , Log (..)

src/Strands/State.hs → src/Asyncly/State.hsrenamed

The content is the same.

src/Strands/Threads.hs → src/Asyncly/Threads.hsrenamed+3−3

@@ -2,7 +2,7 @@

2{-# LANGUAGE FlexibleContexts #-}

3{-# LANGUAGE ScopedTypeVariables #-}

4

5−module Strands.Threads

5+module Asyncly.Threads

6 ( MonadAsync

7 , wait

8 , wait_

@@ -42,8 +42,8 @@ import Data.IORef (IORef, atomicModifyIORef,

42import Data.List (delete)

43import Data.Maybe (isJust)

44

45−import Strands.AsyncT

45+import Asyncly.AsyncT

46−import Strands.Context

46+import Asyncly.Context

47

48type MonadAsync m = (MonadIO m, MonadBaseControl IO m, MonadThrow m)

49

test/2-gather.hs+1−1

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

1−import Strands

1+import Asyncly

2import Control.Monad.IO.Class (liftIO)

3

4main = do

test/3-async.hs+1−1

@@ -3,7 +3,7 @@ import Control.Monad.IO.Class (liftIO)

3import System.Random (randomIO)

4import System.IO

5

6−import Strands

6+import Asyncly

7

8main = do

9 hSetBuffering stdout LineBuffering

test/3-sample.hs+1−1

@@ -9,7 +9,7 @@ import Control.Monad.Trans.Control (MonadBaseControl)

9import Data.IORef

10import Control.Monad.Catch (MonadThrow)

11

12−import Strands

12+import Asyncly

13

14main = wait_ $ threads 3 $ do

15 liftIO $ hSetBuffering stdout LineBuffering

test/Main.hs+1−1

@@ -4,7 +4,7 @@ import Test.Hspec

4

5import Control.Applicative ((<|>))

6--import Control.Monad.IO.Class (liftIO)

7−import Strands

7+import Asyncly

8import Data.List (sort)

9

10default (Int)

test/alternative.hs+1−1

@@ -4,7 +4,7 @@ import System.Random (randomIO)

4import System.IO

5import Control.Applicative

6

7−import Strands

7+import Asyncly

8

9main = wait_ $ threads 3 $ do

10 liftIO $ hSetBuffering stdout LineBuffering

test/applicative.hs+1−1

@@ -3,7 +3,7 @@

3import Control.Applicative ((<$>), (<*>), (<|>))

4import Control.Monad.IO.Class (liftIO)

5import System.IO

6−import Strands

6+import Asyncly

7

8main = do

9 hSetBuffering stdout LineBuffering

test/gather.hs+1−1

@@ -3,7 +3,7 @@ import Control.Monad.IO.Class (liftIO)

3import System.Random (randomIO)

4import System.IO

5

6−import Strands

6+import Asyncly

7

8--- Check space leaks

9

test/logged.hs+1−1

@@ -3,7 +3,7 @@

3import Control.Applicative ((<$>), (<*>), (<|>))

4import Control.Monad.IO.Class (liftIO)

5import System.IO

6−import Strands

6+import Asyncly

7

8main = do

9 hSetBuffering stdout LineBuffering