Renamed plutus-common module

IntersectMBO · Oct 23, 2020 · 07a8216 · 07a8216
1 parent 60e3977
commit 07a8216
Show file tree

Hide file tree

Showing 15 changed files with 15 additions and 15 deletions.
diff --git a/plutus-common/plutus-common.cabal b/plutus-common/plutus-common.cabal
@@ -20,7 +20,7 @@ source-repository head
 
 library
   exposed-modules:
-      PlutusError
+      Language.Plutus.Common
   other-modules:
   hs-source-dirs:
       src

diff --git a/plutus-common/src/PlutusError.hs → plutus-common/src/Language/Plutus/Common.hs b/plutus-common/src/PlutusError.hs → plutus-common/src/Language/Plutus/Common.hs
@@ -1,4 +1,4 @@
-module PlutusError
+module Language.Plutus.Common
     ( ErrorCode(..)
     ) where
 

diff --git a/plutus-core/plutus-ir/Language/PlutusIR/Error.hs b/plutus-core/plutus-ir/Language/PlutusIR/Error.hs
@@ -29,7 +29,7 @@ import           Control.Lens
 
 import qualified Data.Text                  as T
 import           Data.Text.Prettyprint.Doc  as PP
-import PlutusError
+import Language.Plutus.Common
 
 data TypeErrorExt uni ann =
       MalformedDataConstrResType

diff --git a/plutus-core/plutus-ir/Language/PlutusIR/Parser.hs b/plutus-core/plutus-ir/Language/PlutusIR/Parser.hs
@@ -42,7 +42,7 @@ import           Data.Word
 import qualified Control.Monad.Combinators.NonEmpty as NE
 import           Text.Megaparsec.Char
 import qualified Text.Megaparsec.Char.Lexer         as Lex
-import PlutusError
+import Language.Plutus.Common
 
 
 

diff --git a/plutus-core/src/Language/PlutusCore/DeBruijn/Internal.hs b/plutus-core/src/Language/PlutusCore/DeBruijn/Internal.hs
@@ -46,7 +46,7 @@ import           Numeric.Natural
 
 import           Control.DeepSeq            (NFData)
 import           GHC.Generics
-import PlutusError
+import Language.Plutus.Common
 
 -- | A relative index used for de Bruijn identifiers.
 newtype Index = Index Natural

diff --git a/plutus-core/src/Language/PlutusCore/Error.hs b/plutus-core/src/Language/PlutusCore/Error.hs
@@ -42,7 +42,7 @@ import           Control.Monad.Except
 import qualified Data.Text                          as T
 import           Data.Text.Prettyprint.Doc
 import           Data.Text.Prettyprint.Doc.Internal (Doc (Text))
-import PlutusError
+import Language.Plutus.Common
 {- Note [Annotations and equality]
 Equality of two errors DOES DEPEND on their annotations.
 So feel free to use @deriving Eq@ for errors.

diff --git a/plutus-core/src/Language/PlutusCore/Evaluation/Machine/Cek.hs b/plutus-core/src/Language/PlutusCore/Evaluation/Machine/Cek.hs
@@ -73,7 +73,7 @@ import           Data.Hashable
 import           Data.HashMap.Monoidal
 import qualified Data.Map                                           as Map
 import           Data.Text.Prettyprint.Doc
-import PlutusError
+import Language.Plutus.Common
 
 {- Note [Scoping]
    The CEK machine does not rely on the global uniqueness condition, so the renamer pass is not a

diff --git a/plutus-core/src/Language/PlutusCore/Evaluation/Machine/Exception.hs b/plutus-core/src/Language/PlutusCore/Evaluation/Machine/Exception.hs
@@ -43,7 +43,7 @@ import           Control.Monad.Except
 import           Data.String                                     (IsString)
 import           Data.Text                                       (Text)
 import           Data.Text.Prettyprint.Doc
-import PlutusError
+import Language.Plutus.Common
 
 -- | When unlifting of a PLC term into a Haskell value fails, this error is thrown.
 newtype UnliftingError

diff --git a/plutus-core/untyped-plutus-core/Language/UntypedPlutusCore/Evaluation/Machine/Cek.hs b/plutus-core/untyped-plutus-core/Language/UntypedPlutusCore/Evaluation/Machine/Cek.hs
@@ -71,7 +71,7 @@ import           Data.Hashable
 import           Data.HashMap.Monoidal
 import qualified Data.Map                                           as Map
 import           Data.Text.Prettyprint.Doc
-import PlutusError
+import Language.Plutus.Common
 
 {- Note [Scoping]
    The CEK machine does not rely on the global uniqueness condition, so the renamer pass is not a

diff --git a/plutus-errors/src/Errors.hs b/plutus-errors/src/Errors.hs
@@ -2,7 +2,7 @@
 module Errors (errors) where
 
 import Language.Haskell.TH
-import PlutusError
+import Language.Plutus.Common
 
 import qualified Language.PlutusIR.Error as PIR
 import qualified Language.PlutusIR.Parser as PIR

diff --git a/plutus-errors/src/TH/Bootstrap.hs b/plutus-errors/src/TH/Bootstrap.hs
@@ -3,7 +3,7 @@ module TH.Bootstrap (
     ) where
 
 import Language.Haskell.TH
-import PlutusError
+import Language.Plutus.Common
 import Data.Traversable
 import Data.List
 import Data.Function

diff --git a/plutus-errors/src/TH/Codes.hs b/plutus-errors/src/TH/Codes.hs
@@ -2,7 +2,7 @@
 module TH.Codes (genCodes) where
 
 import Language.Haskell.TH
-import PlutusError
+import Language.Plutus.Common
 
 genCodes :: [Name] -> Q Exp
 genCodes ns = listE $ fmap (\ n -> do

diff --git a/plutus-tx-plugin/src/Language/PlutusTx/Compiler/Error.hs b/plutus-tx-plugin/src/Language/PlutusTx/Compiler/Error.hs
@@ -29,7 +29,7 @@ import           Control.Monad.Except
 import qualified Data.Text                         as T
 import qualified Data.Text.Prettyprint.Doc         as PP
 import           Data.Typeable
-import PlutusError
+import Language.Plutus.Common
 
 -- | An error with some (nested) context. The integer argument to 'WithContextC' represents
 -- the priority of the context when displaying it. Lower numbers are more prioritised.

diff --git a/plutus-tx/src/Language/PlutusTx/Code.hs b/plutus-tx/src/Language/PlutusTx/Code.hs
@@ -21,7 +21,7 @@ import           Control.Exception
 
 import qualified Data.ByteString                  as BS
 import qualified Data.ByteString.Lazy             as BSL
-import PlutusError
+import Language.Plutus.Common
 
 -- NOTE: any changes to this type must be paralleled by changes
 -- in the plugin code that generates values of this type. That is

diff --git a/plutus-tx/src/Language/PlutusTx/Lift/Class.hs b/plutus-tx/src/Language/PlutusTx/Lift/Class.hs
@@ -52,7 +52,7 @@ import           Data.Proxy
 import qualified Data.Text                              as T
 import           Data.Traversable
 import qualified Data.Text.Prettyprint.Doc              as PP
-import PlutusError
+import Language.Plutus.Common
 import qualified Control.Exception as Prelude (throw, Exception)
 import qualified Data.Typeable as Prelude