Function: set-case-syntax
set-case-syntax is a byte-compiled function defined in
case-table.el.gz.
Signature
(set-case-syntax C SYNTAX TABLE)
Documentation
Make character C case-invariant with syntax SYNTAX.
This sets the entry for character C in TABLE, which is a string
that will be used as the downcase part of a case table.
It also modifies standard-syntax-table.
SYNTAX should be " ", "w", "." or "_".
Source Code
;; Defined in /usr/src/emacs/lisp/case-table.el.gz
(defun set-case-syntax (c syntax table)
"Make character C case-invariant with syntax SYNTAX.
This sets the entry for character C in TABLE, which is a string
that will be used as the downcase part of a case table.
It also modifies `standard-syntax-table'.
SYNTAX should be \" \", \"w\", \".\" or \"_\"."
(aset table c c)
(let ((up (case-table-get-table table 'up)))
(aset up c c))
;; Clear out the extra slots so that they will be
;; recomputed from the main (downcase) table and upcase table.
(set-char-table-extra-slot table 1 nil)
(set-char-table-extra-slot table 2 nil)
(modify-syntax-entry c syntax (standard-syntax-table)))