PLT-5817 Removed lint.

input-output-hk · Jun 20, 2023 · a636e62 · a636e62
1 parent c2a5faa
commit a636e62
Show file tree

Hide file tree

Showing 9 changed files with 4 additions and 16 deletions.
diff --git a/marlowe-integration/marlowe-integration.cabal b/marlowe-integration/marlowe-integration.cabal
@@ -55,18 +55,16 @@ library
     , aeson
     , async
     , async-components
-    , base >=4.9 && <5
+    , base                                                                                                                                          >=4.9 && <5
     , bytestring
     , cardano-api
     , cardano-crypto-wrapper
     , cardano-integration
     , cardano-ledger-byron
-    , co-log >=0.5.0.0 && <0.6.0.0
     , containers
-    , eventuo11y >=0.9 && <0.11
+    , eventuo11y                                                                                                                                    >=0.9 && <0.11
     , eventuo11y-extras
     , exceptions
-    , general-allocate
     , hasql
     , hasql-pool
     , http-client
@@ -76,7 +74,6 @@ library
     , marlowe-protocols
     , marlowe-runtime-web:{marlowe-runtime-web, server}
     , marlowe-runtime:{marlowe-runtime, contract, contract-api, discovery-api, history-api, indexer, proxy, proxy-api, sync, sync-api, tx, tx-api}
-    , mtl >=2.2 && <3
     , network
     , nonempty-containers
     , ouroboros-network
@@ -127,7 +124,7 @@ executable marlowe-integration-example
   main-is:            Main.hs
   build-depends:
     , aeson
-    , base >=4.9 && <5
+    , base                 >=4.9 && <5
     , cardano-api
     , marlowe-cardano
     , marlowe-chain-sync

diff --git a/marlowe-runtime/contract-api/Language/Marlowe/Protocol/Load/Client.hs b/marlowe-runtime/contract-api/Language/Marlowe/Protocol/Load/Client.hs
@@ -2,11 +2,8 @@
 {-# LANGUAGE DataKinds #-}
 {-# LANGUAGE GADTs #-}
 {-# LANGUAGE InstanceSigs #-}
-{-# LANGUAGE KindSignatures #-}
 {-# LANGUAGE RankNTypes #-}
-{-# LANGUAGE TypeFamilies #-}
 {-# LANGUAGE TypeFamilyDependencies #-}
-{-# LANGUAGE TypeOperators #-}
 {-# LANGUAGE UndecidableInstances #-}
 
 -- | A client machine type for loading contracts incrementally.

diff --git a/marlowe-runtime/contract-api/Language/Marlowe/Protocol/Load/Types.hs b/marlowe-runtime/contract-api/Language/Marlowe/Protocol/Load/Types.hs
@@ -3,7 +3,6 @@
 {-# LANGUAGE PolyKinds #-}
 {-# LANGUAGE RankNTypes #-}
 {-# LANGUAGE TypeFamilies #-}
-{-# LANGUAGE TypeOperators #-}
 {-# LANGUAGE UndecidableInstances #-}
 
 -- | The Marlowe load protocol is a protocol for incrementally loading and

diff --git a/marlowe-runtime/marlowe-contract/Main.hs b/marlowe-runtime/marlowe-contract/Main.hs
@@ -1,7 +1,6 @@
 {-# LANGUAGE Arrows #-}
 {-# LANGUAGE FlexibleInstances #-}
 {-# LANGUAGE GADTs #-}
-{-# LANGUAGE InstanceSigs #-}
 {-# LANGUAGE MultiParamTypeClasses #-}
 {-# LANGUAGE RankNTypes #-}
 {-# LANGUAGE TypeFamilies #-}

diff --git a/marlowe-runtime/marlowe-indexer/Main.hs b/marlowe-runtime/marlowe-indexer/Main.hs
@@ -2,7 +2,6 @@
 {-# LANGUAGE FlexibleContexts #-}
 {-# LANGUAGE FlexibleInstances #-}
 {-# LANGUAGE GADTs #-}
-{-# LANGUAGE InstanceSigs #-}
 {-# LANGUAGE MultiParamTypeClasses #-}
 {-# LANGUAGE RankNTypes #-}
 {-# LANGUAGE TypeFamilies #-}

diff --git a/marlowe-runtime/marlowe-proxy/Main.hs b/marlowe-runtime/marlowe-proxy/Main.hs
@@ -2,7 +2,6 @@
 {-# LANGUAGE DataKinds #-}
 {-# LANGUAGE FlexibleInstances #-}
 {-# LANGUAGE GADTs #-}
-{-# LANGUAGE InstanceSigs #-}
 {-# LANGUAGE MultiParamTypeClasses #-}
 {-# LANGUAGE RankNTypes #-}
 {-# LANGUAGE TypeFamilies #-}

diff --git a/marlowe-runtime/marlowe-sync/Main.hs b/marlowe-runtime/marlowe-sync/Main.hs
@@ -1,7 +1,6 @@
 {-# LANGUAGE Arrows #-}
 {-# LANGUAGE FlexibleInstances #-}
 {-# LANGUAGE GADTs #-}
-{-# LANGUAGE InstanceSigs #-}
 {-# LANGUAGE MultiParamTypeClasses #-}
 {-# LANGUAGE RankNTypes #-}
 {-# LANGUAGE TypeFamilies #-}

diff --git a/marlowe-runtime/marlowe-tx/Main.hs b/marlowe-runtime/marlowe-tx/Main.hs
@@ -3,7 +3,6 @@
 {-# LANGUAGE Arrows #-}
 {-# LANGUAGE FlexibleInstances #-}
 {-# LANGUAGE GADTs #-}
-{-# LANGUAGE InstanceSigs #-}
 {-# LANGUAGE MultiParamTypeClasses #-}
 {-# LANGUAGE RankNTypes #-}
 {-# LANGUAGE TypeFamilies #-}

diff --git a/marlowe-runtime/tx-api/Language/Marlowe/Runtime/Transaction/Api.hs b/marlowe-runtime/tx-api/Language/Marlowe/Runtime/Transaction/Api.hs
@@ -399,7 +399,7 @@ data MarloweTxCommand status err result where
     -- ^ Optional metadata to attach to the transaction
     -> Lovelace
     -- ^ Min Lovelace which should be used for the contract output.
-    -> (Either (Contract v) DatumHash)
+    -> Either (Contract v) DatumHash
     -- ^ The contract to run, or the hash of the contract to load from the store.
     -> MarloweTxCommand Void (CreateError v) (ContractCreated BabbageEra v)