my:exchange-point-and-mark
は、直前の編集ポイントと現在のポイントとを行き来できる設定です。
(defun my:exchange-point-and-mark ()
"No mark active `exchange-point-and-mark'."
(interactive)
(exchange-point-and-mark)
(deactivate-mark))
(bind-key "C-x C-x" 'my:exchange-point-and-mark)