1
1
mirror of https://github.com/github/semantic.git synced 2024-12-22 22:31:36 +03:00

🔥 args

This commit is contained in:
Rick Winfrey 2016-11-03 17:14:09 -05:00
parent eb56419607
commit 0a680feab9

View File

@ -23,7 +23,7 @@ import Text.Parser.TreeSitter.Language
import Renderer.JSON()
run :: Arguments -> IO ()
run args@Arguments{..} = do
run Arguments{..} = do
sources <- sequence $ readAndTranscodeFile <$> filePaths
let sourceBlobs = Source.SourceBlob <$> sources <*> pure mempty <*> filePaths <*> pure (Just Source.defaultPlainBlob)