[cvs-nhc98] Correct transformation of pattern bindings in do.