1
1
mirror of https://github.com/github/semantic.git synced 2024-11-28 18:23:44 +03:00

Fix the tests.

This commit is contained in:
Rob Rix 2019-09-27 15:15:37 -04:00
parent e1226efbbd
commit 379b9d4f75
No known key found for this signature in database
GPG Key ID: F188A01508EA1CF7

View File

@ -29,12 +29,12 @@ import Data.String (fromString)
import GHC.Stack
import qualified Language.Python.Core as Py
import Prelude hiding (fail)
import qualified Source.Span as Source (Span)
import Streaming
import qualified Streaming.Prelude as Stream
import qualified Streaming.Process
import System.Directory
import System.Exit
import qualified TreeSitter.Span as TS (Span)
import qualified TreeSitter.Python as TSP
import qualified TreeSitter.Python.AST as TSP
import qualified TreeSitter.Unmarshal as TS
@ -100,7 +100,7 @@ fixtureTestTreeForFile fp = HUnit.testCaseSteps (Path.toString fp) $ \step -> wi
. runFail
. runReader (fromString @Py.SourcePath . Path.toString $ fp)
. runReader @Py.Bindings mempty
. Py.compile @(TSP.Module TS.Span) @_ @(Term (Ann :+: Core))
. Py.compile @(TSP.Module Source.Span) @_ @(Term (Ann :+: Core))
<$> result
for_ directives $ \directive -> do