43 lines
1.2 KiB
EmacsLisp
43 lines
1.2 KiB
EmacsLisp
;;; $DOOMDIR/config/dap.el -*- lexical-binding: t; -*-
|
|
(use-package! dape)
|
|
|
|
(require 'hydra)
|
|
(defhydra hydra-dap (:color pink :hint nil)
|
|
"
|
|
^Dape Hydra^
|
|
------------------------------------------------
|
|
_n_: Next _e_: Eval _Q_: Disconnect
|
|
_i_: Step In
|
|
_o_: Step Out
|
|
_c_: Continue
|
|
_r_: Restart
|
|
|
|
"
|
|
("n" #'dape-next)
|
|
("i" #'dape-step-in)
|
|
("o" #'dape-step-out)
|
|
("c" #'dape-continue)
|
|
("e" #'dape-evaluate-expression)
|
|
("r" #'dape-restart)
|
|
("q" nil "Quit" :color blue)
|
|
("Q" #'dape-quit :color blue))
|
|
|
|
(map! :map dap-mode-map
|
|
:leader
|
|
:prefix ("d" . "dap")
|
|
:desc "dap hydra" "h" #'hydra-dap/body
|
|
|
|
:desc "dap debug" "s" #'dape
|
|
:desc "dap quit" "q" #'dape-quit
|
|
:desc "dap restart" "r" #'dape-restart
|
|
|
|
:desc "dap breakpoint toggle" "b" #'dape-breakpoint-toggle
|
|
:desc "dap breakpoint remove all" "B" #'dape-breakpoint-remove-all
|
|
:desc "dap breakpoint log" "l" #'dape-breakpoint-log
|
|
|
|
:desc "dap continue" "c" #'dape-continue
|
|
:desc "dap next" "n" #'dape-next
|
|
:desc "dap step in" "i" #'dape-step-in
|
|
:desc "dap step out" "o" #'dape-step-out
|
|
|
|
:desc "dap eval" "e" #'dape-evaluate-expression)
|