diff options
Diffstat (limited to 'main.hs')
-rw-r--r-- | main.hs | 3 |
1 files changed, 2 insertions, 1 deletions
@@ -33,6 +33,7 @@ main = do when (isLeft parseResult) $ dieShow $ fromLeft parseResult let ast = fromRight parseResult - pprint ast + -- print ast + putStrLn $ pshow ast either die print $ codegen ast "Module" fname |