✨
This commit is contained in:
@ -149,7 +149,9 @@ let parseFastoFile (filename : string) : AbSyn.UntypedProg =
|
||||
let compile (filename : string) optimiser : Unit =
|
||||
let pgm = parseFastoFile filename
|
||||
let pgm_decorated = TypeChecker.checkProg pgm
|
||||
//printfn "%A" pgm_decorated
|
||||
let pgm_optimised = optimiser pgm_decorated
|
||||
//printfn "%A" pgm_optimised
|
||||
let mips_code = CodeGen.compile pgm_optimised
|
||||
let mips_code_text = Mips.ppMipsProg mips_code
|
||||
saveFile (filename + ".asm") mips_code_text
|
||||
|
Reference in New Issue
Block a user