A simple compiler for a Scheme-like language