keybindings.el

(defun my/realgud-init ()
  (interactive)
  (when (not (realgud-get-cmdbuf))
    (realgud-short-key-mode)))

(defun my/realgud-eval-dwim ()
  (interactive)
  (when (not (use-region-p))
    (mc--mark-symbol-at-point))
  (realgud:cmd-eval-dwim)
  (call-interactively 'evil-exit-visual-state))

(spacemacs|define-transient-state realgud
  :title "RealGUD transient state"
  :doc
  "
  :flow:          :breaks:        :misc:
  ----------------------------------------------
  [_n_] Next      [_bb_] Break    [_S_] avy
  [_s_] Step in   [_bd_] Delete   [_e_] eval
  [_f_] Step out  [_bs_] Disable
  [_c_] Continue  [_be_] Enable
  [_J_] Jump      [_bc_] Clear
  ^ ^             ^ ^             [_q_] Quit [_Q_] Quit debugger
  "
  :on-enter (my/realgud-init)
  :on-exit (realgud-short-key-mode-off)
  :bindings
  ("n" realgud:cmd-next)
  ("s" realgud:cmd-step)
  ("f" realgud:cmd-finish)
  ("c" realgud:cmd-continue)
  ("J" realgud:cmd-jump)
  ("bb" realgud:cmd-break)
  ("bd" realgud:cmd-delete)
  ("bs" realgud:cmd-disable)
  ("be" realgud:cmd-enable)
  ("bc" realgud:cmd-clear)
  ("S" avy-goto-char-timer)
  ("e" my/realgud-eval-dwim)
  ("q" nil :exit t)
  ("Q" realgud:cmd-quit :exit t))