Variable: semantic-lex-c-include

semantic-lex-c-include is a variable defined in c.el.gz.

Value

Large value
((looking-at "^\\s-*#\\s-*include\\s-*\"\\([^   \n>]+\\)\"")
 (let
     ((start
       (match-beginning 0))
      (end
       (match-end 0))
      (startpnt semantic-lex-end-point)
      (val
       (save-match-data
	 (goto-char
	  (match-end 0))
	 (setq semantic-lex-end-point
	       (point))
	 (cons
	  (buffer-substring-no-properties
	   (match-beginning 1)
	   (match-end 1))
	  nil)))
      (endpnt semantic-lex-end-point))
   (semantic-lex-spp-merge-header
    (car val))
   (semantic-lex-push-token
    (semantic-lex-token
     (if
	 (eq
	  (cdr val)
	  'system)
	 'spp-system-include 'spp-include)
     start end
     (car val)))
   (when
       (and
	(/= startpnt endpnt)
	(/= endpnt semantic-lex-end-point))
     (setq semantic-lex-end-point endpnt))))

Documentation

Identify include strings, and return special tokens.

Source Code

;; Defined in /usr/src/emacs/lisp/cedet/semantic/bovine/c.el.gz
(define-lex-spp-include-analyzer semantic-lex-c-include
  "Identify include strings, and return special tokens."
    "^\\s-*#\\s-*include\\s-*\"\\([^ \t\n>]+\\)\"" 0
    ;; Hit 1 is the name of the include.
    (goto-char (match-end 0))
    (setq semantic-lex-end-point (point))
    (cons (buffer-substring-no-properties (match-beginning 1)
					  (match-end 1))
	  nil))