github/semantic
1
1
Fork 0
mirror of https://github.com/github/semantic.git synced 2024-11-28 01:47:01 +03:00
Code Issues Projects Releases Wiki Activity

Fix positions and kinds in tests

Browse Source
This commit is contained in:
joshvera 2020-02-11 13:06:29 -05:00
parent 284912ad21
commit 9913031f97
1 changed files with 14 additions and 13 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

27
semantic-python/test-graphing/GraphTest.hs
View File

@ -101,18 +101,6 @@ expectedQualifiedImport = do
newReference (Name.name "ints") refProperties newReference (Name.name "ints") refProperties
pure Complete pure Complete
expectedFunctionArg :: ScopeGraphEff sig m => m Result
expectedFunctionArg = do
(_, associatedScope) <- declareFunction (Just $ Name.name "foo") (Props.Function ScopeGraph.Function (Span (Pos 0 0) (Pos 1 12)))
withScope associatedScope $ do
declare "x" (Props.Declaration ScopeGraph.Identifier ScopeGraph.Default Nothing lowerBound)
let refProperties = Props.Reference ScopeGraph.Identifier ScopeGraph.Default (Span (Pos 0 0) (Pos 0 1))
reference "x" "x" refProperties
pure ()
let refProperties = Props.Reference ScopeGraph.Identifier ScopeGraph.Default (Span (Pos 0 0) (Pos 0 3))
newReference "foo" refProperties
pure Complete
expectedImportHole :: ScopeGraphEff sig m => m Result expectedImportHole :: ScopeGraphEff sig m => m Result
expectedImportHole = do expectedImportHole = do
newEdge ScopeGraph.Import (NonEmpty.fromList ["cheese", "ints"]) newEdge ScopeGraph.Import (NonEmpty.fromList ["cheese", "ints"])
@ -129,7 +117,7 @@ assertLexicalScope = do
expectedLexicalScope :: ScopeGraphEff sig m => m Result expectedLexicalScope :: ScopeGraphEff sig m => m Result
expectedLexicalScope = do expectedLexicalScope = do
_ <- declareFunction (Just $ Name.name "foo") (Props.Function ScopeGraph.Function (Span (Pos 0 0) (Pos 1 24))) _ <- declareFunction (Just $ Name.name "foo") (Props.Function ScopeGraph.Function (Span (Pos 0 0) (Pos 1 24)))
let refProperties = Props.Reference ScopeGraph.Identifier ScopeGraph.Default (Span (Pos 0 0) (Pos 0 3)) let refProperties = Props.Reference ScopeGraph.Identifier ScopeGraph.Default (Span (Pos 3 0) (Pos 3 3))
newReference "foo" refProperties newReference "foo" refProperties
pure Complete pure Complete
@ -142,6 +130,19 @@ assertFunctionArg = do
(expecto, Complete) -> HUnit.assertEqual "Should work for simple case" expecto graph (expecto, Complete) -> HUnit.assertEqual "Should work for simple case" expecto graph
(_, Todo msg) -> HUnit.assertFailure ("Failed to complete:" <> show msg) (_, Todo msg) -> HUnit.assertFailure ("Failed to complete:" <> show msg)
expectedFunctionArg :: ScopeGraphEff sig m => m Result
expectedFunctionArg = do
(_, associatedScope) <- declareFunction (Just $ Name.name "foo") (Props.Function ScopeGraph.Function (Span (Pos 0 0) (Pos 1 12)))
withScope associatedScope $ do
declare "x" (Props.Declaration ScopeGraph.Parameter ScopeGraph.Default Nothing (Span (Pos 0 8) (Pos 0 9)))
let refProperties = Props.Reference ScopeGraph.Identifier ScopeGraph.Default (Span (Pos 1 11) (Pos 1 12))
newReference "x" refProperties
pure ()
let refProperties = Props.Reference ScopeGraph.Identifier ScopeGraph.Default (Span (Pos 3 0) (Pos 3 3))
newReference "foo" refProperties
pure Complete
assertImportHole :: HUnit.Assertion assertImportHole :: HUnit.Assertion
assertImportHole = do assertImportHole = do
let path = "semantic-python/test/fixtures/cheese/6-01-imports.py" let path = "semantic-python/test/fixtures/cheese/6-01-imports.py"