| /xsrc/external/mit/xedit/dist/lisp/modules/progmodes/ |
| auto.lsp | 64 (syntable :string *prop-string* nil
69 (syntable :constant *prop-constant* nil
73 (syntable :escape *prop-escape* nil
78 (syntable :quoted-string *prop-string* nil
81 (syntable :macro *prop-default* nil
84 (syntable :quoted *prop-default* nil
92 (syntable :shared nil nil
97 (syntable :quotes nil nil
103 (syntable :variables nil nil
108 (syntable :comments nil ni
[all...] |
| xconf.lsp | 42 (syntable :section *prop-constant* #'default-indent
44 (syntable :name *prop-constant* nil
63 (syntable :string *prop-string* #'default-indent
|
| imake.lsp | 101 (syntable :shell *prop-variable* nil
109 (syntable :comment *prop-comment* nil
126 (syntable :preprocessor *prop-preprocessor* nil
147 (syntable :string *prop-string* nil
166 (syntable :quoted-string *prop-constant* nil
184 (syntable :error *prop-error* nil
|
| xlog.lsp | 75 (syntable :note *prop-annotation* nil (syntoken "$" :switch -1))
82 (syntable :default *prop-xlog-default* nil (syntoken "$" :switch -1))
86 (syntable :probe *prop-xlog-probe* nil (syntoken "$" :switch -1))
90 (syntable :config *prop-xlog-config* nil (syntoken "$" :switch -1))
94 (syntable :warning *prop-xlog-warning* nil (syntoken "$" :switch -1))
98 (syntable :error *prop-xlog-error* nil (syntoken "$" :switch -1))
|
| make.lsp | 86 (syntable :shell *prop-variable* nil
94 (syntable :string *prop-string* nil
113 (syntable :quoted-string *prop-constant* nil
131 (syntable :error *prop-error* nil
|
| sh.lsp | 77 (syntable :single *prop-constant* nil
85 (syntable :double *prop-string* #'default-indent
98 (syntable :escape *prop-escape* #'default-indent
109 (syntable :variable nil nil
|
| html.lsp | 155 (defmacro html-syntable (name property)
159 (syntable label *prop-html-tag* nil
162 (syntable nested-label ,property nil
172 (syntable :comment *prop-html-comment* nil
190 (syntable :unbalanced *prop-html-unknown* nil
204 (html-syntable "b" *prop-html-bold*)
206 (html-syntable "strong" *prop-html-bold*)
209 (html-syntable "i" *prop-html-italic*)
211 (html-syntable "em" *prop-html-italic*)
213 (html-syntable "address" *prop-html-italic*
[all...] |
| sgml.lsp | 109 ;; The macros sgml-syntoken and sgml-syntable allows creating rules for
142 (defmacro sgml-syntable (name property)
148 (syntable label *prop-preprocessor* nil
157 (syntable nested-label ,property nil
171 (defmacro sgml-syntable-simple (name property)
177 (syntable label *prop-preprocessor* nil
186 (syntable nested-label ,property nil
218 (defmacro sgml-syntable-short (name property)
219 `(syntable (intern (string-concat ,name "/") 'keyword) ,property nil
238 (syntable :comment *prop-comment* ni
[all...] |
| man.lsp | 92 (defmacro man-syntable (pattern property)
93 `(syntable (intern (string ,pattern) 'keyword) ,property nil
103 (man-syntable "b|br|nm" *prop-man-b*)
106 (man-syntable "i|ir|ri|ip" *prop-man-i*)
109 (man-syntable "th|dt" *prop-man-th*)
112 (man-syntable "sh" *prop-man-sh*)
115 (man-syntable "ss" *prop-man-ss*)
118 (man-syntable "bi" *prop-man-bi*)
125 (syntable :extras nil nil
143 (syntable :i *prop-man-i* ni
[all...] |
| rpm.lsp | 51 (syntable :sections nil nil
76 (syntable :changelog nil nil
88 (syntable :comment *prop-comment* nil
98 (syntable :global nil nil
111 (syntable :shell nil nil
114 (syntable :strings nil nil
116 (syntable :string *prop-string* nil
122 (syntable :constant *prop-constant* nil
127 (syntable :escape *prop-rpm-escape* nil
152 (syntable :comment *prop-comment* ni
[all...] |
| xrdb.lsp | 68 (syntable :comment *prop-comment* nil
74 (syntable :resource nil nil
79 (syntable :value *prop-string* nil
|
| lisp.lsp | 265 (defun lisp-indent (syntax syntable)
336 (syntable :simple-comment *prop-comment* nil
340 (syntable :comment *prop-comment* nil
347 (syntable :unreadable *prop-unreadable* nil
352 (syntable :string *prop-string* nil
357 (syntable :preprocessor *prop-preprocessor* nil
364 (syntable :preprocessor-expression *prop-preprocessor* nil
369 (syntable :preprocessor-recursive *prop-preprocessor* nil
378 (syntable :comments-and-strings nil nil
|
| perl.lsp | 345 (defun perl-indent (syntax syntable)
371 `(syntable (intern (string-concat "string" ,start) 'keyword)
414 (syntable :inside-string nil nil
434 (syntable :string-variable *prop-string-keyword* nil
436 (syntable :string-varbrace *prop-string-keyword* nil
456 (syntable :string *prop-string* #'default-indent
472 (syntable :constant *prop-constant* #'default-indent
478 (syntable :shell *prop-shell* #'default-indent
491 (syntable :heredoc *prop-documentation* #'default-indent
495 (syntable :info *prop-documentation* ni
[all...] |
| python.lsp | 221 (defun python-indent (syntax syntable)
296 (syntable :constant *prop-constant* nil
299 (syntable :constant3 *prop-constant* nil
301 (syntable :string *prop-string* nil
304 (syntable :string3 *prop-string* nil
|
| c.lsp | 934 (defun c-indent-check (syntax syntable options
955 (c-indent syntax syntable)
968 (c-indent syntax syntable)
972 (defun c-indent (syntax syntable)
999 (c-indent-check syntax syntable options)
1053 (syntable :comment *prop-comment* #'default-indent
1064 (syntable :string *prop-string* #'default-indent
1083 (syntable :character *prop-constant* nil
1098 (syntable :preprocessor *prop-preprocessor* #'default-indent
1133 (syntable :error *prop-error* ni
[all...] |
| /xsrc/external/mit/xedit/dist/lisp/ |
| xedit.h | 82 LispObj *syntable; /* Syntax-table the cursor is located */ member in struct:_XeditLispData
|
| xedit.c | 284 Osyntable_indent = STATIC_ATOM("SYNTABLE-INDENT");
571 LispObj *result, *syntable; local
668 syntable = RETURN(0);
670 syntable = NIL;
763 data->syntable = syntable;
765 if (indent && syntable != NIL && !lisp__running &&
790 indentp = APPLY1(Osyntable_indent, data->syntable);
794 APPLY2(indentp, data->syntax, data->syntable);
|
| /xsrc/external/mit/xedit/dist/lisp/modules/ |
| syntax.lsp | 39 syntable syntoken synaugment
200 (syntable ,label ,property ,indent ,@lists)
304 (defstruct syntable function
309 tables ;; A list of syntable structures.
322 ;; Just call make-syntable, but sorts the elements by type, allowing
327 (defun syntable (label default-property indent &rest definitions) function
331 (error "SYNTABLE: ~A is not a keyword" label)
338 (error "SYNTABLE: ~A is an invalid text property"
346 ;; now the arguments to make-syntable.
357 (syntable-p item
[all...] |
| indent.lsp | 179 (defun default-indent (syntax syntable)
188 syntable ;; XXX hack to not generate warning about unused
|
