TINY Compiler in Haskell