Variable: tcl-syntax-propertize-function

tcl-syntax-propertize-function is a variable defined in tcl.el.gz.

Value

#[514 "
b\210`
W\205N�\300\301\302#\205N�\303\224\203\"�\304\303\224\303\225\305\306$\210\202�\307\224\203�\310\311!\211A\312\233\241\210\313
!\266\314\224\314\225\315\314\224!\211\203I�\304\305$\210\266\202�\207"
      [re-search-forward "[^[;{         \n][    ]*\\(#\\)\\|\\(\"\\)" t 1 put-text-property syntax-table
			 (1)
			 2 match-data ints 6 set-match-data 0 tcl--syntax-of-quote]
      10 "\n\n(fn START END)"]

Documentation

Syntactic keywords for tcl-mode.

Source Code

;; Defined in /usr/src/emacs/lisp/progmodes/tcl.el.gz
(defconst tcl-syntax-propertize-function
  ;; FIXME: Handle the [...] commands nested inside "..." strings.
  (syntax-propertize-rules
   ;; Mark the few `#' that are not comment-markers.
   ((concat "[^" tcl--word-delimiters "][ \t]*\\(#\\)") (1 "."))
   ("\"" (0 (tcl--syntax-of-quote (match-beginning 0)))))
  "Syntactic keywords for `tcl-mode'.")