diff --git a/semantic-ast/src/CLI.hs b/semantic-ast/src/CLI.hs
index d141dc5c7..bcf12e1e6 100644
--- a/semantic-ast/src/CLI.hs
+++ b/semantic-ast/src/CLI.hs
@@ -13,6 +13,6 @@ import System.IO (FilePath)
 
 main :: IO ()
 main = do
-  args <- head <$> getArgs
-  bytestring <- Data.ByteString.readFile args
+  args <- getArgs
+  bytestring <- Data.ByteString.readFile (args !! 0)
   print =<< parseByteString @TreeSitter.Python.AST.Module @(Range, Span) tree_sitter_python bytestring