glue-common 0.6.1 → 0.6.2
raw patch · 4 files changed
+13/−13 lines, 4 filessetup-changed
Files
- Setup.hs +0/−0
- glue-common.cabal +1/−1
- src/Glue/Types.hs +10/−10
- test/Main.hs +2/−2
Setup.hs view
glue-common.cabal view
@@ -1,5 +1,5 @@ name: glue-common-version: 0.6.1+version: 0.6.2 synopsis: Make better services and clients. description: Common types and base functions used in the glue family of libraries. license: BSD3
src/Glue/Types.hs view
@@ -1,6 +1,6 @@-{-# LANGUAGE FlexibleContexts #-}+{-# LANGUAGE FlexibleContexts #-}+{-# LANGUAGE RankNTypes #-} {-# LANGUAGE ScopedTypeVariables #-}-{-# LANGUAGE RankNTypes #-} -- | Module containing the root types and some support functionality. module Glue.Types(@@ -17,15 +17,15 @@ , makeCall ) where -import Control.Applicative-import Data.Hashable-import Control.Concurrent+import Control.Applicative+import Control.Concurrent import qualified Control.Concurrent.MVar.Lifted as MV-import Control.Exception.Base hiding(throw, throwIO, catch)-import Control.Exception.Lifted hiding(throw)-import Control.Monad.Trans.Control-import qualified Data.HashSet as S-import qualified Data.HashMap.Strict as M+import Control.Exception.Base hiding (catch, throw, throwIO)+import Control.Exception.Lifted hiding (throw)+import Control.Monad.Trans.Control+import Data.Hashable+import qualified Data.HashMap.Strict as M+import qualified Data.HashSet as S -- | Type alias for the most basic form of a service supported. type BasicService m a b = a -> m b
test/Main.hs view
@@ -1,10 +1,10 @@ module Main where -import Test.Hspec.Runner import qualified Spec+import Test.Hspec.Runner customConfig :: Config-customConfig = defaultConfig +customConfig = defaultConfig { configColorMode = ColorAlways , configPrintCpuTime = True }