diff --git a/CHANGELOG.md b/CHANGELOG.md new file mode 100644 --- /dev/null +++ b/CHANGELOG.md @@ -0,0 +1,70 @@ +# Change Log + +2024-09-03 Laurent P. René de Cotret 0.2.6.0 + +* Bumped dependency bounds to support GHC 8.10.7 - GHC 9.10.1 +* Updated links to point to Distributed Haskell monorepo + +## [v0.2.5.1](https://github.com/haskell-distributed/distributed-process-client-server/tree/v0.2.5.1) (2018-06-14) +[Full Changelog](https://github.com/haskell-distributed/distributed-process-client-server/compare/v0.2.3...v0.2.5.1) + +* Update version bounds. +* Support exceptions-0.10. + + +## [v0.2.3](https://github.com/haskell-distributed/distributed-process-client-server/tree/v0.2.3) (2017-03-28) +[Full Changelog](https://github.com/haskell-distributed/distributed-process-client-server/compare/v0.2.2...v0.2.3) + +## [v0.2.2](https://github.com/haskell-distributed/distributed-process-client-server/tree/v0.2.2) (2017-03-27) +[Full Changelog](https://github.com/haskell-distributed/distributed-process-client-server/compare/v0.2.1...v0.2.2) + +## [v0.2.1](https://github.com/haskell-distributed/distributed-process-client-server/tree/v0.2.1) (2017-03-22) +[Full Changelog](https://github.com/haskell-distributed/distributed-process-client-server/compare/v0.2.0...v0.2.1) + +**Merged pull requests:** + +- Implement ProcessBecome [\#18](https://github.com/haskell-distributed/distributed-process-client-server/pull/18) ([hyperthunk](https://github.com/hyperthunk)) +- Safe Handler Execution [\#17](https://github.com/haskell-distributed/distributed-process-client-server/pull/17) ([hyperthunk](https://github.com/hyperthunk)) + +## [v0.2.0](https://github.com/haskell-distributed/distributed-process-client-server/tree/v0.2.0) (2017-03-13) +[Full Changelog](https://github.com/haskell-distributed/distributed-process-client-server/compare/v0.1.3.2...v0.2.0) + +**Closed issues:** + +- Read external input vectors in the prioritised mailbox drain loop [\#15](https://github.com/haskell-distributed/distributed-process-client-server/issues/15) +- Compiler should enforce rules for prioritised processes [\#13](https://github.com/haskell-distributed/distributed-process-client-server/issues/13) +- Prioritised process mailbox handling can block indefinitely [\#12](https://github.com/haskell-distributed/distributed-process-client-server/issues/12) +- `handleExternal` support [\#9](https://github.com/haskell-distributed/distributed-process-client-server/issues/9) +- `safeCall` and `tryCall` can fail if `resolve` throws [\#8](https://github.com/haskell-distributed/distributed-process-client-server/issues/8) +- Someone on IRC claims we are leaking file descriptors [\#7](https://github.com/haskell-distributed/distributed-process-client-server/issues/7) +- Support GHC 8 [\#5](https://github.com/haskell-distributed/distributed-process-client-server/issues/5) + +**Merged pull requests:** + +- Re-implement Prioritised Managed Processes [\#16](https://github.com/haskell-distributed/distributed-process-client-server/pull/16) ([hyperthunk](https://github.com/hyperthunk)) +- Update bounds & stackify [\#11](https://github.com/haskell-distributed/distributed-process-client-server/pull/11) ([hyperthunk](https://github.com/hyperthunk)) +- Handle arbitrary STM actions [\#10](https://github.com/haskell-distributed/distributed-process-client-server/pull/10) ([hyperthunk](https://github.com/hyperthunk)) +- Bump upper bounds on time and binary [\#6](https://github.com/haskell-distributed/distributed-process-client-server/pull/6) ([3noch](https://github.com/3noch)) +- make adjustments for GHC 8 support [\#4](https://github.com/haskell-distributed/distributed-process-client-server/pull/4) ([agentm](https://github.com/agentm)) +- Stick state argument to request and unify types across the handlers. [\#3](https://github.com/haskell-distributed/distributed-process-client-server/pull/3) ([wiz](https://github.com/wiz)) + +## [v0.1.3.2](https://github.com/haskell-distributed/distributed-process-client-server/tree/v0.1.3.2) (2016-02-16) +[Full Changelog](https://github.com/haskell-distributed/distributed-process-client-server/compare/v0.1.3.1...v0.1.3.2) + +## [v0.1.3.1](https://github.com/haskell-distributed/distributed-process-client-server/tree/v0.1.3.1) (2015-09-29) +[Full Changelog](https://github.com/haskell-distributed/distributed-process-client-server/compare/v0.1.2...v0.1.3.1) + +**Merged pull requests:** + +- Add compatibility with ghc-7.10 [\#1](https://github.com/haskell-distributed/distributed-process-client-server/pull/1) ([qnikst](https://github.com/qnikst)) + +## [v0.1.2](https://github.com/haskell-distributed/distributed-process-client-server/tree/v0.1.2) (2014-12-25) +[Full Changelog](https://github.com/haskell-distributed/distributed-process-client-server/compare/v0.1.1...v0.1.2) + +## [v0.1.1](https://github.com/haskell-distributed/distributed-process-client-server/tree/v0.1.1) (2014-12-17) +[Full Changelog](https://github.com/haskell-distributed/distributed-process-client-server/compare/v0.1.0...v0.1.1) + +## [v0.1.0](https://github.com/haskell-distributed/distributed-process-client-server/tree/v0.1.0) (2014-05-30) + + +\* *This Change Log was automatically generated by [github_changelog_generator](https://github.com/skywinder/Github-Changelog-Generator)* diff --git a/Setup.lhs b/Setup.lhs deleted file mode 100644 --- a/Setup.lhs +++ /dev/null @@ -1,3 +0,0 @@ -#!/usr/bin/env runhaskell -> import Distribution.Simple -> main = defaultMain diff --git a/distributed-process-client-server.cabal b/distributed-process-client-server.cabal --- a/distributed-process-client-server.cabal +++ b/distributed-process-client-server.cabal @@ -1,53 +1,58 @@ +cabal-version: 3.0 name: distributed-process-client-server -version: 0.2.5.1 -cabal-version: >=1.8 +version: 0.2.6.0 build-type: Simple -license: BSD3 +license: BSD-3-Clause license-file: LICENCE stability: experimental Copyright: Tim Watson 2012 - 2017 Author: Tim Watson -Maintainer: Tim Watson -Homepage: http://github.com/haskell-distributed/distributed-process-client-server -Bug-Reports: http://github.com/haskell-distributed/distributed-process-client-server/issues +maintainer: The Distributed Haskell team +Homepage: http://github.com/haskell-distributed/distributed-process +Bug-Reports: http://github.com/haskell-distributed/distributed-process/issues synopsis: The Cloud Haskell Application Platform description: Modelled after Erlang OTP's gen_server, this framework provides similar facilities for Cloud Haskell, grouping essential practices for client/server development into a set of modules and standards designed to help you build concurrent, distributed applications with relative ease. category: Control -Tested-With: GHC==8.2.2 -data-dir: "" +tested-with: GHC==8.10.7 GHC==9.0.2 GHC==9.2.8 GHC==9.4.5 GHC==9.6.4 GHC==9.8.2 GHC==9.10.1 +extra-doc-files: CHANGELOG.md source-repository head - type: git - location: https://github.com/haskell-distributed/distributed-process-client-server + Type: git + Location: https://github.com/haskell-distributed/distributed-process + SubDir: packages/distributed-process-client-server +common warnings + ghc-options: -Wall + -Wcompat + -Widentities + -Wincomplete-uni-patterns + -Wincomplete-record-updates + -Wredundant-constraints + -fhide-source-paths + -Wpartial-fields + library + import: warnings build-depends: base >= 4.8.2.0 && < 5, distributed-process >= 0.6.6 && < 0.8, distributed-process-extras >= 0.3.1 && < 0.4, distributed-process-async >= 0.2.4 && < 0.3, - binary >= 0.6.3.0 && < 0.9, - deepseq >= 1.3.0.1 && < 1.6, + binary >= 0.8 && < 0.9, + deepseq >= 1.4 && < 1.6, mtl, - containers >= 0.4 && < 0.6, - hashable >= 1.2.0.5 && < 1.3, + containers >= 0.6 && < 0.8, + hashable >= 1.2.0.5 && < 1.6, unordered-containers >= 0.2.3.0 && < 0.3, fingertree < 0.2, - stm >= 2.4 && < 2.5, - time > 1.4 && < 1.9.2, + stm >= 2.4 && < 2.6, + time > 1.4 && < 1.15, transformers, - exceptions >= 0.5 && < 0.11 - if impl(ghc <= 7.5) - Build-Depends: template-haskell == 2.7.0.0, - derive == 2.5.5, - uniplate == 1.6.12, - ghc-prim - extensions: CPP + exceptions >= 0.10 && < 0.11 hs-source-dirs: src - ghc-options: -Wall exposed-modules: Control.Distributed.Process.ManagedProcess, Control.Distributed.Process.ManagedProcess.Client, @@ -60,12 +65,14 @@ Control.Distributed.Process.ManagedProcess.Internal.Types, Control.Distributed.Process.ManagedProcess.Internal.GenProcess other-modules: Control.Distributed.Process.ManagedProcess.Internal.PriorityQueue + default-language: Haskell2010 test-suite ManagedProcessTests + import: warnings type: exitcode-stdio-1.0 x-uses-tf: true build-depends: - base >= 4.4 && < 5, + base >= 4.14 && < 5, ansi-terminal >= 0.5 && < 0.9, containers, distributed-process, @@ -76,10 +83,10 @@ network-transport >= 0.4 && < 0.7, mtl, fingertree, - network-transport-tcp >= 0.6 && < 0.7, - binary >= 0.6.3.0 && < 0.9, + network-transport-tcp >= 0.6 && < 0.9, + binary >= 0.8 && < 0.9, deepseq, - network >= 2.3 && < 2.7, + network >= 2.3 && < 3.3, HUnit >= 1.2 && < 2, stm, test-framework >= 0.6 && < 0.9, @@ -95,15 +102,16 @@ TestUtils hs-source-dirs: tests - ghc-options: -Wall -threaded -rtsopts -with-rtsopts=-N -fno-warn-unused-do-bind - extensions: CPP + ghc-options: -threaded -rtsopts -with-rtsopts=-N -fno-warn-unused-do-bind main-is: TestManagedProcess.hs + default-language: Haskell2010 test-suite PrioritisedProcessTests + import: warnings type: exitcode-stdio-1.0 x-uses-tf: true build-depends: - base >= 4.4 && < 5, + base >= 4.14 && < 5, ansi-terminal, containers, distributed-process, @@ -130,6 +138,6 @@ TestUtils hs-source-dirs: tests - ghc-options: -Wall -threaded -rtsopts -with-rtsopts=-N -fno-warn-unused-do-bind - extensions: CPP + ghc-options: -threaded -rtsopts -with-rtsopts=-N -fno-warn-unused-do-bind main-is: TestPrioritisedProcess.hs + default-language: Haskell2010 diff --git a/src/Control/Distributed/Process/ManagedProcess/Internal/Types.hs b/src/Control/Distributed/Process/ManagedProcess/Internal/Types.hs --- a/src/Control/Distributed/Process/ManagedProcess/Internal/Types.hs +++ b/src/Control/Distributed/Process/ManagedProcess/Internal/Types.hs @@ -288,12 +288,10 @@ (a', _) <- lift $ restoreP $ runProcess ourSTate p2 return a' -#if MIN_VERSION_exceptions(0,10,0) generalBracket acquire release inner = GenProcess $ generalBracket (unManaged acquire) (\a e -> unManaged $ release a e) (unManaged . inner) -#endif -- | Run an action in the @GenProcess@ monad. runProcess :: State s -> GenProcess s a -> Process (a, State s) diff --git a/tests/ManagedProcessCommon.hs b/tests/ManagedProcessCommon.hs --- a/tests/ManagedProcessCommon.hs +++ b/tests/ManagedProcessCommon.hs @@ -1,3 +1,4 @@ +{-# LANGUAGE CPP #-} {-# LANGUAGE ScopedTypeVariables #-} {-# LANGUAGE FlexibleInstances #-} {-# LANGUAGE RecordWildCards #-} @@ -21,10 +22,6 @@ import Control.Distributed.Process.ManagedProcess import qualified Control.Distributed.Process.ManagedProcess.UnsafeClient as Unsafe import Control.Distributed.Process.Serializable() - -#if ! MIN_VERSION_base(4,6,0) -import Prelude hiding (catch) -#endif import TestUtils diff --git a/tests/TestManagedProcess.hs b/tests/TestManagedProcess.hs --- a/tests/TestManagedProcess.hs +++ b/tests/TestManagedProcess.hs @@ -1,3 +1,4 @@ +{-# LANGUAGE CPP #-} {-# LANGUAGE ScopedTypeVariables #-} {-# LANGUAGE RecordWildCards #-} @@ -23,10 +24,6 @@ import MathsDemo import Counter import qualified SafeCounter as SafeCounter - -#if ! MIN_VERSION_base(4,6,0) -import Prelude hiding (catch) -#endif import Test.Framework (Test, testGroup) import Test.Framework.Providers.HUnit (testCase) diff --git a/tests/TestPrioritisedProcess.hs b/tests/TestPrioritisedProcess.hs --- a/tests/TestPrioritisedProcess.hs +++ b/tests/TestPrioritisedProcess.hs @@ -1,3 +1,4 @@ +{-# LANGUAGE CPP #-} {-# LANGUAGE ScopedTypeVariables #-} {-# LANGUAGE DeriveDataTypeable #-} {-# LANGUAGE DeriveGeneric #-} @@ -36,10 +37,6 @@ import Data.List (isInfixOf) import Data.Maybe (isNothing, isJust) import Data.Typeable (Typeable) - -#if ! MIN_VERSION_base(4,6,0) -import Prelude hiding (catch) -#endif import Test.Framework (Test, testGroup) import Test.Framework.Providers.HUnit (testCase) diff --git a/tests/TestUtils.hs b/tests/TestUtils.hs --- a/tests/TestUtils.hs +++ b/tests/TestUtils.hs @@ -37,14 +37,12 @@ mkNode :: String -> IO LocalNode mkNode port = do - Right (transport1, _) <- createTransportExposeInternals - "127.0.0.1" port ("127.0.0.1",) defaultTCPParameters + Right (transport1, _) <- createTransportExposeInternals (defaultTCPAddr "127.0.0.1" port) defaultTCPParameters newLocalNode transport1 initRemoteTable -- | Given a @builder@ function, make and run a test suite on a single transport testMain :: (NT.Transport -> IO [Test]) -> IO () testMain builder = do - Right (transport, _) <- createTransportExposeInternals - "127.0.0.1" "0" ("127.0.0.1",) defaultTCPParameters + Right (transport, _) <- createTransportExposeInternals (defaultTCPAddr "127.0.0.1" "0") defaultTCPParameters testData <- builder transport defaultMain testData