1 {-# LANGUAGE OverloadedStrings #-}
4 import System.Environment
11 import Mate.BasicBlocks
12 import Mate.X86CodeGen
13 import Mate.MethodPool
22 cls <- parseClassFile clspath
24 hmap <- parseMethod cls "main"
28 entry <- compileBB hmap' cls "main"
29 printf "executing `main' now:\n"
31 Nothing -> error "main not found"
32 _ -> error "Usage: mate <class-file>"