Variable: antlr-font-lock-late-keywords

antlr-font-lock-late-keywords is a variable defined in antlr-mode.el.gz.

Value

((#[257 "\205�\301\"\207"
	[antlr-font-lock-literal-regexp antlr-re-search-forward] 4
	("/nix/store/yvwy8dm26cpa1j12ixgs1dyiaw2abdk9-emacs-snapshot/share/emacs/31.0.50/lisp/progmodes/antlr-mode.elc"
	 . 41396)]
  (2 'antlr-literal t))
 (#[257 "\300\301\"\207" [antlr-re-search-forward "^\\(\\sw+\\)"] 4
	("/nix/store/yvwy8dm26cpa1j12ixgs1dyiaw2abdk9-emacs-snapshot/share/emacs/31.0.50/lisp/progmodes/antlr-mode.elc"
	 . 41396)]
  (1
   (if
       (funcall antlr-token-identifier-p
		(char-after (match-beginning 0)))
       'antlr-tokendef
     'antlr-ruledef)
   t))
 (#[257 "\301\"\207"
	[antlr-grammar-header-regexp antlr-re-search-forward] 4
	("/nix/store/yvwy8dm26cpa1j12ixgs1dyiaw2abdk9-emacs-snapshot/share/emacs/31.0.50/lisp/progmodes/antlr-mode.elc"
	 . 41396)]
  (1 'antlr-keyword t) (2 'antlr-symbol t) (3 'antlr-keyword t t)
  (4
   (if
       (member (match-string-no-properties 4)
	       '("Lexer" "Parser" "TreeParser"))
       'antlr-keyword
     'font-lock-type-face)
   t t))
 (#[257 "\300\301\"\207"
	[antlr-re-search-forward
	 "\\<\\(header\\|options\\|tokens\\|channels\\|exception\\|catch\\|finally\\|returns\\|throws\\|import\\|locals\\)\\>"]
	4
	("/nix/store/yvwy8dm26cpa1j12ixgs1dyiaw2abdk9-emacs-snapshot/share/emacs/31.0.50/lisp/progmodes/antlr-mode.elc"
	 . 41396)]
  (1 'antlr-keyword t))
 (#[257 "\205�\301\"\207"
	[antlr-font-lock-symbol-regexp antlr-re-search-forward] 4
	("/nix/store/yvwy8dm26cpa1j12ixgs1dyiaw2abdk9-emacs-snapshot/share/emacs/31.0.50/lisp/progmodes/antlr-mode.elc"
	 . 41396)]
  (1 'antlr-keyword t) (2 'antlr-symbol t t))
 (#[257 "\300\301\"\207"
	[antlr-re-search-forward
	 "^\\(private\\|public\\|protected\\|fragment\\)\\>[         ]*\\(\\sw+\\)?"]
	4
	("/nix/store/yvwy8dm26cpa1j12ixgs1dyiaw2abdk9-emacs-snapshot/share/emacs/31.0.50/lisp/progmodes/antlr-mode.elc"
	 . 41396)]
  (1 'antlr-keyword t)
  (2
   (if
       (funcall antlr-token-identifier-p
		(char-after (match-beginning 2)))
       'antlr-tokendef
     'antlr-ruledef)
   t t))
 (#[257 "\300\301\"\207"
	[antlr-re-search-forward
	 "@\\([A-Za-z\300-\326\330-\337_]\\sw*\\)\\(?:::\\([A-Za-z\300-\326\330-\337_]\\sw*\\)\\)?"]
	4
	("/nix/store/yvwy8dm26cpa1j12ixgs1dyiaw2abdk9-emacs-snapshot/share/emacs/31.0.50/lisp/progmodes/antlr-mode.elc"
	 . 41396)]
  (1
   (antlr-font-lock-checked-face
    (if (match-beginning 2) antlr-action-scope-names
      antlr-action-names)
    1 'antlr-action)
   t)
  (2 (antlr-font-lock-checked-face antlr-action-names 2 'antlr-action)
     t t))
 (#[257 "\205	�\301@\"\207"
	[antlr-font-lock-syntax-spec antlr-re-search-forward] 4
	("/nix/store/yvwy8dm26cpa1j12ixgs1dyiaw2abdk9-emacs-snapshot/share/emacs/31.0.50/lisp/progmodes/antlr-mode.elc"
	 . 41396)]
  (1 'antlr-syntax t)))

Documentation

Late font-lock keywords for ANTLR's normal grammar code.

See antlr-font-lock-keywords-alist for the keywords of actions.

Source Code

;; Defined in /usr/src/emacs/lisp/progmodes/antlr-mode.el.gz
(defvar antlr-font-lock-late-keywords
  ;; The tokens are already fontified as string/docstrings.  The extra
  ;; fontification of literals must come after the fontification from cc-mode;
  ;; otherwise `c-font-lock-invalid-string' fontifies the final doublequote of
  ;; the last literal in a line with red (warning) - for whatever reason.
  `((,(lambda (limit)                   ; v3, v4: literals are only '...'
        (if antlr-font-lock-literal-regexp
            (antlr-re-search-forward antlr-font-lock-literal-regexp limit)))
     (2 'antlr-literal t))
    (,(lambda (limit)
        (antlr-re-search-forward "^\\(\\sw+\\)" limit))
     (1 (if (funcall antlr-token-identifier-p (char-after (match-beginning 0)))
            'antlr-tokendef
          'antlr-ruledef)
        t))
    (,(lambda (limit)
        (antlr-re-search-forward antlr-grammar-header-regexp limit))
     (1 'antlr-keyword t)
     (2 'antlr-symbol t)
     (3 'antlr-keyword t t)
     (4 (if (member (match-string-no-properties 4) '("Lexer" "Parser" "TreeParser"))
            'antlr-keyword
          'font-lock-type-face)
        t t))
    (,(lambda (limit)
        (antlr-re-search-forward
         "\\<\\(header\\|options\\|tokens\\|channels\\|exception\\|catch\\|finally\\|returns\\|throws\\|import\\|locals\\)\\>"
         limit))
     (1 'antlr-keyword t))
    (,(lambda (limit)
        (when antlr-font-lock-symbol-regexp
          (antlr-re-search-forward antlr-font-lock-symbol-regexp limit)))
     (1 'antlr-keyword t)
     (2 'antlr-symbol t t))
    (,(lambda (limit)
        (antlr-re-search-forward
         "^\\(private\\|public\\|protected\\|fragment\\)\\>[ \t]*\\(\\sw+\\)?"
         limit))
     (1 'antlr-keyword t)
     (2 (if (funcall antlr-token-identifier-p (char-after (match-beginning 2)))
            'antlr-tokendef
          'antlr-ruledef)
        t t))
    (,(lambda (limit)                   ; v3, v4
        (antlr-re-search-forward "@\\([A-Za-z\300-\326\330-\337_]\\sw*\\)\\(?:::\\([A-Za-z\300-\326\330-\337_]\\sw*\\)\\)?" limit))
     (1 (antlr-font-lock-checked-face (if (match-beginning 2)
                                          antlr-action-scope-names
                                        antlr-action-names)
                                      1 'antlr-action)
        t)
     (2 (antlr-font-lock-checked-face antlr-action-names 2 'antlr-action)
        t t))
    (,(lambda (limit)
        (and antlr-font-lock-syntax-spec
             (antlr-re-search-forward (car antlr-font-lock-syntax-spec) limit)))
      (1 'antlr-syntax t)))
  "Late font-lock keywords for ANTLR's normal grammar code.
See `antlr-font-lock-keywords-alist' for the keywords of actions.")