diff options
Diffstat (limited to 'Main.hs')
-rw-r--r-- | Main.hs | 4 |
1 files changed, 3 insertions, 1 deletions
@@ -5,6 +5,7 @@ import System.Environment import System.Exit import Compiler +import CompilerMacros import Optimiser import Parser import VM @@ -23,7 +24,8 @@ main = do _ -> usage >> exitFailure prog <- parseProgram mfname source >>= either (die . show) return - irprog <- either die return (compileProgram prog) + let prog' = compilerMacros prog + irprog <- either die return (compileProgram prog') let opt = optimise irprog -- print opt vmRun opt |