diff options
Diffstat (limited to 'Main.hs')
-rw-r--r-- | Main.hs | 3 |
1 files changed, 2 insertions, 1 deletions
@@ -32,10 +32,11 @@ performCompile :: String -> IO () performCompile source = do let eres = return source >>= parseProgram <?> "Parse error" + >>= return . tracePrettyId >>= typeCheck <?> "Type error" >>= buildIR <?> "IR building error" >>= optimise <?> "Error while optimising" - >>= return . traceShowId + -- >>= return . traceShowId >>= verify <?> "Verify error" >>= return . tracePrettyId >>= codegen <?> "Codegen error" |