Lines Matching +defs:make +defs:frame
68 This is to optimize `debugger-make-xrefs'.")
86 (defvar debugger-outer-last-event-frame)
149 (debugger-outer-last-event-frame last-event-frame)
165 last-event-frame
185 (when (eq 'lambda (car-safe (cadr (backtrace-frame 4))))
217 ;; it's in a pop-up frame. It would be annoying to delete and
227 ;; will mean that the frame created for it is left
230 ;; another frame.
231 ;; If debugger-will-be-back is non-nil, the frame
258 (setq last-event-frame debugger-outer-last-event-frame)
283 2 ; Remove implement-debug-on-entry frame.
315 ;; After any frame that uses eval-buffer,
329 (debugger-make-xrefs))
331 (defun debugger-make-xrefs (&optional buffer)
421 ;; Check to see if we've flagged some frame for debug-on-exit, in which
431 will be used, such as in a debug on exit from a frame."
437 ;; Check to see if we've flagged some frame for debug-on-exit, in which
445 "Continue to exit from this frame, with all debug-on-entry suspended."
447 (debugger-frame)
450 (message "Continuing through this frame")
461 (defun debugger-frame-number ()
467 (while (not (eq (cadr (backtrace-frame count)) 'debug))
469 ;; Skip implement-debug-on-entry frame.
470 (when (eq 'implement-debug-on-entry (cadr (backtrace-frame (1+ count))))
489 (defun debugger-frame ()
490 "Request entry to debugger when this frame exits.
491 Applies to the frame whose line point is on in the backtrace."
498 (backtrace-debug (debugger-frame-number) t)
505 (defun debugger-frame-clear ()
506 "Do not enter debugger when this frame exits.
507 Applies to the frame whose line point is on in the backtrace."
514 (backtrace-debug (debugger-frame-number) nil)
542 (last-event-frame debugger-outer-last-event-frame)
573 (setq debugger-outer-last-event-frame last-event-frame)
590 (let ((map (make-keymap)))
594 (define-key map "b" 'debugger-frame)
598 (define-key map "u" 'debugger-frame-clear)
615 A line starts with `*' if exiting that frame will call the debugger.
616 Type \\[debugger-frame] or \\[debugger-frame-clear] to set or remove the `*'.
618 When in debugger due to frame being exited,
620 being returned from that frame.
664 For the cross-reference format, see `help-make-xrefs'."
843 (make-text-button (point) (progn (prin1 fun) (point))