diff --git a/semantic-ast/src/CLI.hs b/semantic-ast/src/CLI.hs index 31e55e118..77415f859 100644 --- a/semantic-ast/src/CLI.hs +++ b/semantic-ast/src/CLI.hs @@ -26,6 +26,9 @@ generateAST :: SemanticAST -> IO () generateAST (SemanticAST file _) = do bytestring <- Data.ByteString.readFile file print =<< parseByteString @TreeSitter.Python.AST.Module @(Range, Span) tree_sitter_python bytestring +-- TODO: Define formats for json, sexpression, etc. +data Format = Show + data SemanticAST = SemanticAST { sourceFilePath :: Prelude.String , format :: Prelude.String