Constant folding

Based on https://github.com/esumii/min-caml