diff options
author | Tom Smeding <tom.smeding@gmail.com> | 2020-07-24 21:54:08 +0200 |
---|---|---|
committer | Tom Smeding <tom.smeding@gmail.com> | 2020-07-24 21:54:08 +0200 |
commit | ea681150783d1feae265a045edefaeb0e10dd8c7 (patch) | |
tree | 7fb928cff6e371180c85b28928797ae97a7e6df0 /main | |
parent | b5b044ceb4c178a656c0ddc27adec4a719b35893 (diff) |
Code cleanup
Diffstat (limited to 'main')
-rw-r--r-- | main/Main.hs | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/main/Main.hs b/main/Main.hs index 3216833..dbac4c4 100644 --- a/main/Main.hs +++ b/main/Main.hs @@ -2,8 +2,8 @@ module Main where import System.Exit -import qualified CC.Parser -import qualified CC.Typecheck +import qualified CC.Parser as Parser +import qualified CC.Typecheck as Typecheck import CC.Pretty import CC.Types @@ -23,8 +23,8 @@ passJoin f1 f2 ctx a = f1 ctx a >>= f2 ctx main :: IO () main = do - let parse = pass CC.Parser.runPass - typecheck = pass CC.Typecheck.runPass + let parse = pass Parser.runPass + typecheck = pass Typecheck.runPass let combined = parse `passJoin` typecheck |