From 1a0cdc2fb84909f68699fbefbbfc15322bacab72 Mon Sep 17 00:00:00 2001 From: Ayman Nadeem Date: Tue, 1 Oct 2019 18:38:22 -0400 Subject: [PATCH] read entire file specified into a bytestring --- semantic-ast/src/CLI.hs | 1 + 1 file changed, 1 insertion(+) diff --git a/semantic-ast/src/CLI.hs b/semantic-ast/src/CLI.hs index 439db3a71..a13ec10be 100644 --- a/semantic-ast/src/CLI.hs +++ b/semantic-ast/src/CLI.hs @@ -14,3 +14,4 @@ import System.IO (FilePath) main :: IO () main = do args <- head <$> getArgs + bytestring <- Data.ByteString.readFile args