From ea681150783d1feae265a045edefaeb0e10dd8c7 Mon Sep 17 00:00:00 2001 From: Tom Smeding Date: Fri, 24 Jul 2020 21:54:08 +0200 Subject: Code cleanup --- main/Main.hs | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) (limited to 'main') 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 -- cgit v1.2.3-70-g09d2