fix Main
This commit is contained in:
parent
22db2724ce
commit
f3f74d581a
2 changed files with 2 additions and 2 deletions
|
@ -35,7 +35,7 @@ main : IO ()
|
||||||
main = do
|
main = do
|
||||||
seen <- newIORef SortedSet.empty
|
seen <- newIORef SortedSet.empty
|
||||||
defs <- newIORef SortedMap.empty
|
defs <- newIORef SortedMap.empty
|
||||||
suf <- newIORef $ the Nat 0
|
suf <- newIORef 0
|
||||||
for_ (drop 1 !getArgs) $ \file => do
|
for_ (drop 1 !getArgs) $ \file => do
|
||||||
putStrLn "checking \{file}"
|
putStrLn "checking \{file}"
|
||||||
Right res <- fromParserIO ["."] seen suf defs $ loadProcessFile noLoc file
|
Right res <- fromParserIO ["."] seen suf defs $ loadProcessFile noLoc file
|
||||||
|
|
|
@ -5,7 +5,7 @@ import public Quox.Parser.FromParser.Error as Quox.Parser.FromParser
|
||||||
|
|
||||||
import Quox.Parser.Syntax
|
import Quox.Parser.Syntax
|
||||||
import Quox.Parser.Parser
|
import Quox.Parser.Parser
|
||||||
import Quox.Parser.LoadFile
|
import public Quox.Parser.LoadFile
|
||||||
import Quox.Typechecker
|
import Quox.Typechecker
|
||||||
|
|
||||||
import Data.List
|
import Data.List
|
||||||
|
|
Loading…
Reference in a new issue