1
1
mirror of https://github.com/github/semantic.git synced 2024-11-24 08:54:07 +03:00

Make semantic-python tests work.

This commit is contained in:
Patrick Thomson 2019-11-08 22:37:17 -05:00
parent 9c9e9db80f
commit 2e39e129cd
2 changed files with 5 additions and 5 deletions

View File

@ -8,8 +8,8 @@ module Directive ( Directive (..)
) where ) where
import Analysis.Concrete (Concrete (..)) import Analysis.Concrete (Concrete (..))
import Control.Algebra
import Control.Applicative import Control.Applicative
import Control.Effect
import Control.Monad import Control.Monad
import Control.Monad.Trans.Resource (ResourceT, runResourceT) import Control.Monad.Trans.Resource (ResourceT, runResourceT)
import Core.Core (Core) import Core.Core (Core)

View File

@ -6,9 +6,9 @@ import Analysis.Concrete (Concrete)
import qualified Analysis.Concrete as Concrete import qualified Analysis.Concrete as Concrete
import Analysis.File import Analysis.File
import Analysis.ScopeGraph import Analysis.ScopeGraph
import Control.Effect import Control.Algebra
import Control.Effect.Fail import Control.Carrier.Fail.Either
import Control.Effect.Reader import Control.Carrier.Reader
import Control.Monad hiding (fail) import Control.Monad hiding (fail)
import Control.Monad.Catch import Control.Monad.Catch
import Control.Monad.IO.Class import Control.Monad.IO.Class
@ -116,7 +116,7 @@ checkPythonFile fp = HUnit.testCaseSteps (Path.toString fp) $ \step -> withFroze
result <- ByteString.readFile (Path.toString fullPath) >>= TS.parseByteString TSP.tree_sitter_python result <- ByteString.readFile (Path.toString fullPath) >>= TS.parseByteString TSP.tree_sitter_python
-- Run the compiler -- Run the compiler
let coreResult = Control.Effect.run let coreResult = Control.Algebra.run
. runFail . runFail
. runReader @Py.Bindings mempty . runReader @Py.Bindings mempty
. Py.toplevelCompile . Py.toplevelCompile