2286 |
(if (consp st) st |
(if (consp st) st |
2287 |
(aref (or st (syntax-table)) (char-after pos)))))) |
(aref (or st (syntax-table)) (char-after pos)))))) |
2288 |
|
|
2289 |
|
(defun syntax-class (syntax) |
2290 |
|
"Return the syntax class part of the syntax descriptor SYNTAX." |
2291 |
|
(logand (car syntax) 255)) |
2292 |
|
|
2293 |
(defun add-to-invisibility-spec (arg) |
(defun add-to-invisibility-spec (arg) |
2294 |
"Add elements to `buffer-invisibility-spec'. |
"Add elements to `buffer-invisibility-spec'. |
2295 |
See documentation for `buffer-invisibility-spec' for the kind of elements |
See documentation for `buffer-invisibility-spec' for the kind of elements |