diff --git a/semantic-diff.cabal b/semantic-diff.cabal index 1026d518a..b397c89d8 100644 --- a/semantic-diff.cabal +++ b/semantic-diff.cabal @@ -43,9 +43,9 @@ library , Data.Term , Decorator , Diffing.Algorithm + , Diffing.Interpreter , Files , Info - , Interpreter , Language , Language.Markdown.Assignment , Language.Markdown.Syntax diff --git a/src/Interpreter.hs b/src/Diffing/Interpreter.hs similarity index 99% rename from src/Interpreter.hs rename to src/Diffing/Interpreter.hs index f2276d038..e84fd7ebb 100644 --- a/src/Interpreter.hs +++ b/src/Diffing/Interpreter.hs @@ -1,5 +1,5 @@ {-# LANGUAGE DataKinds, GADTs, RankNTypes, ScopedTypeVariables, TypeOperators #-} -module Interpreter +module Diffing.Interpreter ( diffTerms , diffSyntaxTerms ) where diff --git a/src/Semantic.hs b/src/Semantic.hs index 6f379aebb..815624a26 100644 --- a/src/Semantic.hs +++ b/src/Semantic.hs @@ -25,7 +25,7 @@ import Data.Term import Data.Typeable import Decorator import Info -import Interpreter +import Diffing.Interpreter import qualified Language import Parser import Renderer diff --git a/src/Semantic/Util.hs b/src/Semantic/Util.hs index 11c36124e..66fd9888e 100644 --- a/src/Semantic/Util.hs +++ b/src/Semantic/Util.hs @@ -9,7 +9,7 @@ import Data.Record import Data.Functor.Classes import Diffing.Algorithm import Data.Align.Generic -import Interpreter +import Diffing.Interpreter import Parser import Data.Functor.Both import Data.Term diff --git a/test/Data/RandomWalkSimilarity/Spec.hs b/test/Data/RandomWalkSimilarity/Spec.hs index 9ed54cf58..1fdb4ac38 100644 --- a/test/Data/RandomWalkSimilarity/Spec.hs +++ b/test/Data/RandomWalkSimilarity/Spec.hs @@ -12,7 +12,7 @@ import Data.Term import Data.These import Data.Union import Decorator -import Interpreter +import Diffing.Interpreter import RWS import Test.Hspec import Test.Hspec.LeanCheck diff --git a/test/InterpreterSpec.hs b/test/InterpreterSpec.hs index afa5bbb59..ab45e0574 100644 --- a/test/InterpreterSpec.hs +++ b/test/InterpreterSpec.hs @@ -9,7 +9,7 @@ import Data.Record import qualified Data.Syntax as Syntax import Data.Term import Data.Union -import Interpreter +import Diffing.Interpreter import Test.Hspec (Spec, describe, it, parallel) import Test.Hspec.Expectations.Pretty import Test.Hspec.LeanCheck diff --git a/test/TOCSpec.hs b/test/TOCSpec.hs index 34bd14cb3..0280bbea4 100644 --- a/test/TOCSpec.hs +++ b/test/TOCSpec.hs @@ -23,7 +23,7 @@ import Data.Term import Data.Text (Text) import Data.These import Info hiding (Go) -import Interpreter +import Diffing.Interpreter import Language import Prelude hiding (readFile) import Renderer