Variable: dsssl-font-lock-keywords

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

Value

(("(\\(define\\(-\\w+\\)?\\)\\>[     ]*\\((?\\)\\(\\sw+\\)\\>"
  (1 font-lock-keyword-face) (4 font-lock-function-name-face))
 ("(\\<\\(and\\|c\\(?:ase\\|ond\\)\\|else\\|if\\|l\\(?:ambda\\|et\\(?:\\*\\|rec\\)?\\)\\|map\\|or\\|with-mode\\)\\>"
  . 1)
 ("(\\(element\\|mode\\|declare-\\w+\\)\\>[  ]*\\(\\sw+\\)"
  (1 font-lock-keyword-face) (2 font-lock-type-face))
 ("(\\(element\\)\\>[        ]*(\\(\\S)+\\))" (1 font-lock-keyword-face)
  (2 font-lock-type-face))
 ("\\<\\sw+:\\>" . font-lock-constant-face)
 ("<\\([!?][-a-z0-9]+\\)" 1 font-lock-keyword-face)
 ("<\\(/?[-a-z0-9]+\\)" 1 font-lock-function-name-face))

Documentation

Default expressions to highlight in DSSSL mode.

Source Code

;; Defined in /usr/src/emacs/lisp/progmodes/scheme.el.gz
(defvar dsssl-font-lock-keywords
  (eval-when-compile
    (list
     ;; Similar to Scheme
     (list "(\\(define\\(-\\w+\\)?\\)\\>[ \t]*\\((?\\)\\(\\sw+\\)\\>"
           '(1 font-lock-keyword-face)
           '(4 font-lock-function-name-face))
     (cons
      (concat "(" (regexp-opt
                   '("case" "cond" "else" "if" "lambda"
                     "let" "let*" "letrec" "and" "or" "map" "with-mode")
                   'words))
      1)
     ;; DSSSL syntax
     '("(\\(element\\|mode\\|declare-\\w+\\)\\>[ \t]*\\(\\sw+\\)"
       (1 font-lock-keyword-face)
       (2 font-lock-type-face))
     '("(\\(element\\)\\>[ \t]*(\\(\\S)+\\))"
       (1 font-lock-keyword-face)
       (2 font-lock-type-face))
     '("\\<\\sw+:\\>" . font-lock-constant-face) ; trailing `:' cf. scheme
     ;; SGML markup (from sgml-mode) :
     '("<\\([!?][-a-z0-9]+\\)" 1 font-lock-keyword-face)
     '("<\\(/?[-a-z0-9]+\\)" 1 font-lock-function-name-face)))
  "Default expressions to highlight in DSSSL mode.")