hacked up the ocaml code-mirror mode for ATS.