Lines Matching +defs:local +defs:set +defs:key
30 ;; source code while executing functions. You can also set
70 Each time it is set to a new value, Edebug will call those functions
89 variable. You may wish to make it local to each buffer with
90 \(make-local-variable 'edebug-all-defs) in your
120 the window configurations, it is better to set this variable to nil.
357 (set-buffer (marker-buffer edebug:s-r-beg))
394 (set-window-buffer window buffer)
395 (set-window-hscroll window 0);; should this be??
396 ;; Selecting the window does not set the buffer until command loop.
397 ;;(set-buffer buffer)
411 (defun edebug-set-buffer-points (buffer-points)
416 (set-buffer (car buf-point))
433 (defun edebug-set-windows (window-info)
443 (set-window-buffer window buffer)
444 (set-window-point window point)
445 (set-window-start window start)
446 (set-window-hscroll window hscroll)))))
449 (set-window-configuration window-info)))
526 (set-default (nth 1 form) (eval (nth 2 form))))
622 ;; buffer-local variable `edebug-form-data'.
624 (make-variable-buffer-local 'edebug-form-data)
628 ;; This is an automatic buffer local variable. Each entry looks like:
650 (defsubst edebug-set-form-data-entry (entry name begin end)
652 (set-marker (nth 1 entry) begin)
653 (set-marker (nth 2 entry) end))
699 ;; (set-marker (nth 1 entry) nil)
700 ;; (set-marker (nth 2 entry) nil)
987 (defsubst edebug-set-cursor (cursor expressions offsets)
1296 (edebug-set-cursor cursor (edebug-cursor-expressions cursor)
1315 (set-marker (make-marker) form-begin))))
1337 ;; Set the name here if it was not set by edebug-make-enter-wrapper.
1357 (set-marker (make-marker) form-end)
1359 (edebug-set-form-data-entry
1376 (if (not edebug-top-window-data) ;; if not already set, do it now.
1494 (edebug-set-cursor cursor (edebug-cursor-expressions cursor)
1599 (edebug-set-cursor cursor (list this-form) this-offset)
1642 (&key . edebug-match-&key)
1707 (edebug-set-cursor cursor this-form this-offset)
1743 (edebug-set-cursor cursor this-form this-offset))
1762 (def-edebug-spec &key edebug-match-&key)
1764 (defun edebug-match-&key (cursor specs)
1778 ;; Simply set the gate to prevent backtracking at this level.
1933 ;; set the def-args bound in edebug-defining-form
2204 (defvar edebug-execution-mode 'step) ; Current edebug mode set by user.
2210 (defvar edebug-outside-overriding-local-map)
2211 (defvar edebug-outside-overriding-terminal-local-map)
2237 ;; If we reach here without another non-local exit, then send signal again.
2273 (edebug-outside-overriding-local-map overriding-local-map)
2274 (edebug-outside-overriding-terminal-local-map
2275 overriding-terminal-local-map)
2286 ;; non-nil. Again, local binding may not be best.
2291 (overriding-local-map nil)
2292 (overriding-terminal-local-map nil)
2338 \(for a buffer-local binding), a frame (for a frame-local binding),
2351 (set var value))))
2355 (set var value)))))
2520 ;; Does this still need to be buffer-local??
2522 ;;(make-variable-buffer-local 'edebug-window-start)
2553 ;; Uses local variables of edebug-enter, edebug-before, edebug-after
2608 ;;(set-buffer edebug-buffer)
2622 (set-buffer edebug-buffer)
2727 (edebug-set-windows edebug-outside-windows)
2733 (edebug-set-buffer-points edebug-buffer-points))
2737 (set-window-start edebug-trace-window
2745 (set-window-start window (cdr edebug-window-data)
2752 ;; (set-window-point window edebug-point)
2767 (set-buffer edebug-outside-buffer))
2775 ;; Does zmacs-regions need to be nil while doing set-marker?
2776 (set-marker (edebug-mark-marker) edebug-outside-mark))
2784 (set-buffer edebug-buffer)
2786 (set-buffer current-buffer))
2850 ;; Assume that none of the variables below are buffer-local.
2855 (set-buffer edebug-outside-buffer) ; in case match buffer different
2867 (edebug-outside-map (current-local-map))
2890 ;; Declare global values local but using the same global value.
2891 ;; We could set these to the values for previous edebug call.
2940 (set-match-data edebug-outside-match-data)
2943 ;; so set it back before exiting let.
2946 (set-buffer edebug-buffer)
2950 (use-local-map edebug-outside-map)
2953 ;; gotta have a buffer to let its buffer local variables be set
2988 (set-window-start (selected-window) old-start))
2992 (set-window-start
3025 (set-marker overlay-arrow-position pos (current-buffer))))
3045 (edebug-set-windows edebug-outside-windows)
3050 (edebug-set-windows edebug-inside-windows)))
3095 ;; But it is not always set. - experiment
3097 ;; (edebug-set-windows edebug-inside-windows))
3108 (edebug-set-windows edebug-outside-windows)
3122 ;; If the buffer's currently displayed, avoid set-window-configuration.
3129 (marker-position (edebug-mark-marker)) "<not set>"))
3254 (message "Breakpoint set in %s with condition: %s"
3256 (message "Breakpoint set in %s" edebug-def-name)))
3265 (defun edebug-set-breakpoint (arg)
3277 (defun edebug-set-global-break-condition (expression)
3292 (defun edebug-set-mode (mode shortmsg msg)
3311 (edebug-set-mode 'step "" "Edebug will stop at next stop point."))
3316 (edebug-set-mode 'next "" "Edebug will stop after next eval."))
3320 With prefix ARG, set temporary break at current point and go."
3323 (edebug-set-breakpoint t))
3324 (edebug-set-mode 'go "Go..." "Edebug will go until break."))
3329 (edebug-set-mode 'Go-nonstop "Go-Nonstop..."
3336 (edebug-set-mode 'trace "Tracing..." "Edebug will trace with pause."))
3341 (edebug-set-mode 'Trace-fast
3347 (edebug-set-mode 'continue "Continue..."
3353 (edebug-set-mode 'Continue-fast "Continue fast..."
3376 (edebug-set-mode
3514 ;; (edebug-set-mode 'exiting "Exit..."))
3528 "Association list between commands and the modes they set.")
3531 '(defun edebug-set-initial-mode ()
3533 The mode is requested via the key that would be used to set the mode in
3537 (keymap (if (eq edebug-mode-map (current-local-map))
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)))
3577 (edebug-set-windows edebug-outside-windows)))
3579 (set-buffer edebug-buffer) ; why?
3580 ;; (use-local-map edebug-outside-map)
3581 (set-match-data edebug-outside-match-data)
3583 (let (;; (edebug-inside-map (current-local-map)) ;; restore map??
3613 (set-buffer edebug-outside-buffer)
3616 (set-marker (edebug-mark-marker) edebug-outside-mark))
3620 ;; (use-local-map edebug-inside-map)
3623 (edebug-set-windows edebug-inside-windows))
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"
3871 (lambda () (interactive) (edebug-set-breakpoint 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
3959 (use-local-map edebug-mode-map))
3985 (set-buffer edebug-eval-buffer)
3999 (set-buffer (setq edebug-eval-buffer (get-buffer-create "*edebug*")))
4074 (set-keymap-parent edebug-eval-mode-map lisp-interaction-mode-map)
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))
4087 In addition to all Interactive Emacs Lisp commands there are local and
4088 global key bindings to several Edebug specific commands. E.g.
4154 (set-buffer edebug-backtrace-buffer)
4200 (set-window-start buf-window (point))
4202 ;; (set-window-point buf-window (point))
4206 (set-buffer oldbuf))
4303 (set variable (not (eval variable)))
4334 ["Set Breakpoint" edebug-set-breakpoint t]
4336 ["Set Conditional Breakpoint" edebug-set-conditional-breakpoint t]
4337 ["Set Global Break Condition" edebug-set-global-break-condition t]
4380 (defun edebug-set-conditional-breakpoint (arg condition)