Variable: pascal-font-lock-keywords

pascal-font-lock-keywords is a variable defined in pascal.el.gz.

Value

(("\\_<\\(function\\|pro\\(cedure\\|gram\\)\\)[      ]+\\([[:alpha:]][[:alnum:]_]*\\)"
  (1 font-lock-keyword-face)
  (3 font-lock-function-name-face))
 ("\\_<\\(array\\|boolean\\|c\\(har\\|onst\\)\\|file\\|integer\\|re\\(al\\|cord\\)\\|type\\|var\\)\\_>" . font-lock-type-face)
 ("\\_<\\(label\\|external\\|forward\\)\\_>" . font-lock-constant-face)
 ("\\_<\\([0-9]+\\)[         ]*:" 1 font-lock-function-name-face)
 "\\_<\\(and\\|begin\\|case\\|do\\|e\\(lse\\|nd\\)\\|for\\|i[fn]\\|not\\|o[fr]\\|repeat\\|t\\(hen\\|o\\)\\|until\\|w\\(hile\\|ith\\)\\)\\_>"
 ("\\_<\\(goto\\)\\_>[    ]*\\([0-9]+\\)?"
  (1 font-lock-keyword-face)
  (2 font-lock-keyword-face t)))

Documentation

Additional expressions to highlight in Pascal mode.

Source Code

;; Defined in /usr/src/emacs/lisp/progmodes/pascal.el.gz
(defconst pascal-font-lock-keywords
  `(("\\_<\\(function\\|pro\\(cedure\\|gram\\)\\)[ \t]+\\([[:alpha:]][[:alnum:]_]*\\)"
     (1 font-lock-keyword-face)
     (3 font-lock-function-name-face))
    ;; ("type" "const" "real" "integer" "char" "boolean" "var"
    ;;  "record" "array" "file")
    (,(concat "\\_<\\(array\\|boolean\\|c\\(har\\|onst\\)\\|file\\|"
              "integer\\|re\\(al\\|cord\\)\\|type\\|var\\)\\_>")
     . font-lock-type-face)
    ("\\_<\\(label\\|external\\|forward\\)\\_>" . font-lock-constant-face)
    ("\\_<\\([0-9]+\\)[ \t]*:" 1 font-lock-function-name-face)
    ;; ("of" "to" "for" "if" "then" "else" "case" "while"
    ;;  "do" "until" "and" "or" "not" "in" "with" "repeat" "begin" "end")
    ,(concat "\\_<\\("
             "and\\|begin\\|case\\|do\\|e\\(lse\\|nd\\)\\|for\\|i[fn]\\|"
             "not\\|o[fr]\\|repeat\\|t\\(hen\\|o\\)\\|until\\|w\\(hile\\|ith\\)"
             "\\)\\_>")
    ("\\_<\\(goto\\)\\_>[ \t]*\\([0-9]+\\)?"
     (1 font-lock-keyword-face) (2 font-lock-keyword-face t)))
  "Additional expressions to highlight in Pascal mode.")