modify sml-mode to work with do-notation