Lines Matching +defs:char +defs:after
57 (defvar debugger-step-after-exit nil
58 "Non-nil means \"single-step\" after the debugger exits.")
77 ;; unread-command-char is obsolete,
80 (defvar debugger-outer-unread-command-char)
113 any other args you like. In that case, the list of args after the
127 (debugger-step-after-exit nil)
141 (debugger-outer-unread-command-char
142 (with-no-warnings unread-command-char))
179 (setq unread-command-char -1))
195 (goto-char (point-min))
198 (goto-char (point-max))
203 (goto-char (point-min))
233 ;; after when we re-enter the debugger, so iconifying it
251 (setq unread-command-char debugger-outer-unread-command-char))
263 (setq debug-on-next-call debugger-step-after-exit)
278 (goto-char (point-min))
297 (delete-char 1)
345 (goto-char (point-max))
374 (goto-char (point-max))
382 (goto-char (point-min))
384 (goto-char (+ (point) 2))
393 (goto-char beg)
407 (setq debugger-step-after-exit t)
423 (goto-char (point-min))
439 (goto-char (point-min))
472 (goto-char (point-min))
474 (goto-char (match-end 0))
478 (forward-char 2)
479 (if (= (following-char) ?\()
499 (if (= (following-char) ? )
501 (delete-char 1)
515 (if (= (following-char) ?*)
517 (delete-char 1)
549 (let ((save-ucc (with-no-warnings unread-command-char)))
553 (setq unread-command-char debugger-outer-unread-command-char))
556 (setq debugger-outer-unread-command-char unread-command-char))))
558 (setq unread-command-char save-ucc))))
677 (goto-char pos) (skip-syntax-backward "w_")