Update Compiler.hs