Update to-char.r