Lines Matching +defs:cl +defs:key
270 ;; Define edebug-gensym - from old cl.el
929 (if (featurep 'cl) 'function* 'function))
1642 (&key . edebug-match-&key)
1762 (def-edebug-spec &key edebug-match-&key)
1764 (defun edebug-match-&key (cursor specs)
1960 ;;; See cl-specs.el for common lisp specs.
2216 (defvar cl-lexical-debug) ;; Defined in cl.el
2271 (cl-lexical-debug t)
3533 The mode is requested via the key that would be used to set the mode in
3541 (key (read-key-sequence
3543 "Change initial edebug mode for %s from %s (%s) to (enter key): "
3550 (mode (cdr (assq (key-binding key) edebug-initial-mode-alist)))
3659 (defvar cl-debug-env nil) ;; defined in cl; non-nil when lexical env used.
3662 ;; Are there cl lexical variables active?
3663 (if cl-debug-env
3664 (eval (cl-macroexpand-all edebug-expr cl-debug-env))
3803 (define-key emacs-lisp-mode-map "\C-x\C-a\C-s" 'edebug-step-mode)
3804 (define-key emacs-lisp-mode-map "\C-x\C-a\C-n" 'edebug-next-mode)
3805 (define-key emacs-lisp-mode-map "\C-x\C-a\C-c" 'edebug-go-mode)
3806 (define-key emacs-lisp-mode-map "\C-x\C-a\C-l" 'edebug-where))
3811 (define-key map " " 'edebug-step-mode)
3812 (define-key map "n" 'edebug-next-mode)
3813 (define-key map "g" 'edebug-go-mode)
3814 (define-key map "G" 'edebug-Go-nonstop-mode)
3815 (define-key map "t" 'edebug-trace-mode)
3816 (define-key map "T" 'edebug-Trace-fast-mode)
3817 (define-key map "c" 'edebug-continue-mode)
3818 (define-key map "C" 'edebug-Continue-fast-mode)
3820 ;;(define-key map "f" 'edebug-forward) not implemented
3821 (define-key map "f" 'edebug-forward-sexp)
3822 (define-key map "h" 'edebug-goto-here)
3824 (define-key map "I" 'edebug-instrument-callee)
3825 (define-key map "i" 'edebug-step-in)
3826 (define-key map "o" 'edebug-step-out)
3829 (define-key map "q" 'top-level)
3830 (define-key map "Q" 'edebug-top-level-nonstop)
3831 (define-key map "a" 'abort-recursive-edit)
3832 (define-key map "S" 'edebug-stop)
3835 (define-key map "b" 'edebug-set-breakpoint)
3836 (define-key map "u" 'edebug-unset-breakpoint)
3837 (define-key map "B" 'edebug-next-breakpoint)
3838 (define-key map "x" 'edebug-set-conditional-breakpoint)
3839 (define-key map "X" 'edebug-set-global-break-condition)
3842 (define-key map "r" 'edebug-previous-result)
3843 (define-key map "e" 'edebug-eval-expression)
3844 (define-key map "\C-x\C-e" 'edebug-eval-last-sexp)
3845 (define-key map "E" 'edebug-visit-eval-list)
3848 (define-key map "w" 'edebug-where)
3849 (define-key map "v" 'edebug-view-outside) ;; maybe obsolete??
3850 (define-key map "p" 'edebug-bounce-point)
3851 (define-key map "P" 'edebug-view-outside) ;; same as v
3852 (define-key map "W" 'edebug-toggle-save-windows)
3855 (define-key map "?" 'edebug-help)
3856 (define-key map "d" 'edebug-backtrace)
3858 (define-key map "-" 'negative-argument)
3861 (define-key map "=" 'edebug-temp-display-freq-count)
3864 (define-key map "\C-c\C-s" 'edebug-step-mode)
3865 (define-key map "\C-c\C-n" 'edebug-next-mode)
3866 (define-key map "\C-c\C-c" 'edebug-go-mode)
3868 (define-key map "\C-x " 'edebug-set-breakpoint)
3869 (define-key map "\C-c\C-d" 'edebug-unset-breakpoint)
3870 (define-key map "\C-c\C-t"
3872 (define-key map "\C-c\C-l" 'edebug-where)
3879 "Prefix key for global edebug commands, available from any buffer.")
3884 (define-key map " " 'edebug-step-mode)
3885 (define-key map "g" 'edebug-go-mode)
3886 (define-key map "G" 'edebug-Go-nonstop-mode)
3887 (define-key map "t" 'edebug-trace-mode)
3888 (define-key map "T" 'edebug-Trace-fast-mode)
3889 (define-key map "c" 'edebug-continue-mode)
3890 (define-key map "C" 'edebug-Continue-fast-mode)
3893 (define-key map "b" 'edebug-set-breakpoint)
3894 (define-key map "u" 'edebug-unset-breakpoint)
3895 (define-key map "x" 'edebug-set-conditional-breakpoint)
3896 (define-key map "X" 'edebug-set-global-break-condition)
3899 (define-key map "w" 'edebug-where)
3900 (define-key map "W" 'edebug-toggle-save-windows)
3903 (define-key map "q" 'top-level)
3904 (define-key map "Q" 'edebug-top-level-nonstop)
3905 (define-key map "a" 'abort-recursive-edit)
3908 (define-key map "=" 'edebug-display-freq-count)
3912 (global-unset-key global-edebug-prefix)
3913 (global-set-key global-edebug-prefix global-edebug-map)
3924 buffer) there are local and global key bindings to several Edebug
4076 (define-key edebug-eval-mode-map "\C-c\C-w" 'edebug-where)
4077 (define-key edebug-eval-mode-map "\C-c\C-d" 'edebug-delete-eval-item)
4078 (define-key edebug-eval-mode-map "\C-c\C-u" 'edebug-update-eval-list)
4079 (define-key edebug-eval-mode-map "\C-x\C-e" 'edebug-eval-last-sexp)
4080 (define-key edebug-eval-mode-map "\C-j" 'edebug-eval-print-last-sexp))
4088 global key bindings to several Edebug specific commands. E.g.
4460 edebug-gensym ;; also in cl.el
4475 cl-macroexpand-all
4493 (if (featurep 'cl)
4495 (function (lambda () (require 'cl-specs))))
4496 ;; The following causes cl-specs to be loaded if you load cl.el.
4497 (add-hook 'cl-load-hook
4498 (function (lambda () (require 'cl-specs)))))
4500 ;;; edebug-cl-read and cl-read are available from liberte@cs.uiuc.edu
4501 (if (featurep 'cl-read)
4503 (function (lambda () (require 'edebug-cl-read))))
4504 ;; The following causes edebug-cl-read to be loaded when you load cl-read.el.
4505 (add-hook 'cl-read-load-hooks
4506 (function (lambda () (require 'edebug-cl-read)))))