Function: semantic-lex-debug-break

semantic-lex-debug-break is a byte-compiled function defined in lex.el.gz.

Signature

(semantic-lex-debug-break TOKEN)

Documentation

Break during lexical analysis at TOKEN.

Source Code

;; Defined in /usr/src/emacs/lisp/cedet/semantic/lex.el.gz
;;(defcustom semantic-lex-timeout 5
;;  "Number of sections of lexing before giving up."
;;  :type 'integer
;;  :group 'semantic)

(defsubst semantic-lex-debug-break (token)
  "Break during lexical analysis at TOKEN."
  (when semantic-lex-debug
    (let ((o nil))
      (unwind-protect
	  (progn
	    (when token
	      (setq o (semantic-lex-highlight-token token)))
	    (read-event
	     (format "%S :: Depth: %d :: SPC - continue" token semantic-lex-current-depth))
	    )
	(when o
	  (delete-overlay o))))))