Variable: semantic-lex-whitespace

semantic-lex-whitespace is a variable defined in lex.el.gz.

Value

((looking-at "\\s-+")
 (if
     (eq
      (semantic-lex-token-class
       (car semantic-lex-token-stream))
      'whitespace)
     (progn
       (setq semantic-lex-end-point
	     (match-end 0))
       (setcdr
	(semantic-lex-token-bounds
	 (car semantic-lex-token-stream))
	semantic-lex-end-point))
   (semantic-lex-push-token
    (semantic-lex-token 'whitespace
			(match-beginning 0)
			(match-end 0)))))

Documentation

Detect and create whitespace tokens.

Source Code

;; Defined in /usr/src/emacs/lisp/cedet/semantic/lex.el.gz
(define-lex-regex-analyzer semantic-lex-whitespace
  "Detect and create whitespace tokens."
  ;; catch whitespace when needed
  "\\s-+"
  ;; Language wants whitespaces.  Create a token for it.
  (if (eq (semantic-lex-token-class (car semantic-lex-token-stream))
	  'whitespace)
      ;; Merge whitespace tokens together if they are adjacent.  Two
      ;; whitespace tokens may be separated by a comment which is not in
      ;; the token stream.
      (progn
        (setq semantic-lex-end-point (match-end 0))
        (setcdr (semantic-lex-token-bounds (car semantic-lex-token-stream))
                semantic-lex-end-point))
    (semantic-lex-push-token
     (semantic-lex-token
      'whitespace (match-beginning 0) (match-end 0)))))