Mercurial > hg > xemacs-beta
comparison lisp/auto-autoloads.el @ 410:de805c49cfc1 r21-2-35
Import from CVS: tag r21-2-35
author | cvs |
---|---|
date | Mon, 13 Aug 2007 11:19:21 +0200 |
parents | b8cc9ab3f761 |
children | 697ef44129c6 |
comparison
equal
deleted
inserted
replaced
409:301b9ebbdf3b | 410:de805c49cfc1 |
---|---|
1 ;;; DO NOT MODIFY THIS FILE | 1 ;;; DO NOT MODIFY THIS FILE |
2 (if (featurep 'lisp-autoloads) (error "Already loaded")) | 2 (if (featurep 'lisp-autoloads) (error "Already loaded")) |
3 | |
4 ;;;### (autoloads nil "abbrev" "lisp/abbrev.el") | |
5 | |
6 ;;;*** | |
7 | |
8 ;;;### (autoloads (about-xemacs) "about" "lisp/about.el") | |
9 | |
10 (autoload 'about-xemacs "about" "\ | |
11 Describe the True Editor and its minions." t nil) | |
12 | |
13 ;;;*** | |
14 | |
15 ;;;### (autoloads (set-modified-alist modify-alist remove-alist set-alist del-alist put-alist vassoc) "alist" "lisp/alist.el") | |
16 | |
17 (autoload 'vassoc "alist" "\ | |
18 Search VALIST for a vector whose first element is equal to KEY. | |
19 See also `assoc'." nil nil) | |
20 | |
21 (autoload 'put-alist "alist" "\ | |
22 Modify ALIST to set VALUE to ITEM. | |
23 If there is a pair whose car is ITEM, replace its cdr by VALUE. | |
24 If there is not such pair, create new pair (ITEM . VALUE) and | |
25 return new alist whose car is the new pair and cdr is ALIST. | |
26 [tomo's ELIS like function]" nil nil) | |
27 | |
28 (autoload 'del-alist "alist" "\ | |
29 If there is a pair whose key is ITEM, delete it from ALIST. | |
30 [tomo's ELIS emulating function]" nil nil) | |
31 | |
32 (autoload 'set-alist "alist" "\ | |
33 Modify a alist indicated by SYMBOL to set VALUE to ITEM." nil nil) | |
34 | |
35 (autoload 'remove-alist "alist" "\ | |
36 Remove ITEM from the alist indicated by SYMBOL." nil nil) | |
37 | |
38 (autoload 'modify-alist "alist" "\ | |
39 Modify alist DEFAULT into alist MODIFIER." nil nil) | |
40 | |
41 (autoload 'set-modified-alist "alist" "\ | |
42 Modify a value of a symbol SYM into alist MODIFIER. | |
43 The symbol SYM should be alist. If it is not bound, | |
44 its value regard as nil." nil nil) | |
45 | |
46 ;;;*** | |
47 | |
48 ;;;### (autoloads (apropos-documentation apropos-value apropos apropos-command) "apropos" "lisp/apropos.el") | |
49 | |
50 (fset 'command-apropos 'apropos-command) | |
51 | |
52 (autoload 'apropos-command "apropos" "\ | |
53 Shows commands (interactively callable functions) that match REGEXP. | |
54 With optional prefix ARG or if `apropos-do-all' is non-nil, also show | |
55 variables." t nil) | |
56 | |
57 (autoload 'apropos "apropos" "\ | |
58 Show all bound symbols whose names match REGEXP. | |
59 With optional prefix ARG or if `apropos-do-all' is non-nil, also show unbound | |
60 symbols and key bindings, which is a little more time-consuming. | |
61 Returns list of symbols and documentation found." t nil) | |
62 | |
63 (autoload 'apropos-value "apropos" "\ | |
64 Show all symbols whose value's printed image matches REGEXP. | |
65 With optional prefix ARG or if `apropos-do-all' is non-nil, also looks | |
66 at the function and at the names and values of properties. | |
67 Returns list of symbols and values found." t nil) | |
68 | |
69 (autoload 'apropos-documentation "apropos" "\ | |
70 Show symbols whose documentation contain matches for REGEXP. | |
71 With optional prefix ARG or if `apropos-do-all' is non-nil, also use | |
72 documentation that is not stored in the documentation file and show key | |
73 bindings. | |
74 Returns list of symbols and documentation found." t nil) | |
75 | |
76 ;;;*** | |
3 | 77 |
4 ;;;### (autoloads (batch-update-one-directory batch-update-directory batch-update-autoloads update-autoloads-from-directory update-autoloads-here update-file-autoloads generate-file-autoloads) "autoload" "lisp/autoload.el") | 78 ;;;### (autoloads (batch-update-one-directory batch-update-directory batch-update-autoloads update-autoloads-from-directory update-autoloads-here update-file-autoloads generate-file-autoloads) "autoload" "lisp/autoload.el") |
5 | 79 |
6 (autoload 'generate-file-autoloads "autoload" "\ | 80 (autoload 'generate-file-autoloads "autoload" "\ |
7 Insert at point a loaddefs autoload section for FILE. | 81 Insert at point a loaddefs autoload section for FILE. |
44 Runs `update-file-autoloads' on each file in the given directory, and must | 118 Runs `update-file-autoloads' on each file in the given directory, and must |
45 be used only with -batch." nil nil) | 119 be used only with -batch." nil nil) |
46 | 120 |
47 ;;;*** | 121 ;;;*** |
48 | 122 |
123 ;;;### (autoloads nil "buff-menu" "lisp/buff-menu.el") | |
124 | |
125 (defvar list-buffers-directory nil) | |
126 | |
127 (make-variable-buffer-local 'list-buffers-directory) | |
128 | |
129 ;;;*** | |
130 | |
131 ;;;### (autoloads (build-report) "build-report" "lisp/build-report.el") | |
132 | |
133 (autoload 'build-report "build-report" "\ | |
134 Initializes a fresh mail composition buffer using `compose-mail' | |
135 with the contents of XEmacs Installation file and excerpts from XEmacs | |
136 make output and errors and leaves point at the beginning of the mail text. | |
137 See also | |
138 `compose-mail', `mail-user-agent', | |
139 `build-report-destination', | |
140 `build-report-keep-regexp', | |
141 `build-report-delete-regexp', | |
142 `build-report-make-output-file' and | |
143 `build-report-installation-file'." t nil) | |
144 | |
145 ;;;*** | |
146 | |
49 ;;;### (autoloads (batch-byte-recompile-directory batch-byte-recompile-directory-norecurse batch-byte-compile-one-file batch-byte-compile display-call-tree byte-compile-sexp byte-compile compile-defun byte-compile-buffer byte-compile-and-load-file byte-compile-file byte-recompile-file byte-recompile-directory byte-force-recompile) "bytecomp" "lisp/bytecomp.el") | 147 ;;;### (autoloads (batch-byte-recompile-directory batch-byte-recompile-directory-norecurse batch-byte-compile-one-file batch-byte-compile display-call-tree byte-compile-sexp byte-compile compile-defun byte-compile-buffer byte-compile-and-load-file byte-compile-file byte-recompile-file byte-recompile-directory byte-force-recompile) "bytecomp" "lisp/bytecomp.el") |
50 | 148 |
51 (autoload 'byte-force-recompile "bytecomp" "\ | 149 (autoload 'byte-force-recompile "bytecomp" "\ |
52 Recompile every `.el' file in DIRECTORY that already has a `.elc' file. | 150 Recompile every `.el' file in DIRECTORY that already has a `.elc' file. |
53 Files in subdirectories of DIRECTORY are processed also." t nil) | 151 Files in subdirectories of DIRECTORY are processed also." t nil) |
133 | 231 |
134 (autoload 'batch-byte-recompile-directory "bytecomp" "\ | 232 (autoload 'batch-byte-recompile-directory "bytecomp" "\ |
135 Runs `byte-recompile-directory' on the dirs remaining on the command line. | 233 Runs `byte-recompile-directory' on the dirs remaining on the command line. |
136 Must be used only with `-batch', and kills Emacs on completion. | 234 Must be used only with `-batch', and kills Emacs on completion. |
137 For example, invoke `xemacs -batch -f batch-byte-recompile-directory .'." nil nil) | 235 For example, invoke `xemacs -batch -f batch-byte-recompile-directory .'." nil nil) |
236 | |
237 ;;;*** | |
238 | |
239 ;;;### (autoloads (compiler-macroexpand define-compiler-macro ignore-file-errors ignore-errors assert check-type typep deftype cl-struct-setf-expander defstruct define-modify-macro callf2 callf letf* letf rotatef shiftf remf cl-do-pop psetf setf get-setf-method defsetf define-setf-method declare the locally multiple-value-setq multiple-value-bind lexical-let* lexical-let symbol-macrolet macrolet labels flet progv psetq do-all-symbols do-symbols dotimes dolist do* do loop return-from return block etypecase typecase ecase case load-time-value eval-when destructuring-bind function* defmacro* defun* cl-compile-time-init) "cl-macs" "lisp/cl-macs.el") | |
240 | |
241 (autoload 'cl-compile-time-init "cl-macs" nil nil nil) | |
242 | |
243 (autoload 'defun* "cl-macs" "\ | |
244 (defun* NAME ARGLIST [DOCSTRING] BODY...): define NAME as a function. | |
245 Like normal `defun', except ARGLIST allows full Common Lisp conventions, | |
246 and BODY is implicitly surrounded by (block NAME ...)." nil 'macro) | |
247 | |
248 (autoload 'defmacro* "cl-macs" "\ | |
249 (defmacro* NAME ARGLIST [DOCSTRING] BODY...): define NAME as a macro. | |
250 Like normal `defmacro', except ARGLIST allows full Common Lisp conventions, | |
251 and BODY is implicitly surrounded by (block NAME ...)." nil 'macro) | |
252 | |
253 (autoload 'function* "cl-macs" "\ | |
254 (function* SYMBOL-OR-LAMBDA): introduce a function. | |
255 Like normal `function', except that if argument is a lambda form, its | |
256 ARGLIST allows full Common Lisp conventions." nil 'macro) | |
257 | |
258 (autoload 'destructuring-bind "cl-macs" nil nil 'macro) | |
259 | |
260 (autoload 'eval-when "cl-macs" "\ | |
261 (eval-when (WHEN...) BODY...): control when BODY is evaluated. | |
262 If `compile' is in WHEN, BODY is evaluated when compiled at top-level. | |
263 If `load' is in WHEN, BODY is evaluated when loaded after top-level compile. | |
264 If `eval' is in WHEN, BODY is evaluated when interpreted or at non-top-level." nil 'macro) | |
265 | |
266 (autoload 'load-time-value "cl-macs" "\ | |
267 Like `progn', but evaluates the body at load time. | |
268 The result of the body appears to the compiler as a quoted constant." nil 'macro) | |
269 | |
270 (autoload 'case "cl-macs" "\ | |
271 (case EXPR CLAUSES...): evals EXPR, chooses from CLAUSES on that value. | |
272 Each clause looks like (KEYLIST BODY...). EXPR is evaluated and compared | |
273 against each key in each KEYLIST; the corresponding BODY is evaluated. | |
274 If no clause succeeds, case returns nil. A single atom may be used in | |
275 place of a KEYLIST of one atom. A KEYLIST of `t' or `otherwise' is | |
276 allowed only in the final clause, and matches if no other keys match. | |
277 Key values are compared by `eql'." nil 'macro) | |
278 | |
279 (autoload 'ecase "cl-macs" "\ | |
280 (ecase EXPR CLAUSES...): like `case', but error if no case fits. | |
281 `otherwise'-clauses are not allowed." nil 'macro) | |
282 | |
283 (autoload 'typecase "cl-macs" "\ | |
284 (typecase EXPR CLAUSES...): evals EXPR, chooses from CLAUSES on that value. | |
285 Each clause looks like (TYPE BODY...). EXPR is evaluated and, if it | |
286 satisfies TYPE, the corresponding BODY is evaluated. If no clause succeeds, | |
287 typecase returns nil. A TYPE of `t' or `otherwise' is allowed only in the | |
288 final clause, and matches if no other keys match." nil 'macro) | |
289 | |
290 (autoload 'etypecase "cl-macs" "\ | |
291 (etypecase EXPR CLAUSES...): like `typecase', but error if no case fits. | |
292 `otherwise'-clauses are not allowed." nil 'macro) | |
293 | |
294 (autoload 'block "cl-macs" "\ | |
295 (block NAME BODY...): define a lexically-scoped block named NAME. | |
296 NAME may be any symbol. Code inside the BODY forms can call `return-from' | |
297 to jump prematurely out of the block. This differs from `catch' and `throw' | |
298 in two respects: First, the NAME is an unevaluated symbol rather than a | |
299 quoted symbol or other form; and second, NAME is lexically rather than | |
300 dynamically scoped: Only references to it within BODY will work. These | |
301 references may appear inside macro expansions, but not inside functions | |
302 called from BODY." nil 'macro) | |
303 | |
304 (autoload 'return "cl-macs" "\ | |
305 (return [RESULT]): return from the block named nil. | |
306 This is equivalent to `(return-from nil RESULT)'." nil 'macro) | |
307 | |
308 (autoload 'return-from "cl-macs" "\ | |
309 (return-from NAME [RESULT]): return from the block named NAME. | |
310 This jumps out to the innermost enclosing `(block NAME ...)' form, | |
311 returning RESULT from that form (or nil if RESULT is omitted). | |
312 This is compatible with Common Lisp, but note that `defun' and | |
313 `defmacro' do not create implicit blocks as they do in Common Lisp." nil 'macro) | |
314 | |
315 (autoload 'loop "cl-macs" "\ | |
316 (loop CLAUSE...): The Common Lisp `loop' macro. | |
317 Valid clauses are: | |
318 for VAR from/upfrom/downfrom NUM to/upto/downto/above/below NUM by NUM, | |
319 for VAR in LIST by FUNC, for VAR on LIST by FUNC, for VAR = INIT then EXPR, | |
320 for VAR across ARRAY, repeat NUM, with VAR = INIT, while COND, until COND, | |
321 always COND, never COND, thereis COND, collect EXPR into VAR, | |
322 append EXPR into VAR, nconc EXPR into VAR, sum EXPR into VAR, | |
323 count EXPR into VAR, maximize EXPR into VAR, minimize EXPR into VAR, | |
324 if COND CLAUSE [and CLAUSE]... else CLAUSE [and CLAUSE...], | |
325 unless COND CLAUSE [and CLAUSE]... else CLAUSE [and CLAUSE...], | |
326 do EXPRS..., initially EXPRS..., finally EXPRS..., return EXPR, | |
327 finally return EXPR, named NAME." nil 'macro) | |
328 | |
329 (autoload 'do "cl-macs" "\ | |
330 The Common Lisp `do' loop. | |
331 Format is: (do ((VAR INIT [STEP])...) (END-TEST [RESULT...]) BODY...)" nil 'macro) | |
332 | |
333 (autoload 'do* "cl-macs" "\ | |
334 The Common Lisp `do*' loop. | |
335 Format is: (do* ((VAR INIT [STEP])...) (END-TEST [RESULT...]) BODY...)" nil 'macro) | |
336 | |
337 (autoload 'dolist "cl-macs" "\ | |
338 (dolist (VAR LIST [RESULT]) BODY...): loop over a list. | |
339 Evaluate BODY with VAR bound to each `car' from LIST, in turn. | |
340 Then evaluate RESULT to get return value, default nil." nil 'macro) | |
341 | |
342 (autoload 'dotimes "cl-macs" "\ | |
343 (dotimes (VAR COUNT [RESULT]) BODY...): loop a certain number of times. | |
344 Evaluate BODY with VAR bound to successive integers from 0, inclusive, | |
345 to COUNT, exclusive. Then evaluate RESULT to get return value, default | |
346 nil." nil 'macro) | |
347 | |
348 (autoload 'do-symbols "cl-macs" "\ | |
349 (dosymbols (VAR [OBARRAY [RESULT]]) BODY...): loop over all symbols. | |
350 Evaluate BODY with VAR bound to each interned symbol, or to each symbol | |
351 from OBARRAY." nil 'macro) | |
352 | |
353 (autoload 'do-all-symbols "cl-macs" nil nil 'macro) | |
354 | |
355 (autoload 'psetq "cl-macs" "\ | |
356 (psetq SYM VAL SYM VAL ...): set SYMs to the values VALs in parallel. | |
357 This is like `setq', except that all VAL forms are evaluated (in order) | |
358 before assigning any symbols SYM to the corresponding values." nil 'macro) | |
359 | |
360 (autoload 'progv "cl-macs" "\ | |
361 (progv SYMBOLS VALUES BODY...): bind SYMBOLS to VALUES dynamically in BODY. | |
362 The forms SYMBOLS and VALUES are evaluated, and must evaluate to lists. | |
363 Each SYMBOL in the first list is bound to the corresponding VALUE in the | |
364 second list (or made unbound if VALUES is shorter than SYMBOLS); then the | |
365 BODY forms are executed and their result is returned. This is much like | |
366 a `let' form, except that the list of symbols can be computed at run-time." nil 'macro) | |
367 | |
368 (autoload 'flet "cl-macs" "\ | |
369 (flet ((FUNC ARGLIST BODY...) ...) FORM...): make temporary function defns. | |
370 This is an analogue of `let' that operates on the function cell of FUNC | |
371 rather than its value cell. The FORMs are evaluated with the specified | |
372 function definitions in place, then the definitions are undone (the FUNCs | |
373 go back to their previous definitions, or lack thereof)." nil 'macro) | |
374 | |
375 (autoload 'labels "cl-macs" "\ | |
376 (labels ((FUNC ARGLIST BODY...) ...) FORM...): make temporary func bindings. | |
377 This is like `flet', except the bindings are lexical instead of dynamic. | |
378 Unlike `flet', this macro is fully compliant with the Common Lisp standard." nil 'macro) | |
379 | |
380 (autoload 'macrolet "cl-macs" "\ | |
381 (macrolet ((NAME ARGLIST BODY...) ...) FORM...): make temporary macro defns. | |
382 This is like `flet', but for macros instead of functions." nil 'macro) | |
383 | |
384 (autoload 'symbol-macrolet "cl-macs" "\ | |
385 (symbol-macrolet ((NAME EXPANSION) ...) FORM...): make symbol macro defns. | |
386 Within the body FORMs, references to the variable NAME will be replaced | |
387 by EXPANSION, and (setq NAME ...) will act like (setf EXPANSION ...)." nil 'macro) | |
388 | |
389 (autoload 'lexical-let "cl-macs" "\ | |
390 (lexical-let BINDINGS BODY...): like `let', but lexically scoped. | |
391 The main visible difference is that lambdas inside BODY will create | |
392 lexical closures as in Common Lisp." nil 'macro) | |
393 | |
394 (autoload 'lexical-let* "cl-macs" "\ | |
395 (lexical-let* BINDINGS BODY...): like `let*', but lexically scoped. | |
396 The main visible difference is that lambdas inside BODY will create | |
397 lexical closures as in Common Lisp." nil 'macro) | |
398 | |
399 (autoload 'multiple-value-bind "cl-macs" "\ | |
400 (multiple-value-bind (SYM SYM...) FORM BODY): collect multiple return values. | |
401 FORM must return a list; the BODY is then executed with the first N elements | |
402 of this list bound (`let'-style) to each of the symbols SYM in turn. This | |
403 is analogous to the Common Lisp `multiple-value-bind' macro, using lists to | |
404 simulate true multiple return values. For compatibility, (values A B C) is | |
405 a synonym for (list A B C)." nil 'macro) | |
406 | |
407 (autoload 'multiple-value-setq "cl-macs" "\ | |
408 (multiple-value-setq (SYM SYM...) FORM): collect multiple return values. | |
409 FORM must return a list; the first N elements of this list are stored in | |
410 each of the symbols SYM in turn. This is analogous to the Common Lisp | |
411 `multiple-value-setq' macro, using lists to simulate true multiple return | |
412 values. For compatibility, (values A B C) is a synonym for (list A B C)." nil 'macro) | |
413 | |
414 (autoload 'locally "cl-macs" nil nil 'macro) | |
415 | |
416 (autoload 'the "cl-macs" nil nil 'macro) | |
417 | |
418 (autoload 'declare "cl-macs" nil nil 'macro) | |
419 | |
420 (autoload 'define-setf-method "cl-macs" "\ | |
421 (define-setf-method NAME ARGLIST BODY...): define a `setf' method. | |
422 This method shows how to handle `setf's to places of the form (NAME ARGS...). | |
423 The argument forms ARGS are bound according to ARGLIST, as if NAME were | |
424 going to be expanded as a macro, then the BODY forms are executed and must | |
425 return a list of five elements: a temporary-variables list, a value-forms | |
426 list, a store-variables list (of length one), a store-form, and an access- | |
427 form. See `defsetf' for a simpler way to define most setf-methods." nil 'macro) | |
428 | |
429 (autoload 'defsetf "cl-macs" "\ | |
430 (defsetf NAME FUNC): define a `setf' method. | |
431 This macro is an easy-to-use substitute for `define-setf-method' that works | |
432 well for simple place forms. In the simple `defsetf' form, `setf's of | |
433 the form (setf (NAME ARGS...) VAL) are transformed to function or macro | |
434 calls of the form (FUNC ARGS... VAL). Example: (defsetf aref aset). | |
435 Alternate form: (defsetf NAME ARGLIST (STORE) BODY...). | |
436 Here, the above `setf' call is expanded by binding the argument forms ARGS | |
437 according to ARGLIST, binding the value form VAL to STORE, then executing | |
438 BODY, which must return a Lisp form that does the necessary `setf' operation. | |
439 Actually, ARGLIST and STORE may be bound to temporary variables which are | |
440 introduced automatically to preserve proper execution order of the arguments. | |
441 Example: (defsetf nth (n x) (v) (list 'setcar (list 'nthcdr n x) v))." nil 'macro) | |
442 | |
443 (autoload 'get-setf-method "cl-macs" "\ | |
444 Return a list of five values describing the setf-method for PLACE. | |
445 PLACE may be any Lisp form which can appear as the PLACE argument to | |
446 a macro like `setf' or `incf'." nil nil) | |
447 | |
448 (autoload 'setf "cl-macs" "\ | |
449 (setf PLACE VAL PLACE VAL ...): set each PLACE to the value of its VAL. | |
450 This is a generalized version of `setq'; the PLACEs may be symbolic | |
451 references such as (car x) or (aref x i), as well as plain symbols. | |
452 For example, (setf (cadar x) y) is equivalent to (setcar (cdar x) y). | |
453 The return value is the last VAL in the list." nil 'macro) | |
454 | |
455 (autoload 'psetf "cl-macs" "\ | |
456 (psetf PLACE VAL PLACE VAL ...): set PLACEs to the values VALs in parallel. | |
457 This is like `setf', except that all VAL forms are evaluated (in order) | |
458 before assigning any PLACEs to the corresponding values." nil 'macro) | |
459 | |
460 (autoload 'cl-do-pop "cl-macs" nil nil nil) | |
461 | |
462 (autoload 'remf "cl-macs" "\ | |
463 (remf PLACE TAG): remove TAG from property list PLACE. | |
464 PLACE may be a symbol, or any generalized variable allowed by `setf'. | |
465 The form returns true if TAG was found and removed, nil otherwise." nil 'macro) | |
466 | |
467 (autoload 'shiftf "cl-macs" "\ | |
468 (shiftf PLACE PLACE... VAL): shift left among PLACEs. | |
469 Example: (shiftf A B C) sets A to B, B to C, and returns the old A. | |
470 Each PLACE may be a symbol, or any generalized variable allowed by `setf'." nil 'macro) | |
471 | |
472 (autoload 'rotatef "cl-macs" "\ | |
473 (rotatef PLACE...): rotate left among PLACEs. | |
474 Example: (rotatef A B C) sets A to B, B to C, and C to A. It returns nil. | |
475 Each PLACE may be a symbol, or any generalized variable allowed by `setf'." nil 'macro) | |
476 | |
477 (autoload 'letf "cl-macs" "\ | |
478 (letf ((PLACE VALUE) ...) BODY...): temporarily bind to PLACEs. | |
479 This is the analogue of `let', but with generalized variables (in the | |
480 sense of `setf') for the PLACEs. Each PLACE is set to the corresponding | |
481 VALUE, then the BODY forms are executed. On exit, either normally or | |
482 because of a `throw' or error, the PLACEs are set back to their original | |
483 values. Note that this macro is *not* available in Common Lisp. | |
484 As a special case, if `(PLACE)' is used instead of `(PLACE VALUE)', | |
485 the PLACE is not modified before executing BODY." nil 'macro) | |
486 | |
487 (autoload 'letf* "cl-macs" "\ | |
488 (letf* ((PLACE VALUE) ...) BODY...): temporarily bind to PLACEs. | |
489 This is the analogue of `let*', but with generalized variables (in the | |
490 sense of `setf') for the PLACEs. Each PLACE is set to the corresponding | |
491 VALUE, then the BODY forms are executed. On exit, either normally or | |
492 because of a `throw' or error, the PLACEs are set back to their original | |
493 values. Note that this macro is *not* available in Common Lisp. | |
494 As a special case, if `(PLACE)' is used instead of `(PLACE VALUE)', | |
495 the PLACE is not modified before executing BODY." nil 'macro) | |
496 | |
497 (autoload 'callf "cl-macs" "\ | |
498 (callf FUNC PLACE ARGS...): set PLACE to (FUNC PLACE ARGS...). | |
499 FUNC should be an unquoted function name. PLACE may be a symbol, | |
500 or any generalized variable allowed by `setf'." nil 'macro) | |
501 | |
502 (autoload 'callf2 "cl-macs" "\ | |
503 (callf2 FUNC ARG1 PLACE ARGS...): set PLACE to (FUNC ARG1 PLACE ARGS...). | |
504 Like `callf', but PLACE is the second argument of FUNC, not the first." nil 'macro) | |
505 | |
506 (autoload 'define-modify-macro "cl-macs" "\ | |
507 (define-modify-macro NAME ARGLIST FUNC): define a `setf'-like modify macro. | |
508 If NAME is called, it combines its PLACE argument with the other arguments | |
509 from ARGLIST using FUNC: (define-modify-macro incf (&optional (n 1)) +)" nil 'macro) | |
510 | |
511 (autoload 'defstruct "cl-macs" "\ | |
512 (defstruct (NAME OPTIONS...) (SLOT SLOT-OPTS...)...): define a struct type. | |
513 This macro defines a new Lisp data type called NAME, which contains data | |
514 stored in SLOTs. This defines a `make-NAME' constructor, a `copy-NAME' | |
515 copier, a `NAME-p' predicate, and setf-able `NAME-SLOT' accessors." nil 'macro) | |
516 | |
517 (autoload 'cl-struct-setf-expander "cl-macs" nil nil nil) | |
518 | |
519 (autoload 'deftype "cl-macs" "\ | |
520 (deftype NAME ARGLIST BODY...): define NAME as a new data type. | |
521 The type name can then be used in `typecase', `check-type', etc." nil 'macro) | |
522 | |
523 (autoload 'typep "cl-macs" "\ | |
524 Check that OBJECT is of type TYPE. | |
525 TYPE is a Common Lisp-style type specifier." nil nil) | |
526 | |
527 (autoload 'check-type "cl-macs" "\ | |
528 Verify that FORM is of type TYPE; signal an error if not. | |
529 STRING is an optional description of the desired type." nil 'macro) | |
530 | |
531 (autoload 'assert "cl-macs" "\ | |
532 Verify that FORM returns non-nil; signal an error if not. | |
533 Second arg SHOW-ARGS means to include arguments of FORM in message. | |
534 Other args STRING and ARGS... are arguments to be passed to `error'. | |
535 They are not evaluated unless the assertion fails. If STRING is | |
536 omitted, a default message listing FORM itself is used." nil 'macro) | |
537 | |
538 (autoload 'ignore-errors "cl-macs" "\ | |
539 Execute FORMS; if an error occurs, return nil. | |
540 Otherwise, return result of last FORM." nil 'macro) | |
541 | |
542 (autoload 'ignore-file-errors "cl-macs" "\ | |
543 Execute FORMS; if an error of type `file-error' occurs, return nil. | |
544 Otherwise, return result of last FORM." nil 'macro) | |
545 | |
546 (autoload 'define-compiler-macro "cl-macs" "\ | |
547 (define-compiler-macro FUNC ARGLIST BODY...): Define a compiler-only macro. | |
548 This is like `defmacro', but macro expansion occurs only if the call to | |
549 FUNC is compiled (i.e., not interpreted). Compiler macros should be used | |
550 for optimizing the way calls to FUNC are compiled; the form returned by | |
551 BODY should do the same thing as a call to the normal function called | |
552 FUNC, though possibly more efficiently. Note that, like regular macros, | |
553 compiler macros are expanded repeatedly until no further expansions are | |
554 possible. Unlike regular macros, BODY can decide to \"punt\" and leave the | |
555 original function call alone by declaring an initial `&whole foo' parameter | |
556 and then returning foo." nil 'macro) | |
557 | |
558 (autoload 'compiler-macroexpand "cl-macs" nil nil nil) | |
559 | |
560 ;;;*** | |
561 | |
562 ;;;### (autoloads (batch-remove-old-elc) "cleantree" "lisp/cleantree.el") | |
563 | |
564 (autoload 'batch-remove-old-elc "cleantree" nil nil nil) | |
565 | |
566 ;;;*** | |
567 | |
568 ;;;### (autoloads (config-value config-value-hash-table) "config" "lisp/config.el") | |
569 | |
570 (autoload 'config-value-hash-table "config" "\ | |
571 Return hash table of configuration parameters and their values." nil nil) | |
572 | |
573 (autoload 'config-value "config" "\ | |
574 Return the value of the configuration parameter CONFIG_SYMBOL." nil nil) | |
575 | |
576 ;;;*** | |
577 | |
578 ;;;### (autoloads (Custom-make-dependencies) "cus-dep" "lisp/cus-dep.el") | |
579 | |
580 (autoload 'Custom-make-dependencies "cus-dep" "\ | |
581 Extract custom dependencies from .el files in SUBDIRS. | |
582 SUBDIRS is a list of directories. If it is nil, the command-line | |
583 arguments are used. If it is a string, only that directory is | |
584 processed. This function is especially useful in batch mode. | |
585 | |
586 Batch usage: xemacs -batch -l cus-dep.el -f Custom-make-dependencies DIRS" t nil) | |
587 | |
588 ;;;*** | |
589 | |
590 ;;;### (autoloads (custom-migrate-custom-file customize-menu-create custom-menu-create custom-save-all customize-save-customized customize-browse custom-buffer-create-other-window custom-buffer-create customize-apropos-groups customize-apropos-faces customize-apropos-options customize-apropos customize-saved customize-customized customize-face-other-window customize-face customize-option-other-window customize-changed-options customize-variable customize-other-window customize customize-save-variable customize-set-variable customize-set-value) "cus-edit" "lisp/cus-edit.el") | |
591 | |
592 (autoload 'customize-set-value "cus-edit" "\ | |
593 Set VARIABLE to VALUE. VALUE is a Lisp object. | |
594 | |
595 If VARIABLE has a `variable-interactive' property, that is used as if | |
596 it were the arg to `interactive' (which see) to interactively read the value. | |
597 | |
598 If VARIABLE has a `custom-type' property, it must be a widget and the | |
599 `:prompt-value' property of that widget will be used for reading the value. | |
600 | |
601 If given a prefix (or a COMMENT argument), also prompt for a comment." t nil) | |
602 | |
603 (autoload 'customize-set-variable "cus-edit" "\ | |
604 Set the default for VARIABLE to VALUE. VALUE is a Lisp object. | |
605 | |
606 If VARIABLE has a `custom-set' property, that is used for setting | |
607 VARIABLE, otherwise `set-default' is used. | |
608 | |
609 The `customized-value' property of the VARIABLE will be set to a list | |
610 with a quoted VALUE as its sole list member. | |
611 | |
612 If VARIABLE has a `variable-interactive' property, that is used as if | |
613 it were the arg to `interactive' (which see) to interactively read the value. | |
614 | |
615 If VARIABLE has a `custom-type' property, it must be a widget and the | |
616 `:prompt-value' property of that widget will be used for reading the value. | |
617 | |
618 If given a prefix (or a COMMENT argument), also prompt for a comment." t nil) | |
619 | |
620 (autoload 'customize-save-variable "cus-edit" "\ | |
621 Set the default for VARIABLE to VALUE, and save it for future sessions. | |
622 If VARIABLE has a `custom-set' property, that is used for setting | |
623 VARIABLE, otherwise `set-default' is used. | |
624 | |
625 The `customized-value' property of the VARIABLE will be set to a list | |
626 with a quoted VALUE as its sole list member. | |
627 | |
628 If VARIABLE has a `variable-interactive' property, that is used as if | |
629 it were the arg to `interactive' (which see) to interactively read the value. | |
630 | |
631 If VARIABLE has a `custom-type' property, it must be a widget and the | |
632 `:prompt-value' property of that widget will be used for reading the value. | |
633 | |
634 If given a prefix (or a COMMENT argument), also prompt for a comment." t nil) | |
635 | |
636 (autoload 'customize "cus-edit" "\ | |
637 Select a customization buffer which you can use to set user options. | |
638 User options are structured into \"groups\". | |
639 The default group is `Emacs'." t nil) | |
640 | |
641 (defalias 'customize-group 'customize) | |
642 | |
643 (autoload 'customize-other-window "cus-edit" "\ | |
644 Customize SYMBOL, which must be a customization group." t nil) | |
645 | |
646 (defalias 'customize-group-other-window 'customize-other-window) | |
647 | |
648 (defalias 'customize-option 'customize-variable) | |
649 | |
650 (autoload 'customize-variable "cus-edit" "\ | |
651 Customize SYMBOL, which must be a user option variable." t nil) | |
652 | |
653 (autoload 'customize-changed-options "cus-edit" "\ | |
654 Customize all user option variables whose default values changed recently. | |
655 This means, in other words, variables defined with a `:version' keyword." t nil) | |
656 | |
657 (defalias 'customize-variable-other-window 'customize-option-other-window) | |
658 | |
659 (autoload 'customize-option-other-window "cus-edit" "\ | |
660 Customize SYMBOL, which must be a user option variable. | |
661 Show the buffer in another window, but don't select it." t nil) | |
662 | |
663 (autoload 'customize-face "cus-edit" "\ | |
664 Customize SYMBOL, which should be a face name or nil. | |
665 If SYMBOL is nil, customize all faces." t nil) | |
666 | |
667 (autoload 'customize-face-other-window "cus-edit" "\ | |
668 Show customization buffer for FACE in other window." t nil) | |
669 | |
670 (autoload 'customize-customized "cus-edit" "\ | |
671 Customize all user options set since the last save in this session." t nil) | |
672 | |
673 (autoload 'customize-saved "cus-edit" "\ | |
674 Customize all already saved user options." t nil) | |
675 | |
676 (autoload 'customize-apropos "cus-edit" "\ | |
677 Customize all user options matching REGEXP. | |
678 If ALL is `options', include only options. | |
679 If ALL is `faces', include only faces. | |
680 If ALL is `groups', include only groups. | |
681 If ALL is t (interactively, with prefix arg), include options which are not | |
682 user-settable, as well as faces and groups." t nil) | |
683 | |
684 (autoload 'customize-apropos-options "cus-edit" "\ | |
685 Customize all user options matching REGEXP. | |
686 With prefix arg, include options which are not user-settable." t nil) | |
687 | |
688 (autoload 'customize-apropos-faces "cus-edit" "\ | |
689 Customize all user faces matching REGEXP." t nil) | |
690 | |
691 (autoload 'customize-apropos-groups "cus-edit" "\ | |
692 Customize all user groups matching REGEXP." t nil) | |
693 | |
694 (autoload 'custom-buffer-create "cus-edit" "\ | |
695 Create a buffer containing OPTIONS. | |
696 Optional NAME is the name of the buffer. | |
697 OPTIONS should be an alist of the form ((SYMBOL WIDGET)...), where | |
698 SYMBOL is a customization option, and WIDGET is a widget for editing | |
699 that option." nil nil) | |
700 | |
701 (autoload 'custom-buffer-create-other-window "cus-edit" "\ | |
702 Create a buffer containing OPTIONS. | |
703 Optional NAME is the name of the buffer. | |
704 OPTIONS should be an alist of the form ((SYMBOL WIDGET)...), where | |
705 SYMBOL is a customization option, and WIDGET is a widget for editing | |
706 that option." nil nil) | |
707 | |
708 (autoload 'customize-browse "cus-edit" "\ | |
709 Create a tree browser for the customize hierarchy." t nil) | |
710 | |
711 (autoload 'customize-save-customized "cus-edit" "\ | |
712 Save all user options which have been set in this session." t nil) | |
713 | |
714 (autoload 'custom-save-all "cus-edit" "\ | |
715 Save all customizations in `custom-file'." nil nil) | |
716 | |
717 (autoload 'custom-menu-create "cus-edit" "\ | |
718 Create menu for customization group SYMBOL. | |
719 The menu is in a format applicable to `easy-menu-define'." nil nil) | |
720 | |
721 (autoload 'customize-menu-create "cus-edit" "\ | |
722 Return a customize menu for customization group SYMBOL. | |
723 If optional NAME is given, use that as the name of the menu. | |
724 Otherwise the menu will be named `Customize'. | |
725 The format is suitable for use with `easy-menu-define'." nil nil) | |
726 | |
727 (autoload 'custom-migrate-custom-file "cus-edit" "\ | |
728 Migrate custom file from home directory." nil nil) | |
729 | |
730 ;;;*** | |
731 | |
732 ;;;### (autoloads (custom-reset-faces custom-theme-reset-faces custom-theme-face-value custom-theme-set-faces custom-set-faces custom-set-face-update-spec custom-declare-face) "cus-face" "lisp/cus-face.el") | |
733 | |
734 (autoload 'custom-declare-face "cus-face" "\ | |
735 Like `defface', but FACE is evaluated as a normal argument." nil nil) | |
736 | |
737 (autoload 'custom-set-face-update-spec "cus-face" "\ | |
738 Customize the FACE for display types matching DISPLAY, merging | |
739 in the new items from PLIST" nil nil) | |
740 | |
741 (autoload 'custom-set-faces "cus-face" "\ | |
742 Initialize faces according to user preferences. | |
743 This asociates the setting with the USER theme. | |
744 The arguments should be a list where each entry has the form: | |
745 | |
746 (FACE SPEC [NOW [COMMENT]]) | |
747 | |
748 SPEC will be stored as the saved value for FACE. If NOW is present | |
749 and non-nil, FACE will also be created according to SPEC. | |
750 COMMENT is a string comment about FACE. | |
751 | |
752 See `defface' for the format of SPEC." nil nil) | |
753 | |
754 (autoload 'custom-theme-set-faces "cus-face" "\ | |
755 Initialize faces according to settings specified by args. | |
756 Records the settings as belonging to THEME. | |
757 | |
758 See `custom-set-faces' for a description of the arguments ARGS." nil nil) | |
759 | |
760 (autoload 'custom-theme-face-value "cus-face" "\ | |
761 Return spec of FACE in THEME if the THEME modifies the | |
762 FACE. Nil otherwise." nil nil) | |
763 | |
764 (autoload 'custom-theme-reset-faces "cus-face" nil nil nil) | |
765 | |
766 (autoload 'custom-reset-faces "cus-face" "\ | |
767 Reset the value of the face to values previously defined. | |
768 Assosiate this setting with the 'user' theme. | |
769 | |
770 ARGS is defined as for `custom-theme-reset-faces'" nil nil) | |
771 | |
772 ;;;*** | |
773 | |
774 ;;;### (autoloads (make-custom-file-name) "cus-file" "lisp/cus-file.el") | |
775 | |
776 (defconst custom-file-base "custom.el" "\ | |
777 Base of file name for storing customization information.") | |
778 | |
779 (defvar custom-file nil "\ | |
780 File used for storing customization information. | |
781 If you change this from the default you need to | |
782 explicitly load that file for the settings to take effect.") | |
783 | |
784 (autoload 'make-custom-file-name "cus-file" "\ | |
785 Construct the default custom file name from the init file name. | |
786 If FORCE-NEW is non-nil, force post-migration location." nil nil) | |
787 | |
788 ;;;*** | |
789 | |
790 ;;;### (autoloads (disassemble) "disass" "lisp/disass.el") | |
791 | |
792 (autoload 'disassemble "disass" "\ | |
793 Print disassembled code for OBJECT in (optional) BUFFER. | |
794 OBJECT can be a symbol defined as a function, or a function itself | |
795 \(a lambda expression or a compiled-function object). | |
796 If OBJECT is not already compiled, we compile it, but do not | |
797 redefine OBJECT if it is a symbol." t nil) | |
798 | |
799 ;;;*** | |
800 | |
801 ;;;### (autoloads (standard-display-european standard-display-underline standard-display-graphic standard-display-g1 standard-display-ascii standard-display-default standard-display-8bit make-display-table describe-current-display-table) "disp-table" "lisp/disp-table.el") | |
802 | |
803 (autoload 'describe-current-display-table "disp-table" "\ | |
804 Describe the display table in use in the selected window and buffer." t nil) | |
805 | |
806 (autoload 'make-display-table "disp-table" "\ | |
807 Return a new, empty display table." nil nil) | |
808 | |
809 (autoload 'standard-display-8bit "disp-table" "\ | |
810 Display characters in the range L to H literally." nil nil) | |
811 | |
812 (autoload 'standard-display-default "disp-table" "\ | |
813 Display characters in the range L to H using the default notation." nil nil) | |
814 | |
815 (autoload 'standard-display-ascii "disp-table" "\ | |
816 Display character C using printable string S." nil nil) | |
817 | |
818 (autoload 'standard-display-g1 "disp-table" "\ | |
819 Display character C as character SC in the g1 character set. | |
820 This function assumes that your terminal uses the SO/SI characters; | |
821 it is meaningless for an X frame." nil nil) | |
822 | |
823 (autoload 'standard-display-graphic "disp-table" "\ | |
824 Display character C as character GC in graphics character set. | |
825 This function assumes VT100-compatible escapes; it is meaningless for an | |
826 X frame." nil nil) | |
827 | |
828 (autoload 'standard-display-underline "disp-table" "\ | |
829 Display character C as character UC plus underlining." nil nil) | |
830 | |
831 (autoload 'standard-display-european "disp-table" "\ | |
832 Toggle display of European characters encoded with ISO 8859. | |
833 When enabled, characters in the range of 160 to 255 display not | |
834 as octal escapes, but as accented characters. | |
835 With prefix argument, enable European character display iff arg is positive." t nil) | |
836 | |
837 ;;;*** | |
838 | |
839 ;;;### (autoloads nil "easymenu" "lisp/easymenu.el") | |
138 | 840 |
139 ;;;*** | 841 ;;;*** |
140 | 842 |
141 ;;;### (autoloads (pop-tag-mark tags-apropos list-tags tags-query-replace tags-search tags-loop-continue next-file tag-complete-symbol find-tag-other-window find-tag find-tag-at-point visit-tags-table) "etags" "lisp/etags.el") | 843 ;;;### (autoloads (pop-tag-mark tags-apropos list-tags tags-query-replace tags-search tags-loop-continue next-file tag-complete-symbol find-tag-other-window find-tag find-tag-at-point visit-tags-table) "etags" "lisp/etags.el") |
142 | 844 |
274 (define-obsolete-variable-alias 'font-lock-use-maximal-decoration 'font-lock-maximum-decoration) | 976 (define-obsolete-variable-alias 'font-lock-use-maximal-decoration 'font-lock-maximum-decoration) |
275 | 977 |
276 (defcustom font-lock-maximum-size (* 250 1024) "*If non-nil, the maximum size for buffers for fontifying.\nOnly buffers less than this can be fontified when Font Lock mode is turned on.\nIf nil, means size is irrelevant.\nIf a list, each element should be a cons pair of the form (MAJOR-MODE . SIZE),\nwhere MAJOR-MODE is a symbol or t (meaning the default). For example:\n ((c++-mode . 256000) (c-mode . 256000) (rmail-mode . 1048576))\nmeans that the maximum size is 250K for buffers in `c++-mode' or `c-mode', one\nmegabyte for buffers in `rmail-mode', and size is irrelevant otherwise." :type '(choice (const :tag "none" nil) (integer :tag "size") (repeat :menu-tag "mode specific" :tag "mode specific" :value ((t)) (cons :tag "Instance" (radio :tag "Mode" (const :tag "all" t) (symbol :tag "name")) (radio :tag "Size" (const :tag "none" nil) (integer :tag "size"))))) :group 'font-lock) | 978 (defcustom font-lock-maximum-size (* 250 1024) "*If non-nil, the maximum size for buffers for fontifying.\nOnly buffers less than this can be fontified when Font Lock mode is turned on.\nIf nil, means size is irrelevant.\nIf a list, each element should be a cons pair of the form (MAJOR-MODE . SIZE),\nwhere MAJOR-MODE is a symbol or t (meaning the default). For example:\n ((c++-mode . 256000) (c-mode . 256000) (rmail-mode . 1048576))\nmeans that the maximum size is 250K for buffers in `c++-mode' or `c-mode', one\nmegabyte for buffers in `rmail-mode', and size is irrelevant otherwise." :type '(choice (const :tag "none" nil) (integer :tag "size") (repeat :menu-tag "mode specific" :tag "mode specific" :value ((t)) (cons :tag "Instance" (radio :tag "Mode" (const :tag "all" t) (symbol :tag "name")) (radio :tag "Size" (const :tag "none" nil) (integer :tag "size"))))) :group 'font-lock) |
277 | 979 |
278 (defvar font-lock-keywords nil "\ | 980 (defvar font-lock-keywords nil "\ |
279 A list of the keywords to highlight. | 981 A list defining the keywords for `font-lock-mode' to highlight. |
280 Each element should be of the form: | 982 |
281 | 983 FONT-LOCK-KEYWORDS := List of FONT-LOCK-FORM's. |
282 MATCHER | 984 |
283 (MATCHER . MATCH) | 985 FONT-LOCK-FORM :== MATCHER |
284 (MATCHER . FACENAME) | 986 | (MATCHER . MATCH) |
285 (MATCHER . HIGHLIGHT) | 987 | (MATCHER . FACE-FORM) |
286 (MATCHER HIGHLIGHT ...) | 988 | (MATCHER . HIGHLIGHT) |
287 (eval . FORM) | 989 | (MATCHER HIGHLIGHT ...) |
288 | 990 | (eval . FORM) |
289 where HIGHLIGHT should be either MATCH-HIGHLIGHT or MATCH-ANCHORED. | 991 |
290 | 992 MATCHER :== A string containing a regexp. |
291 FORM is an expression, whose value should be a keyword element, | 993 | A variable containing a regexp to search for. |
292 evaluated when the keyword is (first) used in a buffer. This feature | 994 | A function to call to make the search. |
293 can be used to provide a keyword that can only be generated when Font | 995 It is called with one arg, the limit of the search, |
294 Lock mode is actually turned on. | 996 and should leave MATCH results in the XEmacs global |
997 match data. | |
998 | |
999 MATCH :== An integer match subexpression number from MATCHER. | |
1000 | |
1001 FACE-FORM :== The symbol naming a defined face. | |
1002 | Expression whos value is the face name to use. If you | |
1003 want FACE-FORM to be a symbol that evaluates to a face, | |
1004 use a form like \"(progn sym)\". | |
1005 | |
1006 HIGHLIGHT :== MATCH-HIGHLIGHT | |
1007 | MATCH-ANCHORED | |
1008 | |
1009 FORM :== Expression returning a FONT-LOCK-FORM, evaluated when | |
1010 the FONT-LOCK-FORM is first used in a buffer. This | |
1011 feature can be used to provide a FONT-LOCK-FORM that | |
1012 can only be generated when Font Lock mode is actually | |
1013 turned on. | |
1014 | |
1015 MATCH-HIGHLIGHT :== (MATCH FACE-FORM OVERRIDE LAXMATCH) | |
1016 | |
1017 OVERRIDE :== t - overwrite existing fontification | |
1018 | 'keep - only parts not already fontified are | |
1019 highlighted. | |
1020 | 'prepend - merge faces, this fontification has | |
1021 precedence over existing | |
1022 | 'append - merge faces, existing fontification has | |
1023 precedence over | |
1024 this face. | |
1025 | |
1026 LAXMATCH :== If non-nil, no error is signalled if there is no MATCH | |
1027 in MATCHER. | |
1028 | |
1029 MATCH-ANCHORED :== (ANCHOR-MATCHER PRE-MATCH-FORM \\ | |
1030 POST-MATCH-FORM MATCH-HIGHLIGHT ...) | |
1031 | |
1032 ANCHOR-MATCHER :== Like a MATCHER, except that the limit of the search | |
1033 defaults to the end of the line after PRE-MATCH-FORM | |
1034 is evaluated. However, if PRE-MATCH-FORM returns a | |
1035 position greater than the end of the line, that | |
1036 position is used as the limit of the search. It is | |
1037 generally a bad idea to return a position greater than | |
1038 the end of the line, i.e., cause the ANCHOR-MATCHER | |
1039 search to span lines. | |
1040 | |
1041 PRE-MATCH-FORM :== Evaluated before the ANCHOR-MATCHER is used, therefore | |
1042 can be used to initialize before, ANCHOR-MATCHER is | |
1043 used. Typically, PRE-MATCH-FORM is used to move to | |
1044 some position relative to the original MATCHER, before | |
1045 starting with the ANCHOR-MATCHER. | |
1046 | |
1047 POST-MATCH-FORM :== Like PRE-MATCH-FORM, but used to clean up after the | |
1048 ANCHOR-MATCHER. It might be used to move, before | |
1049 resuming with MATCH-ANCHORED's parent's MATCHER. | |
1050 | |
1051 For example, an element of the first form highlights (if not already highlighted): | |
1052 | |
1053 \"\\\\<foo\\\\>\" Discrete occurrences of \"foo\" in the value | |
1054 of the variable `font-lock-keyword-face'. | |
1055 | |
1056 (\"fu\\\\(bar\\\\)\" . 1) Substring \"bar\" within all occurrences of | |
1057 \"fubar\" in the value of | |
1058 `font-lock-keyword-face'. | |
1059 | |
1060 (\"fubar\" . fubar-face) Occurrences of \"fubar\" in the value of | |
1061 `fubar-face'. | |
1062 | |
1063 (\"foo\\\\|bar\" 0 foo-bar-face t) Occurrences of either \"foo\" or \"bar\" in the | |
1064 value of `foo-bar-face', even if already | |
1065 highlighted. | |
1066 | |
1067 (fubar-match 1 fubar-face) The first subexpression within all | |
1068 occurrences of whatever the function | |
1069 `fubar-match' finds and matches in the value | |
1070 of `fubar-face'. | |
1071 | |
1072 (\"\\\\<anchor\\\\>\" (0 anchor-face) (\"\\\\<item\\\\>\" nil nil (0 item-face))) | |
1073 -------------- --------------- ------------ --- --- ------------- | |
1074 | | | | | | | |
1075 MATCHER | ANCHOR-MATCHER | +------+ MATCH-HIGHLIGHT | |
1076 MATCH-HIGHLIGHT PRE-MATCH-FORM | | |
1077 POST-MATCH-FORM | |
1078 | |
1079 Discrete occurrences of \"anchor\" in the value of `anchor-face', and | |
1080 subsequent discrete occurrences of \"item\" (on the same line) in the value | |
1081 of `item-face'. (Here PRE-MATCH-FORM and POST-MATCH-FORM are nil. | |
1082 Therefore \"item\" is initially searched for starting from the end of the | |
1083 match of \"anchor\", and searching for subsequent instance of \"anchor\" | |
1084 resumes from where searching for \"item\" concluded.) | |
295 | 1085 |
296 For highlighting single items, typically only MATCH-HIGHLIGHT is required. | 1086 For highlighting single items, typically only MATCH-HIGHLIGHT is required. |
297 However, if an item or (typically) items is to be highlighted following the | 1087 However, if an item or (typically) several items are to be highlighted |
298 instance of another item (the anchor) then MATCH-ANCHORED may be required. | 1088 following the instance of another item (the anchor) then MATCH-ANCHORED may be |
299 | 1089 required. |
300 MATCH-HIGHLIGHT should be of the form: | |
301 | |
302 (MATCH FACENAME OVERRIDE LAXMATCH) | |
303 | |
304 Where MATCHER can be either the regexp to search for, a variable | |
305 containing the regexp to search for, or the function to call to make | |
306 the search (called with one argument, the limit of the search). MATCH | |
307 is the subexpression of MATCHER to be highlighted. FACENAME is either | |
308 a symbol naming a face, or an expression whose value is the face name | |
309 to use. If you want FACENAME to be a symbol that evaluates to a face, | |
310 use a form like \"(progn sym)\". | |
311 | |
312 OVERRIDE and LAXMATCH are flags. If OVERRIDE is t, existing fontification may | |
313 be overwritten. If `keep', only parts not already fontified are highlighted. | |
314 If `prepend' or `append', existing fontification is merged with the new, in | |
315 which the new or existing fontification, respectively, takes precedence. | |
316 If LAXMATCH is non-nil, no error is signalled if there is no MATCH in MATCHER. | |
317 | |
318 For example, an element of the form highlights (if not already highlighted): | |
319 | |
320 \"\\\\\\=<foo\\\\\\=>\" Discrete occurrences of \"foo\" in the value of the | |
321 variable `font-lock-keyword-face'. | |
322 (\"fu\\\\(bar\\\\)\" . 1) Substring \"bar\" within all occurrences of \"fubar\" in | |
323 the value of `font-lock-keyword-face'. | |
324 (\"fubar\" . fubar-face) Occurrences of \"fubar\" in the value of `fubar-face'. | |
325 (\"foo\\\\|bar\" 0 foo-bar-face t) | |
326 Occurrences of either \"foo\" or \"bar\" in the value | |
327 of `foo-bar-face', even if already highlighted. | |
328 | |
329 MATCH-ANCHORED should be of the form: | |
330 | |
331 (MATCHER PRE-MATCH-FORM POST-MATCH-FORM MATCH-HIGHLIGHT ...) | |
332 | |
333 Where MATCHER is as for MATCH-HIGHLIGHT with one exception; see below. | |
334 PRE-MATCH-FORM and POST-MATCH-FORM are evaluated before the first, and after | |
335 the last, instance MATCH-ANCHORED's MATCHER is used. Therefore they can be | |
336 used to initialize before, and cleanup after, MATCHER is used. Typically, | |
337 PRE-MATCH-FORM is used to move to some position relative to the original | |
338 MATCHER, before starting with MATCH-ANCHORED's MATCHER. POST-MATCH-FORM might | |
339 be used to move, before resuming with MATCH-ANCHORED's parent's MATCHER. | |
340 | |
341 For example, an element of the form highlights (if not already highlighted): | |
342 | |
343 (\"\\\\\\=<anchor\\\\\\=>\" (0 anchor-face) (\"\\\\\\=<item\\\\\\=>\" nil nil (0 item-face))) | |
344 | |
345 Discrete occurrences of \"anchor\" in the value of `anchor-face', and subsequent | |
346 discrete occurrences of \"item\" (on the same line) in the value of `item-face'. | |
347 (Here PRE-MATCH-FORM and POST-MATCH-FORM are nil. Therefore \"item\" is | |
348 initially searched for starting from the end of the match of \"anchor\", and | |
349 searching for subsequent instance of \"anchor\" resumes from where searching | |
350 for \"item\" concluded.) | |
351 | |
352 The above-mentioned exception is as follows. The limit of the MATCHER search | |
353 defaults to the end of the line after PRE-MATCH-FORM is evaluated. | |
354 However, if PRE-MATCH-FORM returns a position greater than the position after | |
355 PRE-MATCH-FORM is evaluated, that position is used as the limit of the search. | |
356 It is generally a bad idea to return a position greater than the end of the | |
357 line, i.e., cause the MATCHER search to span lines. | |
358 | |
359 Note that the MATCH-ANCHORED feature is experimental; in the future, we may | |
360 replace it with other ways of providing this functionality. | |
361 | 1090 |
362 These regular expressions should not match text which spans lines. While | 1091 These regular expressions should not match text which spans lines. While |
363 \\[font-lock-fontify-buffer] handles multi-line patterns correctly, updating | 1092 \\[font-lock-fontify-buffer] handles multi-line patterns correctly, updating when you |
364 when you edit the buffer does not, since it considers text one line at a time. | 1093 edit the buffer does not, since it considers text one line at a time. |
365 | 1094 |
366 Be very careful composing regexps for this list; | 1095 Be very careful composing regexps for this list; the wrong pattern can |
367 the wrong pattern can dramatically slow things down!") | 1096 dramatically slow things down! |
1097 ") | |
368 | 1098 |
369 (make-variable-buffer-local 'font-lock-keywords) | 1099 (make-variable-buffer-local 'font-lock-keywords) |
370 | 1100 |
371 (defcustom font-lock-mode nil "Non nil means `font-lock-mode' is on" :group 'font-lock :type 'boolean :initialize 'custom-initialize-default :require 'font-lock :set (function (lambda (var val) (font-lock-mode (or val 0))))) | 1101 (defcustom font-lock-mode nil "Non nil means `font-lock-mode' is on" :group 'font-lock :type 'boolean :initialize 'custom-initialize-default :require 'font-lock :set (function (lambda (var val) (font-lock-mode (or val 0))))) |
372 | 1102 |
422 This can take a while for large buffers." t nil) | 1152 This can take a while for large buffers." t nil) |
423 | 1153 |
424 (autoload 'font-lock-set-defaults-1 "font-lock" nil nil nil) | 1154 (autoload 'font-lock-set-defaults-1 "font-lock" nil nil nil) |
425 | 1155 |
426 (add-minor-mode 'font-lock-mode " Font") | 1156 (add-minor-mode 'font-lock-mode " Font") |
1157 | |
1158 ;;;*** | |
1159 | |
1160 ;;;### (autoloads (font-menu-weight-constructor font-menu-size-constructor font-menu-family-constructor reset-device-font-menus) "font-menu" "lisp/font-menu.el") | |
1161 | |
1162 (defcustom font-menu-ignore-scaled-fonts nil "*If non-nil, then the font menu will try to show only bitmap fonts." :type 'boolean :group 'font-menu) | |
1163 | |
1164 (defcustom font-menu-this-frame-only-p nil "*If non-nil, then changing the default font from the font menu will only\naffect one frame instead of all frames." :type 'boolean :group 'font-menu) | |
1165 | |
1166 (fset 'install-font-menus 'reset-device-font-menus) | |
1167 | |
1168 (autoload 'reset-device-font-menus "font-menu" "\ | |
1169 Generates the `Font', `Size', and `Weight' submenus for the Options menu. | |
1170 This is run the first time that a font-menu is needed for each device. | |
1171 If you don't like the lazy invocation of this function, you can add it to | |
1172 `create-device-hook' and that will make the font menus respond more quickly | |
1173 when they are selected for the first time. If you add fonts to your system, | |
1174 or if you change your font path, you can call this to re-initialize the menus." nil nil) | |
1175 | |
1176 (autoload 'font-menu-family-constructor "font-menu" nil nil nil) | |
1177 | |
1178 (autoload 'font-menu-size-constructor "font-menu" nil nil nil) | |
1179 | |
1180 (autoload 'font-menu-weight-constructor "font-menu" nil nil nil) | |
1181 | |
1182 ;;;*** | |
1183 | |
1184 ;;;### (autoloads (x-font-build-cache font-default-size-for-device font-default-encoding-for-device font-default-registry-for-device font-default-family-for-device font-default-object-for-device font-default-font-for-device font-create-object) "font" "lisp/font.el") | |
1185 | |
1186 (autoload 'font-create-object "font" nil nil nil) | |
1187 | |
1188 (autoload 'font-default-font-for-device "font" nil nil nil) | |
1189 | |
1190 (autoload 'font-default-object-for-device "font" nil nil nil) | |
1191 | |
1192 (autoload 'font-default-family-for-device "font" nil nil nil) | |
1193 | |
1194 (autoload 'font-default-registry-for-device "font" nil nil nil) | |
1195 | |
1196 (autoload 'font-default-encoding-for-device "font" nil nil nil) | |
1197 | |
1198 (autoload 'font-default-size-for-device "font" nil nil nil) | |
1199 | |
1200 (autoload 'x-font-build-cache "font" nil nil nil) | |
427 | 1201 |
428 ;;;*** | 1202 ;;;*** |
429 | 1203 |
430 ;;;### (autoloads (gnuserv-start gnuserv-running-p) "gnuserv" "lisp/gnuserv.el") | 1204 ;;;### (autoloads (gnuserv-start gnuserv-running-p) "gnuserv" "lisp/gnuserv.el") |
431 | 1205 |
1131 ;;;### (autoloads (x-win-init-xfree86) "x-win-xfree86" "lisp/x-win-xfree86.el") | 1905 ;;;### (autoloads (x-win-init-xfree86) "x-win-xfree86" "lisp/x-win-xfree86.el") |
1132 | 1906 |
1133 (autoload 'x-win-init-xfree86 "x-win-xfree86" nil nil nil) | 1907 (autoload 'x-win-init-xfree86 "x-win-xfree86" nil nil nil) |
1134 | 1908 |
1135 ;;;*** | 1909 ;;;*** |
1136 | |
1137 ;;;### (autoloads nil "abbrev" "lisp\\abbrev.el") | |
1138 | |
1139 ;;;*** | |
1140 | |
1141 ;;;### (autoloads (about-xemacs) "about" "lisp\\about.el") | |
1142 | |
1143 (autoload 'about-xemacs "about" "\ | |
1144 Describe the True Editor and its minions." t nil) | |
1145 | |
1146 ;;;*** | |
1147 | |
1148 ;;;### (autoloads (set-modified-alist modify-alist remove-alist set-alist del-alist put-alist vassoc) "alist" "lisp\\alist.el") | |
1149 | |
1150 (autoload 'vassoc "alist" "\ | |
1151 Search VALIST for a vector whose first element is equal to KEY. | |
1152 See also `assoc'." nil nil) | |
1153 | |
1154 (autoload 'put-alist "alist" "\ | |
1155 Modify ALIST to set VALUE to ITEM. | |
1156 If there is a pair whose car is ITEM, replace its cdr by VALUE. | |
1157 If there is not such pair, create new pair (ITEM . VALUE) and | |
1158 return new alist whose car is the new pair and cdr is ALIST. | |
1159 [tomo's ELIS like function]" nil nil) | |
1160 | |
1161 (autoload 'del-alist "alist" "\ | |
1162 If there is a pair whose key is ITEM, delete it from ALIST. | |
1163 [tomo's ELIS emulating function]" nil nil) | |
1164 | |
1165 (autoload 'set-alist "alist" "\ | |
1166 Modify a alist indicated by SYMBOL to set VALUE to ITEM." nil nil) | |
1167 | |
1168 (autoload 'remove-alist "alist" "\ | |
1169 Remove ITEM from the alist indicated by SYMBOL." nil nil) | |
1170 | |
1171 (autoload 'modify-alist "alist" "\ | |
1172 Modify alist DEFAULT into alist MODIFIER." nil nil) | |
1173 | |
1174 (autoload 'set-modified-alist "alist" "\ | |
1175 Modify a value of a symbol SYM into alist MODIFIER. | |
1176 The symbol SYM should be alist. If it is not bound, | |
1177 its value regard as nil." nil nil) | |
1178 | |
1179 ;;;*** | |
1180 | |
1181 ;;;### (autoloads (apropos-documentation apropos-value apropos apropos-command) "apropos" "lisp\\apropos.el") | |
1182 | |
1183 (fset 'command-apropos 'apropos-command) | |
1184 | |
1185 (autoload 'apropos-command "apropos" "\ | |
1186 Shows commands (interactively callable functions) that match REGEXP. | |
1187 With optional prefix ARG or if `apropos-do-all' is non-nil, also show | |
1188 variables." t nil) | |
1189 | |
1190 (autoload 'apropos "apropos" "\ | |
1191 Show all bound symbols whose names match REGEXP. | |
1192 With optional prefix ARG or if `apropos-do-all' is non-nil, also show unbound | |
1193 symbols and key bindings, which is a little more time-consuming. | |
1194 Returns list of symbols and documentation found." t nil) | |
1195 | |
1196 (autoload 'apropos-value "apropos" "\ | |
1197 Show all symbols whose value's printed image matches REGEXP. | |
1198 With optional prefix ARG or if `apropos-do-all' is non-nil, also looks | |
1199 at the function and at the names and values of properties. | |
1200 Returns list of symbols and values found." t nil) | |
1201 | |
1202 (autoload 'apropos-documentation "apropos" "\ | |
1203 Show symbols whose documentation contain matches for REGEXP. | |
1204 With optional prefix ARG or if `apropos-do-all' is non-nil, also use | |
1205 documentation that is not stored in the documentation file and show key | |
1206 bindings. | |
1207 Returns list of symbols and documentation found." t nil) | |
1208 | |
1209 ;;;*** | |
1210 | |
1211 ;;;### (autoloads nil "buff-menu" "lisp\\buff-menu.el") | |
1212 | |
1213 (defvar list-buffers-directory nil) | |
1214 | |
1215 (make-variable-buffer-local 'list-buffers-directory) | |
1216 | |
1217 ;;;*** | |
1218 | |
1219 ;;;### (autoloads (compiler-macroexpand define-compiler-macro ignore-file-errors ignore-errors assert check-type typep deftype cl-struct-setf-expander defstruct define-modify-macro callf2 callf letf* letf rotatef shiftf remf cl-do-pop psetf setf get-setf-method defsetf define-setf-method declare the locally multiple-value-setq multiple-value-bind lexical-let* lexical-let symbol-macrolet macrolet labels flet progv psetq do-all-symbols do-symbols dotimes dolist do* do loop return-from return block etypecase typecase ecase case load-time-value eval-when destructuring-bind function* defmacro* defun* cl-compile-time-init) "cl-macs" "lisp\\cl-macs.el") | |
1220 | |
1221 (autoload 'cl-compile-time-init "cl-macs" nil nil nil) | |
1222 | |
1223 (autoload 'defun* "cl-macs" "\ | |
1224 (defun* NAME ARGLIST [DOCSTRING] BODY...): define NAME as a function. | |
1225 Like normal `defun', except ARGLIST allows full Common Lisp conventions, | |
1226 and BODY is implicitly surrounded by (block NAME ...)." nil 'macro) | |
1227 | |
1228 (autoload 'defmacro* "cl-macs" "\ | |
1229 (defmacro* NAME ARGLIST [DOCSTRING] BODY...): define NAME as a macro. | |
1230 Like normal `defmacro', except ARGLIST allows full Common Lisp conventions, | |
1231 and BODY is implicitly surrounded by (block NAME ...)." nil 'macro) | |
1232 | |
1233 (autoload 'function* "cl-macs" "\ | |
1234 (function* SYMBOL-OR-LAMBDA): introduce a function. | |
1235 Like normal `function', except that if argument is a lambda form, its | |
1236 ARGLIST allows full Common Lisp conventions." nil 'macro) | |
1237 | |
1238 (autoload 'destructuring-bind "cl-macs" nil nil 'macro) | |
1239 | |
1240 (autoload 'eval-when "cl-macs" "\ | |
1241 (eval-when (WHEN...) BODY...): control when BODY is evaluated. | |
1242 If `compile' is in WHEN, BODY is evaluated when compiled at top-level. | |
1243 If `load' is in WHEN, BODY is evaluated when loaded after top-level compile. | |
1244 If `eval' is in WHEN, BODY is evaluated when interpreted or at non-top-level." nil 'macro) | |
1245 | |
1246 (autoload 'load-time-value "cl-macs" "\ | |
1247 Like `progn', but evaluates the body at load time. | |
1248 The result of the body appears to the compiler as a quoted constant." nil 'macro) | |
1249 | |
1250 (autoload 'case "cl-macs" "\ | |
1251 (case EXPR CLAUSES...): evals EXPR, chooses from CLAUSES on that value. | |
1252 Each clause looks like (KEYLIST BODY...). EXPR is evaluated and compared | |
1253 against each key in each KEYLIST; the corresponding BODY is evaluated. | |
1254 If no clause succeeds, case returns nil. A single atom may be used in | |
1255 place of a KEYLIST of one atom. A KEYLIST of `t' or `otherwise' is | |
1256 allowed only in the final clause, and matches if no other keys match. | |
1257 Key values are compared by `eql'." nil 'macro) | |
1258 | |
1259 (autoload 'ecase "cl-macs" "\ | |
1260 (ecase EXPR CLAUSES...): like `case', but error if no case fits. | |
1261 `otherwise'-clauses are not allowed." nil 'macro) | |
1262 | |
1263 (autoload 'typecase "cl-macs" "\ | |
1264 (typecase EXPR CLAUSES...): evals EXPR, chooses from CLAUSES on that value. | |
1265 Each clause looks like (TYPE BODY...). EXPR is evaluated and, if it | |
1266 satisfies TYPE, the corresponding BODY is evaluated. If no clause succeeds, | |
1267 typecase returns nil. A TYPE of `t' or `otherwise' is allowed only in the | |
1268 final clause, and matches if no other keys match." nil 'macro) | |
1269 | |
1270 (autoload 'etypecase "cl-macs" "\ | |
1271 (etypecase EXPR CLAUSES...): like `typecase', but error if no case fits. | |
1272 `otherwise'-clauses are not allowed." nil 'macro) | |
1273 | |
1274 (autoload 'block "cl-macs" "\ | |
1275 (block NAME BODY...): define a lexically-scoped block named NAME. | |
1276 NAME may be any symbol. Code inside the BODY forms can call `return-from' | |
1277 to jump prematurely out of the block. This differs from `catch' and `throw' | |
1278 in two respects: First, the NAME is an unevaluated symbol rather than a | |
1279 quoted symbol or other form; and second, NAME is lexically rather than | |
1280 dynamically scoped: Only references to it within BODY will work. These | |
1281 references may appear inside macro expansions, but not inside functions | |
1282 called from BODY." nil 'macro) | |
1283 | |
1284 (autoload 'return "cl-macs" "\ | |
1285 (return [RESULT]): return from the block named nil. | |
1286 This is equivalent to `(return-from nil RESULT)'." nil 'macro) | |
1287 | |
1288 (autoload 'return-from "cl-macs" "\ | |
1289 (return-from NAME [RESULT]): return from the block named NAME. | |
1290 This jumps out to the innermost enclosing `(block NAME ...)' form, | |
1291 returning RESULT from that form (or nil if RESULT is omitted). | |
1292 This is compatible with Common Lisp, but note that `defun' and | |
1293 `defmacro' do not create implicit blocks as they do in Common Lisp." nil 'macro) | |
1294 | |
1295 (autoload 'loop "cl-macs" "\ | |
1296 (loop CLAUSE...): The Common Lisp `loop' macro. | |
1297 Valid clauses are: | |
1298 for VAR from/upfrom/downfrom NUM to/upto/downto/above/below NUM by NUM, | |
1299 for VAR in LIST by FUNC, for VAR on LIST by FUNC, for VAR = INIT then EXPR, | |
1300 for VAR across ARRAY, repeat NUM, with VAR = INIT, while COND, until COND, | |
1301 always COND, never COND, thereis COND, collect EXPR into VAR, | |
1302 append EXPR into VAR, nconc EXPR into VAR, sum EXPR into VAR, | |
1303 count EXPR into VAR, maximize EXPR into VAR, minimize EXPR into VAR, | |
1304 if COND CLAUSE [and CLAUSE]... else CLAUSE [and CLAUSE...], | |
1305 unless COND CLAUSE [and CLAUSE]... else CLAUSE [and CLAUSE...], | |
1306 do EXPRS..., initially EXPRS..., finally EXPRS..., return EXPR, | |
1307 finally return EXPR, named NAME." nil 'macro) | |
1308 | |
1309 (autoload 'do "cl-macs" "\ | |
1310 The Common Lisp `do' loop. | |
1311 Format is: (do ((VAR INIT [STEP])...) (END-TEST [RESULT...]) BODY...)" nil 'macro) | |
1312 | |
1313 (autoload 'do* "cl-macs" "\ | |
1314 The Common Lisp `do*' loop. | |
1315 Format is: (do* ((VAR INIT [STEP])...) (END-TEST [RESULT...]) BODY...)" nil 'macro) | |
1316 | |
1317 (autoload 'dolist "cl-macs" "\ | |
1318 (dolist (VAR LIST [RESULT]) BODY...): loop over a list. | |
1319 Evaluate BODY with VAR bound to each `car' from LIST, in turn. | |
1320 Then evaluate RESULT to get return value, default nil." nil 'macro) | |
1321 | |
1322 (autoload 'dotimes "cl-macs" "\ | |
1323 (dotimes (VAR COUNT [RESULT]) BODY...): loop a certain number of times. | |
1324 Evaluate BODY with VAR bound to successive integers from 0, inclusive, | |
1325 to COUNT, exclusive. Then evaluate RESULT to get return value, default | |
1326 nil." nil 'macro) | |
1327 | |
1328 (autoload 'do-symbols "cl-macs" "\ | |
1329 (dosymbols (VAR [OBARRAY [RESULT]]) BODY...): loop over all symbols. | |
1330 Evaluate BODY with VAR bound to each interned symbol, or to each symbol | |
1331 from OBARRAY." nil 'macro) | |
1332 | |
1333 (autoload 'do-all-symbols "cl-macs" nil nil 'macro) | |
1334 | |
1335 (autoload 'psetq "cl-macs" "\ | |
1336 (psetq SYM VAL SYM VAL ...): set SYMs to the values VALs in parallel. | |
1337 This is like `setq', except that all VAL forms are evaluated (in order) | |
1338 before assigning any symbols SYM to the corresponding values." nil 'macro) | |
1339 | |
1340 (autoload 'progv "cl-macs" "\ | |
1341 (progv SYMBOLS VALUES BODY...): bind SYMBOLS to VALUES dynamically in BODY. | |
1342 The forms SYMBOLS and VALUES are evaluated, and must evaluate to lists. | |
1343 Each SYMBOL in the first list is bound to the corresponding VALUE in the | |
1344 second list (or made unbound if VALUES is shorter than SYMBOLS); then the | |
1345 BODY forms are executed and their result is returned. This is much like | |
1346 a `let' form, except that the list of symbols can be computed at run-time." nil 'macro) | |
1347 | |
1348 (autoload 'flet "cl-macs" "\ | |
1349 (flet ((FUNC ARGLIST BODY...) ...) FORM...): make temporary function defns. | |
1350 This is an analogue of `let' that operates on the function cell of FUNC | |
1351 rather than its value cell. The FORMs are evaluated with the specified | |
1352 function definitions in place, then the definitions are undone (the FUNCs | |
1353 go back to their previous definitions, or lack thereof)." nil 'macro) | |
1354 | |
1355 (autoload 'labels "cl-macs" "\ | |
1356 (labels ((FUNC ARGLIST BODY...) ...) FORM...): make temporary func bindings. | |
1357 This is like `flet', except the bindings are lexical instead of dynamic. | |
1358 Unlike `flet', this macro is fully compliant with the Common Lisp standard." nil 'macro) | |
1359 | |
1360 (autoload 'macrolet "cl-macs" "\ | |
1361 (macrolet ((NAME ARGLIST BODY...) ...) FORM...): make temporary macro defns. | |
1362 This is like `flet', but for macros instead of functions." nil 'macro) | |
1363 | |
1364 (autoload 'symbol-macrolet "cl-macs" "\ | |
1365 (symbol-macrolet ((NAME EXPANSION) ...) FORM...): make symbol macro defns. | |
1366 Within the body FORMs, references to the variable NAME will be replaced | |
1367 by EXPANSION, and (setq NAME ...) will act like (setf EXPANSION ...)." nil 'macro) | |
1368 | |
1369 (autoload 'lexical-let "cl-macs" "\ | |
1370 (lexical-let BINDINGS BODY...): like `let', but lexically scoped. | |
1371 The main visible difference is that lambdas inside BODY will create | |
1372 lexical closures as in Common Lisp." nil 'macro) | |
1373 | |
1374 (autoload 'lexical-let* "cl-macs" "\ | |
1375 (lexical-let* BINDINGS BODY...): like `let*', but lexically scoped. | |
1376 The main visible difference is that lambdas inside BODY will create | |
1377 lexical closures as in Common Lisp." nil 'macro) | |
1378 | |
1379 (autoload 'multiple-value-bind "cl-macs" "\ | |
1380 (multiple-value-bind (SYM SYM...) FORM BODY): collect multiple return values. | |
1381 FORM must return a list; the BODY is then executed with the first N elements | |
1382 of this list bound (`let'-style) to each of the symbols SYM in turn. This | |
1383 is analogous to the Common Lisp `multiple-value-bind' macro, using lists to | |
1384 simulate true multiple return values. For compatibility, (values A B C) is | |
1385 a synonym for (list A B C)." nil 'macro) | |
1386 | |
1387 (autoload 'multiple-value-setq "cl-macs" "\ | |
1388 (multiple-value-setq (SYM SYM...) FORM): collect multiple return values. | |
1389 FORM must return a list; the first N elements of this list are stored in | |
1390 each of the symbols SYM in turn. This is analogous to the Common Lisp | |
1391 `multiple-value-setq' macro, using lists to simulate true multiple return | |
1392 values. For compatibility, (values A B C) is a synonym for (list A B C)." nil 'macro) | |
1393 | |
1394 (autoload 'locally "cl-macs" nil nil 'macro) | |
1395 | |
1396 (autoload 'the "cl-macs" nil nil 'macro) | |
1397 | |
1398 (autoload 'declare "cl-macs" nil nil 'macro) | |
1399 | |
1400 (autoload 'define-setf-method "cl-macs" "\ | |
1401 (define-setf-method NAME ARGLIST BODY...): define a `setf' method. | |
1402 This method shows how to handle `setf's to places of the form (NAME ARGS...). | |
1403 The argument forms ARGS are bound according to ARGLIST, as if NAME were | |
1404 going to be expanded as a macro, then the BODY forms are executed and must | |
1405 return a list of five elements: a temporary-variables list, a value-forms | |
1406 list, a store-variables list (of length one), a store-form, and an access- | |
1407 form. See `defsetf' for a simpler way to define most setf-methods." nil 'macro) | |
1408 | |
1409 (autoload 'defsetf "cl-macs" "\ | |
1410 (defsetf NAME FUNC): define a `setf' method. | |
1411 This macro is an easy-to-use substitute for `define-setf-method' that works | |
1412 well for simple place forms. In the simple `defsetf' form, `setf's of | |
1413 the form (setf (NAME ARGS...) VAL) are transformed to function or macro | |
1414 calls of the form (FUNC ARGS... VAL). Example: (defsetf aref aset). | |
1415 Alternate form: (defsetf NAME ARGLIST (STORE) BODY...). | |
1416 Here, the above `setf' call is expanded by binding the argument forms ARGS | |
1417 according to ARGLIST, binding the value form VAL to STORE, then executing | |
1418 BODY, which must return a Lisp form that does the necessary `setf' operation. | |
1419 Actually, ARGLIST and STORE may be bound to temporary variables which are | |
1420 introduced automatically to preserve proper execution order of the arguments. | |
1421 Example: (defsetf nth (n x) (v) (list 'setcar (list 'nthcdr n x) v))." nil 'macro) | |
1422 | |
1423 (autoload 'get-setf-method "cl-macs" "\ | |
1424 Return a list of five values describing the setf-method for PLACE. | |
1425 PLACE may be any Lisp form which can appear as the PLACE argument to | |
1426 a macro like `setf' or `incf'." nil nil) | |
1427 | |
1428 (autoload 'setf "cl-macs" "\ | |
1429 (setf PLACE VAL PLACE VAL ...): set each PLACE to the value of its VAL. | |
1430 This is a generalized version of `setq'; the PLACEs may be symbolic | |
1431 references such as (car x) or (aref x i), as well as plain symbols. | |
1432 For example, (setf (cadar x) y) is equivalent to (setcar (cdar x) y). | |
1433 The return value is the last VAL in the list." nil 'macro) | |
1434 | |
1435 (autoload 'psetf "cl-macs" "\ | |
1436 (psetf PLACE VAL PLACE VAL ...): set PLACEs to the values VALs in parallel. | |
1437 This is like `setf', except that all VAL forms are evaluated (in order) | |
1438 before assigning any PLACEs to the corresponding values." nil 'macro) | |
1439 | |
1440 (autoload 'cl-do-pop "cl-macs" nil nil nil) | |
1441 | |
1442 (autoload 'remf "cl-macs" "\ | |
1443 (remf PLACE TAG): remove TAG from property list PLACE. | |
1444 PLACE may be a symbol, or any generalized variable allowed by `setf'. | |
1445 The form returns true if TAG was found and removed, nil otherwise." nil 'macro) | |
1446 | |
1447 (autoload 'shiftf "cl-macs" "\ | |
1448 (shiftf PLACE PLACE... VAL): shift left among PLACEs. | |
1449 Example: (shiftf A B C) sets A to B, B to C, and returns the old A. | |
1450 Each PLACE may be a symbol, or any generalized variable allowed by `setf'." nil 'macro) | |
1451 | |
1452 (autoload 'rotatef "cl-macs" "\ | |
1453 (rotatef PLACE...): rotate left among PLACEs. | |
1454 Example: (rotatef A B C) sets A to B, B to C, and C to A. It returns nil. | |
1455 Each PLACE may be a symbol, or any generalized variable allowed by `setf'." nil 'macro) | |
1456 | |
1457 (autoload 'letf "cl-macs" "\ | |
1458 (letf ((PLACE VALUE) ...) BODY...): temporarily bind to PLACEs. | |
1459 This is the analogue of `let', but with generalized variables (in the | |
1460 sense of `setf') for the PLACEs. Each PLACE is set to the corresponding | |
1461 VALUE, then the BODY forms are executed. On exit, either normally or | |
1462 because of a `throw' or error, the PLACEs are set back to their original | |
1463 values. Note that this macro is *not* available in Common Lisp. | |
1464 As a special case, if `(PLACE)' is used instead of `(PLACE VALUE)', | |
1465 the PLACE is not modified before executing BODY." nil 'macro) | |
1466 | |
1467 (autoload 'letf* "cl-macs" "\ | |
1468 (letf* ((PLACE VALUE) ...) BODY...): temporarily bind to PLACEs. | |
1469 This is the analogue of `let*', but with generalized variables (in the | |
1470 sense of `setf') for the PLACEs. Each PLACE is set to the corresponding | |
1471 VALUE, then the BODY forms are executed. On exit, either normally or | |
1472 because of a `throw' or error, the PLACEs are set back to their original | |
1473 values. Note that this macro is *not* available in Common Lisp. | |
1474 As a special case, if `(PLACE)' is used instead of `(PLACE VALUE)', | |
1475 the PLACE is not modified before executing BODY." nil 'macro) | |
1476 | |
1477 (autoload 'callf "cl-macs" "\ | |
1478 (callf FUNC PLACE ARGS...): set PLACE to (FUNC PLACE ARGS...). | |
1479 FUNC should be an unquoted function name. PLACE may be a symbol, | |
1480 or any generalized variable allowed by `setf'." nil 'macro) | |
1481 | |
1482 (autoload 'callf2 "cl-macs" "\ | |
1483 (callf2 FUNC ARG1 PLACE ARGS...): set PLACE to (FUNC ARG1 PLACE ARGS...). | |
1484 Like `callf', but PLACE is the second argument of FUNC, not the first." nil 'macro) | |
1485 | |
1486 (autoload 'define-modify-macro "cl-macs" "\ | |
1487 (define-modify-macro NAME ARGLIST FUNC): define a `setf'-like modify macro. | |
1488 If NAME is called, it combines its PLACE argument with the other arguments | |
1489 from ARGLIST using FUNC: (define-modify-macro incf (&optional (n 1)) +)" nil 'macro) | |
1490 | |
1491 (autoload 'defstruct "cl-macs" "\ | |
1492 (defstruct (NAME OPTIONS...) (SLOT SLOT-OPTS...)...): define a struct type. | |
1493 This macro defines a new Lisp data type called NAME, which contains data | |
1494 stored in SLOTs. This defines a `make-NAME' constructor, a `copy-NAME' | |
1495 copier, a `NAME-p' predicate, and setf-able `NAME-SLOT' accessors." nil 'macro) | |
1496 | |
1497 (autoload 'cl-struct-setf-expander "cl-macs" nil nil nil) | |
1498 | |
1499 (autoload 'deftype "cl-macs" "\ | |
1500 (deftype NAME ARGLIST BODY...): define NAME as a new data type. | |
1501 The type name can then be used in `typecase', `check-type', etc." nil 'macro) | |
1502 | |
1503 (autoload 'typep "cl-macs" "\ | |
1504 Check that OBJECT is of type TYPE. | |
1505 TYPE is a Common Lisp-style type specifier." nil nil) | |
1506 | |
1507 (autoload 'check-type "cl-macs" "\ | |
1508 Verify that FORM is of type TYPE; signal an error if not. | |
1509 STRING is an optional description of the desired type." nil 'macro) | |
1510 | |
1511 (autoload 'assert "cl-macs" "\ | |
1512 Verify that FORM returns non-nil; signal an error if not. | |
1513 Second arg SHOW-ARGS means to include arguments of FORM in message. | |
1514 Other args STRING and ARGS... are arguments to be passed to `error'. | |
1515 They are not evaluated unless the assertion fails. If STRING is | |
1516 omitted, a default message listing FORM itself is used." nil 'macro) | |
1517 | |
1518 (autoload 'ignore-errors "cl-macs" "\ | |
1519 Execute FORMS; if an error occurs, return nil. | |
1520 Otherwise, return result of last FORM." nil 'macro) | |
1521 | |
1522 (autoload 'ignore-file-errors "cl-macs" "\ | |
1523 Execute FORMS; if an error of type `file-error' occurs, return nil. | |
1524 Otherwise, return result of last FORM." nil 'macro) | |
1525 | |
1526 (autoload 'define-compiler-macro "cl-macs" "\ | |
1527 (define-compiler-macro FUNC ARGLIST BODY...): Define a compiler-only macro. | |
1528 This is like `defmacro', but macro expansion occurs only if the call to | |
1529 FUNC is compiled (i.e., not interpreted). Compiler macros should be used | |
1530 for optimizing the way calls to FUNC are compiled; the form returned by | |
1531 BODY should do the same thing as a call to the normal function called | |
1532 FUNC, though possibly more efficiently. Note that, like regular macros, | |
1533 compiler macros are expanded repeatedly until no further expansions are | |
1534 possible. Unlike regular macros, BODY can decide to \"punt\" and leave the | |
1535 original function call alone by declaring an initial `&whole foo' parameter | |
1536 and then returning foo." nil 'macro) | |
1537 | |
1538 (autoload 'compiler-macroexpand "cl-macs" nil nil nil) | |
1539 | |
1540 ;;;*** | |
1541 | |
1542 ;;;### (autoloads (batch-remove-old-elc) "cleantree" "lisp\\cleantree.el") | |
1543 | |
1544 (autoload 'batch-remove-old-elc "cleantree" nil nil nil) | |
1545 | |
1546 ;;;*** | |
1547 | |
1548 ;;;### (autoloads (config-value config-value-hash-table) "config" "lisp\\config.el") | |
1549 | |
1550 (autoload 'config-value-hash-table "config" "\ | |
1551 Return hash table of configuration parameters and their values." nil nil) | |
1552 | |
1553 (autoload 'config-value "config" "\ | |
1554 Return the value of the configuration parameter CONFIG_SYMBOL." nil nil) | |
1555 | |
1556 ;;;*** | |
1557 | |
1558 ;;;### (autoloads (Custom-make-dependencies) "cus-dep" "lisp\\cus-dep.el") | |
1559 | |
1560 (autoload 'Custom-make-dependencies "cus-dep" "\ | |
1561 Extract custom dependencies from .el files in SUBDIRS. | |
1562 SUBDIRS is a list of directories. If it is nil, the command-line | |
1563 arguments are used. If it is a string, only that directory is | |
1564 processed. This function is especially useful in batch mode. | |
1565 | |
1566 Batch usage: xemacs -batch -l cus-dep.el -f Custom-make-dependencies DIRS" t nil) | |
1567 | |
1568 ;;;*** | |
1569 | |
1570 ;;;### (autoloads (customize-menu-create custom-menu-create custom-save-all customize-save-customized customize-browse custom-buffer-create-other-window custom-buffer-create customize-apropos-groups customize-apropos-faces customize-apropos-options customize-apropos customize-saved customize-customized customize-face-other-window customize-face customize-option-other-window customize-changed-options customize-variable customize-other-window customize customize-save-variable customize-set-variable customize-set-value) "cus-edit" "lisp\\cus-edit.el") | |
1571 | |
1572 (autoload 'customize-set-value "cus-edit" "\ | |
1573 Set VARIABLE to VALUE. VALUE is a Lisp object. | |
1574 | |
1575 If VARIABLE has a `variable-interactive' property, that is used as if | |
1576 it were the arg to `interactive' (which see) to interactively read the value. | |
1577 | |
1578 If VARIABLE has a `custom-type' property, it must be a widget and the | |
1579 `:prompt-value' property of that widget will be used for reading the value. | |
1580 | |
1581 If given a prefix (or a COMMENT argument), also prompt for a comment." t nil) | |
1582 | |
1583 (autoload 'customize-set-variable "cus-edit" "\ | |
1584 Set the default for VARIABLE to VALUE. VALUE is a Lisp object. | |
1585 | |
1586 If VARIABLE has a `custom-set' property, that is used for setting | |
1587 VARIABLE, otherwise `set-default' is used. | |
1588 | |
1589 The `customized-value' property of the VARIABLE will be set to a list | |
1590 with a quoted VALUE as its sole list member. | |
1591 | |
1592 If VARIABLE has a `variable-interactive' property, that is used as if | |
1593 it were the arg to `interactive' (which see) to interactively read the value. | |
1594 | |
1595 If VARIABLE has a `custom-type' property, it must be a widget and the | |
1596 `:prompt-value' property of that widget will be used for reading the value. | |
1597 | |
1598 If given a prefix (or a COMMENT argument), also prompt for a comment." t nil) | |
1599 | |
1600 (autoload 'customize-save-variable "cus-edit" "\ | |
1601 Set the default for VARIABLE to VALUE, and save it for future sessions. | |
1602 If VARIABLE has a `custom-set' property, that is used for setting | |
1603 VARIABLE, otherwise `set-default' is used. | |
1604 | |
1605 The `customized-value' property of the VARIABLE will be set to a list | |
1606 with a quoted VALUE as its sole list member. | |
1607 | |
1608 If VARIABLE has a `variable-interactive' property, that is used as if | |
1609 it were the arg to `interactive' (which see) to interactively read the value. | |
1610 | |
1611 If VARIABLE has a `custom-type' property, it must be a widget and the | |
1612 `:prompt-value' property of that widget will be used for reading the value. | |
1613 | |
1614 If given a prefix (or a COMMENT argument), also prompt for a comment." t nil) | |
1615 | |
1616 (autoload 'customize "cus-edit" "\ | |
1617 Select a customization buffer which you can use to set user options. | |
1618 User options are structured into \"groups\". | |
1619 The default group is `Emacs'." t nil) | |
1620 | |
1621 (defalias 'customize-group 'customize) | |
1622 | |
1623 (autoload 'customize-other-window "cus-edit" "\ | |
1624 Customize SYMBOL, which must be a customization group." t nil) | |
1625 | |
1626 (defalias 'customize-group-other-window 'customize-other-window) | |
1627 | |
1628 (defalias 'customize-option 'customize-variable) | |
1629 | |
1630 (autoload 'customize-variable "cus-edit" "\ | |
1631 Customize SYMBOL, which must be a user option variable." t nil) | |
1632 | |
1633 (autoload 'customize-changed-options "cus-edit" "\ | |
1634 Customize all user option variables whose default values changed recently. | |
1635 This means, in other words, variables defined with a `:version' keyword." t nil) | |
1636 | |
1637 (defalias 'customize-variable-other-window 'customize-option-other-window) | |
1638 | |
1639 (autoload 'customize-option-other-window "cus-edit" "\ | |
1640 Customize SYMBOL, which must be a user option variable. | |
1641 Show the buffer in another window, but don't select it." t nil) | |
1642 | |
1643 (autoload 'customize-face "cus-edit" "\ | |
1644 Customize SYMBOL, which should be a face name or nil. | |
1645 If SYMBOL is nil, customize all faces." t nil) | |
1646 | |
1647 (autoload 'customize-face-other-window "cus-edit" "\ | |
1648 Show customization buffer for FACE in other window." t nil) | |
1649 | |
1650 (autoload 'customize-customized "cus-edit" "\ | |
1651 Customize all user options set since the last save in this session." t nil) | |
1652 | |
1653 (autoload 'customize-saved "cus-edit" "\ | |
1654 Customize all already saved user options." t nil) | |
1655 | |
1656 (autoload 'customize-apropos "cus-edit" "\ | |
1657 Customize all user options matching REGEXP. | |
1658 If ALL is `options', include only options. | |
1659 If ALL is `faces', include only faces. | |
1660 If ALL is `groups', include only groups. | |
1661 If ALL is t (interactively, with prefix arg), include options which are not | |
1662 user-settable, as well as faces and groups." t nil) | |
1663 | |
1664 (autoload 'customize-apropos-options "cus-edit" "\ | |
1665 Customize all user options matching REGEXP. | |
1666 With prefix arg, include options which are not user-settable." t nil) | |
1667 | |
1668 (autoload 'customize-apropos-faces "cus-edit" "\ | |
1669 Customize all user faces matching REGEXP." t nil) | |
1670 | |
1671 (autoload 'customize-apropos-groups "cus-edit" "\ | |
1672 Customize all user groups matching REGEXP." t nil) | |
1673 | |
1674 (autoload 'custom-buffer-create "cus-edit" "\ | |
1675 Create a buffer containing OPTIONS. | |
1676 Optional NAME is the name of the buffer. | |
1677 OPTIONS should be an alist of the form ((SYMBOL WIDGET)...), where | |
1678 SYMBOL is a customization option, and WIDGET is a widget for editing | |
1679 that option." nil nil) | |
1680 | |
1681 (autoload 'custom-buffer-create-other-window "cus-edit" "\ | |
1682 Create a buffer containing OPTIONS. | |
1683 Optional NAME is the name of the buffer. | |
1684 OPTIONS should be an alist of the form ((SYMBOL WIDGET)...), where | |
1685 SYMBOL is a customization option, and WIDGET is a widget for editing | |
1686 that option." nil nil) | |
1687 | |
1688 (autoload 'customize-browse "cus-edit" "\ | |
1689 Create a tree browser for the customize hierarchy." t nil) | |
1690 | |
1691 (defcustom custom-file "~/.emacs" "File used for storing customization information.\nIf you change this from the default \"~/.emacs\" you need to\nexplicitly load that file for the settings to take effect." :type 'file :group 'customize) | |
1692 | |
1693 (autoload 'customize-save-customized "cus-edit" "\ | |
1694 Save all user options which have been set in this session." t nil) | |
1695 | |
1696 (autoload 'custom-save-all "cus-edit" "\ | |
1697 Save all customizations in `custom-file'." nil nil) | |
1698 | |
1699 (autoload 'custom-menu-create "cus-edit" "\ | |
1700 Create menu for customization group SYMBOL. | |
1701 The menu is in a format applicable to `easy-menu-define'." nil nil) | |
1702 | |
1703 (autoload 'customize-menu-create "cus-edit" "\ | |
1704 Return a customize menu for customization group SYMBOL. | |
1705 If optional NAME is given, use that as the name of the menu. | |
1706 Otherwise the menu will be named `Customize'. | |
1707 The format is suitable for use with `easy-menu-define'." nil nil) | |
1708 | |
1709 ;;;*** | |
1710 | |
1711 ;;;### (autoloads (custom-reset-faces custom-theme-reset-faces custom-theme-face-value custom-theme-set-faces custom-set-faces custom-set-face-update-spec custom-declare-face) "cus-face" "lisp\\cus-face.el") | |
1712 | |
1713 (autoload 'custom-declare-face "cus-face" "\ | |
1714 Like `defface', but FACE is evaluated as a normal argument." nil nil) | |
1715 | |
1716 (autoload 'custom-set-face-update-spec "cus-face" "\ | |
1717 Customize the FACE for display types matching DISPLAY, merging | |
1718 in the new items from PLIST" nil nil) | |
1719 | |
1720 (autoload 'custom-set-faces "cus-face" "\ | |
1721 Initialize faces according to user preferences. | |
1722 This asociates the setting with the USER theme. | |
1723 The arguments should be a list where each entry has the form: | |
1724 | |
1725 (FACE SPEC [NOW [COMMENT]]) | |
1726 | |
1727 SPEC will be stored as the saved value for FACE. If NOW is present | |
1728 and non-nil, FACE will also be created according to SPEC. | |
1729 COMMENT is a string comment about FACE. | |
1730 | |
1731 See `defface' for the format of SPEC." nil nil) | |
1732 | |
1733 (autoload 'custom-theme-set-faces "cus-face" "\ | |
1734 Initialize faces according to settings specified by args. | |
1735 Records the settings as belonging to THEME. | |
1736 | |
1737 See `custom-set-faces' for a description of the arguments ARGS." nil nil) | |
1738 | |
1739 (autoload 'custom-theme-face-value "cus-face" "\ | |
1740 Return spec of FACE in THEME if the THEME modifies the | |
1741 FACE. Nil otherwise." nil nil) | |
1742 | |
1743 (autoload 'custom-theme-reset-faces "cus-face" nil nil nil) | |
1744 | |
1745 (autoload 'custom-reset-faces "cus-face" "\ | |
1746 Reset the value of the face to values previously defined. | |
1747 Assosiate this setting with the 'user' theme. | |
1748 | |
1749 ARGS is defined as for `custom-theme-reset-faces'" nil nil) | |
1750 | |
1751 ;;;*** | |
1752 | |
1753 ;;;### (autoloads (disassemble) "disass" "lisp\\disass.el") | |
1754 | |
1755 (autoload 'disassemble "disass" "\ | |
1756 Print disassembled code for OBJECT in (optional) BUFFER. | |
1757 OBJECT can be a symbol defined as a function, or a function itself | |
1758 \(a lambda expression or a compiled-function object). | |
1759 If OBJECT is not already compiled, we compile it, but do not | |
1760 redefine OBJECT if it is a symbol." t nil) | |
1761 | |
1762 ;;;*** | |
1763 | |
1764 ;;;### (autoloads (standard-display-european standard-display-underline standard-display-graphic standard-display-g1 standard-display-ascii standard-display-default standard-display-8bit make-display-table describe-current-display-table) "disp-table" "lisp\\disp-table.el") | |
1765 | |
1766 (autoload 'describe-current-display-table "disp-table" "\ | |
1767 Describe the display table in use in the selected window and buffer." t nil) | |
1768 | |
1769 (autoload 'make-display-table "disp-table" "\ | |
1770 Return a new, empty display table." nil nil) | |
1771 | |
1772 (autoload 'standard-display-8bit "disp-table" "\ | |
1773 Display characters in the range L to H literally." nil nil) | |
1774 | |
1775 (autoload 'standard-display-default "disp-table" "\ | |
1776 Display characters in the range L to H using the default notation." nil nil) | |
1777 | |
1778 (autoload 'standard-display-ascii "disp-table" "\ | |
1779 Display character C using printable string S." nil nil) | |
1780 | |
1781 (autoload 'standard-display-g1 "disp-table" "\ | |
1782 Display character C as character SC in the g1 character set. | |
1783 This function assumes that your terminal uses the SO/SI characters; | |
1784 it is meaningless for an X frame." nil nil) | |
1785 | |
1786 (autoload 'standard-display-graphic "disp-table" "\ | |
1787 Display character C as character GC in graphics character set. | |
1788 This function assumes VT100-compatible escapes; it is meaningless for an | |
1789 X frame." nil nil) | |
1790 | |
1791 (autoload 'standard-display-underline "disp-table" "\ | |
1792 Display character C as character UC plus underlining." nil nil) | |
1793 | |
1794 (autoload 'standard-display-european "disp-table" "\ | |
1795 Toggle display of European characters encoded with ISO 8859. | |
1796 When enabled, characters in the range of 160 to 255 display not | |
1797 as octal escapes, but as accented characters. | |
1798 With prefix argument, enable European character display iff arg is positive." t nil) | |
1799 | |
1800 ;;;*** | |
1801 | |
1802 ;;;### (autoloads nil "easymenu" "lisp\\easymenu.el") | |
1803 | |
1804 ;;;*** | |
1805 | |
1806 ;;;### (autoloads (font-menu-weight-constructor font-menu-size-constructor font-menu-family-constructor reset-device-font-menus) "font-menu" "lisp\\font-menu.el") | |
1807 | |
1808 (defcustom font-menu-ignore-scaled-fonts nil "*If non-nil, then the font menu will try to show only bitmap fonts." :type 'boolean :group 'font-menu) | |
1809 | |
1810 (defcustom font-menu-this-frame-only-p nil "*If non-nil, then changing the default font from the font menu will only\naffect one frame instead of all frames." :type 'boolean :group 'font-menu) | |
1811 | |
1812 (fset 'install-font-menus 'reset-device-font-menus) | |
1813 | |
1814 (autoload 'reset-device-font-menus "font-menu" "\ | |
1815 Generates the `Font', `Size', and `Weight' submenus for the Options menu. | |
1816 This is run the first time that a font-menu is needed for each device. | |
1817 If you don't like the lazy invocation of this function, you can add it to | |
1818 `create-device-hook' and that will make the font menus respond more quickly | |
1819 when they are selected for the first time. If you add fonts to your system, | |
1820 or if you change your font path, you can call this to re-initialize the menus." nil nil) | |
1821 | |
1822 (autoload 'font-menu-family-constructor "font-menu" nil nil nil) | |
1823 | |
1824 (autoload 'font-menu-size-constructor "font-menu" nil nil nil) | |
1825 | |
1826 (autoload 'font-menu-weight-constructor "font-menu" nil nil nil) | |
1827 | |
1828 ;;;*** | |
1829 | |
1830 ;;;### (autoloads (x-font-build-cache font-default-size-for-device font-default-encoding-for-device font-default-registry-for-device font-default-family-for-device font-default-object-for-device font-default-font-for-device font-create-object) "font" "lisp\\font.el") | |
1831 | |
1832 (autoload 'font-create-object "font" nil nil nil) | |
1833 | |
1834 (autoload 'font-default-font-for-device "font" nil nil nil) | |
1835 | |
1836 (autoload 'font-default-object-for-device "font" nil nil nil) | |
1837 | |
1838 (autoload 'font-default-family-for-device "font" nil nil nil) | |
1839 | |
1840 (autoload 'font-default-registry-for-device "font" nil nil nil) | |
1841 | |
1842 (autoload 'font-default-encoding-for-device "font" nil nil nil) | |
1843 | |
1844 (autoload 'font-default-size-for-device "font" nil nil nil) | |
1845 | |
1846 (autoload 'x-font-build-cache "font" nil nil nil) | |
1847 | |
1848 ;;;*** | |
1849 | 1910 |
1850 (provide 'lisp-autoloads) | 1911 (provide 'lisp-autoloads) |