[jhc] darcs patch: fix bug when 'do' expressions used with infix expressi...