`(insert-char char)`?