src/thales/.dir-locals.el

   1 ;;; Directory Local Variables
   2 ;;; See Info node `(emacs) Directory Variables' for more information.
   3
   4 ((scheme-mode
   5      (eval font-lock-add-keywords nil
   6          `(("(\\(sealed\\|throw\\|catch\\)\s'?\\(\\w+\\)"
   7                (1 font-lock-keyword-face)
   8                (2 font-lock-constant-face))
   9            ("\\<lambda-match\\>" . font-lock-keyword-face)
  10            ("(\\(define-match\\)\s+(\\(\\w+\\)"
  11                (1 font-lock-keyword-face)
  12                (2 font-lock-function-name-face))
  13            ("\\<for\\*?\\>"   . font-lock-keyword-face)
  14            ("\\<lambda\\*\\>" . font-lock-keyword-face)
  15            ("error:.*?\\_>"   . 'bold)
  16 )
  17          :lowest-priority)))