Commit | Line | Data |
---|---|---|
d1b8746d SM |
1 | ;;; cl-loaddefs.el --- automatically extracted autoloads |
2 | ;; | |
3 | ;;; Code: | |
4 | ||
5 | \f | |
bb3faf5b | 6 | ;;;### (autoloads (cl-prettyexpand cl-remprop cl--do-remf cl--set-getf |
6fa6c4ae SM |
7 | ;;;;;; cl-getf cl-get cl-tailp cl-list-length cl-nreconc cl-revappend |
8 | ;;;;;; cl-concatenate cl-subseq cl-float-limits cl-random-state-p | |
9 | ;;;;;; cl-make-random-state cl-random cl-signum cl-rem cl-mod cl-round | |
222fbb8b GM |
10 | ;;;;;; cl-truncate cl-ceiling cl-floor cl-isqrt cl-lcm cl-gcd cl--set-frame-visible-p |
11 | ;;;;;; cl--map-overlays cl--map-intervals cl--map-keymap-recursively | |
12 | ;;;;;; cl-notevery cl-notany cl-every cl-some cl-mapcon cl-mapcan | |
13 | ;;;;;; cl-mapl cl-maplist cl-map cl--mapcar-many cl-equalp cl-coerce) | |
e7c1b6ef | 14 | ;;;;;; "cl-extra" "cl-extra.el" "1572ae52fa4fbd9c4bf89b49a068a865") |
d1b8746d SM |
15 | ;;; Generated autoloads from cl-extra.el |
16 | ||
093c0257 | 17 | (autoload 'cl-coerce "cl-extra" "\ |
d1b8746d SM |
18 | Coerce OBJECT to type TYPE. |
19 | TYPE is a Common Lisp type specifier. | |
20 | ||
21 | \(fn OBJECT TYPE)" nil nil) | |
22 | ||
093c0257 | 23 | (autoload 'cl-equalp "cl-extra" "\ |
d1b8746d SM |
24 | Return t if two Lisp objects have similar structures and contents. |
25 | This is like `equal', except that it accepts numerically equal | |
26 | numbers of different types (float vs. integer), and also compares | |
27 | strings case-insensitively. | |
28 | ||
29 | \(fn X Y)" nil nil) | |
30 | ||
bb3faf5b | 31 | (autoload 'cl--mapcar-many "cl-extra" "\ |
01db225d | 32 | |
d1b8746d SM |
33 | |
34 | \(fn CL-FUNC CL-SEQS)" nil nil) | |
35 | ||
093c0257 | 36 | (autoload 'cl-map "cl-extra" "\ |
d1b8746d SM |
37 | Map a FUNCTION across one or more SEQUENCEs, returning a sequence. |
38 | TYPE is the sequence type to return. | |
39 | ||
40 | \(fn TYPE FUNCTION SEQUENCE...)" nil nil) | |
41 | ||
093c0257 | 42 | (autoload 'cl-maplist "cl-extra" "\ |
d1b8746d SM |
43 | Map FUNCTION to each sublist of LIST or LISTs. |
44 | Like `mapcar', except applies to lists and their cdr's rather than to | |
45 | the elements themselves. | |
46 | ||
47 | \(fn FUNCTION LIST...)" nil nil) | |
48 | ||
093c0257 SM |
49 | (autoload 'cl-mapl "cl-extra" "\ |
50 | Like `cl-maplist', but does not accumulate values returned by the function. | |
d1b8746d SM |
51 | |
52 | \(fn FUNCTION LIST...)" nil nil) | |
53 | ||
093c0257 | 54 | (autoload 'cl-mapcan "cl-extra" "\ |
d1b8746d SM |
55 | Like `mapcar', but nconc's together the values returned by the function. |
56 | ||
57 | \(fn FUNCTION SEQUENCE...)" nil nil) | |
58 | ||
093c0257 SM |
59 | (autoload 'cl-mapcon "cl-extra" "\ |
60 | Like `cl-maplist', but nconc's together the values returned by the function. | |
d1b8746d SM |
61 | |
62 | \(fn FUNCTION LIST...)" nil nil) | |
63 | ||
093c0257 | 64 | (autoload 'cl-some "cl-extra" "\ |
d1b8746d SM |
65 | Return true if PREDICATE is true of any element of SEQ or SEQs. |
66 | If so, return the true (non-nil) value returned by PREDICATE. | |
67 | ||
68 | \(fn PREDICATE SEQ...)" nil nil) | |
69 | ||
093c0257 | 70 | (autoload 'cl-every "cl-extra" "\ |
d1b8746d SM |
71 | Return true if PREDICATE is true of every element of SEQ or SEQs. |
72 | ||
73 | \(fn PREDICATE SEQ...)" nil nil) | |
74 | ||
093c0257 | 75 | (autoload 'cl-notany "cl-extra" "\ |
d1b8746d SM |
76 | Return true if PREDICATE is false of every element of SEQ or SEQs. |
77 | ||
78 | \(fn PREDICATE SEQ...)" nil nil) | |
79 | ||
093c0257 | 80 | (autoload 'cl-notevery "cl-extra" "\ |
d1b8746d SM |
81 | Return true if PREDICATE is false of some element of SEQ or SEQs. |
82 | ||
83 | \(fn PREDICATE SEQ...)" nil nil) | |
84 | ||
bb3faf5b | 85 | (autoload 'cl--map-keymap-recursively "cl-extra" "\ |
01db225d | 86 | |
d1b8746d SM |
87 | |
88 | \(fn CL-FUNC-REC CL-MAP &optional CL-BASE)" nil nil) | |
89 | ||
bb3faf5b | 90 | (autoload 'cl--map-intervals "cl-extra" "\ |
01db225d | 91 | |
d1b8746d SM |
92 | |
93 | \(fn CL-FUNC &optional CL-WHAT CL-PROP CL-START CL-END)" nil nil) | |
94 | ||
bb3faf5b | 95 | (autoload 'cl--map-overlays "cl-extra" "\ |
01db225d | 96 | |
d1b8746d SM |
97 | |
98 | \(fn CL-FUNC &optional CL-BUFFER CL-START CL-END CL-ARG)" nil nil) | |
99 | ||
bb3faf5b | 100 | (autoload 'cl--set-frame-visible-p "cl-extra" "\ |
01db225d | 101 | |
d1b8746d SM |
102 | |
103 | \(fn FRAME VAL)" nil nil) | |
104 | ||
093c0257 | 105 | (autoload 'cl-gcd "cl-extra" "\ |
d1b8746d SM |
106 | Return the greatest common divisor of the arguments. |
107 | ||
108 | \(fn &rest ARGS)" nil nil) | |
109 | ||
093c0257 | 110 | (autoload 'cl-lcm "cl-extra" "\ |
d1b8746d SM |
111 | Return the least common multiple of the arguments. |
112 | ||
113 | \(fn &rest ARGS)" nil nil) | |
114 | ||
093c0257 | 115 | (autoload 'cl-isqrt "cl-extra" "\ |
d1b8746d SM |
116 | Return the integer square root of the argument. |
117 | ||
118 | \(fn X)" nil nil) | |
119 | ||
093c0257 | 120 | (autoload 'cl-floor "cl-extra" "\ |
d1b8746d SM |
121 | Return a list of the floor of X and the fractional part of X. |
122 | With two arguments, return floor and remainder of their quotient. | |
123 | ||
124 | \(fn X &optional Y)" nil nil) | |
125 | ||
093c0257 | 126 | (autoload 'cl-ceiling "cl-extra" "\ |
d1b8746d SM |
127 | Return a list of the ceiling of X and the fractional part of X. |
128 | With two arguments, return ceiling and remainder of their quotient. | |
129 | ||
130 | \(fn X &optional Y)" nil nil) | |
131 | ||
093c0257 | 132 | (autoload 'cl-truncate "cl-extra" "\ |
d1b8746d SM |
133 | Return a list of the integer part of X and the fractional part of X. |
134 | With two arguments, return truncation and remainder of their quotient. | |
135 | ||
136 | \(fn X &optional Y)" nil nil) | |
137 | ||
093c0257 | 138 | (autoload 'cl-round "cl-extra" "\ |
d1b8746d SM |
139 | Return a list of X rounded to the nearest integer and the remainder. |
140 | With two arguments, return rounding and remainder of their quotient. | |
141 | ||
142 | \(fn X &optional Y)" nil nil) | |
143 | ||
093c0257 | 144 | (autoload 'cl-mod "cl-extra" "\ |
d1b8746d SM |
145 | The remainder of X divided by Y, with the same sign as Y. |
146 | ||
147 | \(fn X Y)" nil nil) | |
148 | ||
093c0257 | 149 | (autoload 'cl-rem "cl-extra" "\ |
d1b8746d SM |
150 | The remainder of X divided by Y, with the same sign as X. |
151 | ||
152 | \(fn X Y)" nil nil) | |
153 | ||
093c0257 | 154 | (autoload 'cl-signum "cl-extra" "\ |
d1b8746d SM |
155 | Return 1 if X is positive, -1 if negative, 0 if zero. |
156 | ||
157 | \(fn X)" nil nil) | |
158 | ||
093c0257 | 159 | (autoload 'cl-random "cl-extra" "\ |
d1b8746d SM |
160 | Return a random nonnegative number less than LIM, an integer or float. |
161 | Optional second arg STATE is a random-state object. | |
162 | ||
163 | \(fn LIM &optional STATE)" nil nil) | |
164 | ||
093c0257 | 165 | (autoload 'cl-make-random-state "cl-extra" "\ |
4735906a | 166 | Return a copy of random-state STATE, or of the internal state if omitted. |
d1b8746d SM |
167 | If STATE is t, return a new state object seeded from the time of day. |
168 | ||
169 | \(fn &optional STATE)" nil nil) | |
170 | ||
093c0257 | 171 | (autoload 'cl-random-state-p "cl-extra" "\ |
d1b8746d SM |
172 | Return t if OBJECT is a random-state object. |
173 | ||
174 | \(fn OBJECT)" nil nil) | |
175 | ||
5c4133cb | 176 | (autoload 'cl-float-limits "cl-extra" "\ |
01db225d | 177 | Initialize the Common Lisp floating-point parameters. |
093c0257 SM |
178 | This sets the values of: `cl-most-positive-float', `cl-most-negative-float', |
179 | `cl-least-positive-float', `cl-least-negative-float', `cl-float-epsilon', | |
180 | `cl-float-negative-epsilon', `cl-least-positive-normalized-float', and | |
181 | `cl-least-negative-normalized-float'. | |
d1b8746d SM |
182 | |
183 | \(fn)" nil nil) | |
184 | ||
093c0257 | 185 | (autoload 'cl-subseq "cl-extra" "\ |
d1b8746d SM |
186 | Return the subsequence of SEQ from START to END. |
187 | If END is omitted, it defaults to the length of the sequence. | |
188 | If START or END is negative, it counts from the end. | |
189 | ||
190 | \(fn SEQ START &optional END)" nil nil) | |
191 | ||
093c0257 | 192 | (autoload 'cl-concatenate "cl-extra" "\ |
d1b8746d SM |
193 | Concatenate, into a sequence of type TYPE, the argument SEQUENCEs. |
194 | ||
195 | \(fn TYPE SEQUENCE...)" nil nil) | |
196 | ||
093c0257 | 197 | (autoload 'cl-revappend "cl-extra" "\ |
d1b8746d SM |
198 | Equivalent to (append (reverse X) Y). |
199 | ||
200 | \(fn X Y)" nil nil) | |
201 | ||
093c0257 | 202 | (autoload 'cl-nreconc "cl-extra" "\ |
d1b8746d SM |
203 | Equivalent to (nconc (nreverse X) Y). |
204 | ||
205 | \(fn X Y)" nil nil) | |
206 | ||
093c0257 | 207 | (autoload 'cl-list-length "cl-extra" "\ |
d1b8746d SM |
208 | Return the length of list X. Return nil if list is circular. |
209 | ||
210 | \(fn X)" nil nil) | |
211 | ||
093c0257 | 212 | (autoload 'cl-tailp "cl-extra" "\ |
d1b8746d SM |
213 | Return true if SUBLIST is a tail of LIST. |
214 | ||
215 | \(fn SUBLIST LIST)" nil nil) | |
216 | ||
093c0257 | 217 | (autoload 'cl-get "cl-extra" "\ |
d1b8746d SM |
218 | Return the value of SYMBOL's PROPNAME property, or DEFAULT if none. |
219 | ||
220 | \(fn SYMBOL PROPNAME &optional DEFAULT)" nil nil) | |
221 | ||
d9857e53 SM |
222 | (put 'cl-get 'compiler-macro #'cl--compiler-macro-get) |
223 | ||
093c0257 | 224 | (autoload 'cl-getf "cl-extra" "\ |
d1b8746d SM |
225 | Search PROPLIST for property PROPNAME; return its value or DEFAULT. |
226 | PROPLIST is a list of the sort returned by `symbol-plist'. | |
227 | ||
228 | \(fn PROPLIST PROPNAME &optional DEFAULT)" nil nil) | |
229 | ||
bb3faf5b | 230 | (autoload 'cl--set-getf "cl-extra" "\ |
01db225d | 231 | |
d1b8746d SM |
232 | |
233 | \(fn PLIST TAG VAL)" nil nil) | |
234 | ||
bb3faf5b | 235 | (autoload 'cl--do-remf "cl-extra" "\ |
01db225d | 236 | |
d1b8746d SM |
237 | |
238 | \(fn PLIST TAG)" nil nil) | |
239 | ||
5c4133cb | 240 | (autoload 'cl-remprop "cl-extra" "\ |
d1b8746d SM |
241 | Remove from SYMBOL's plist the property PROPNAME and its value. |
242 | ||
243 | \(fn SYMBOL PROPNAME)" nil nil) | |
244 | ||
5c4133cb | 245 | (autoload 'cl-prettyexpand "cl-extra" "\ |
01db225d | 246 | |
d1b8746d SM |
247 | |
248 | \(fn FORM &optional FULL)" nil nil) | |
249 | ||
250 | ;;;*** | |
251 | \f | |
972debf2 | 252 | ;;;### (autoloads (cl--compiler-macro-adjoin cl-defsubst cl-compiler-macroexpand |
71adb94b | 253 | ;;;;;; cl-define-compiler-macro cl-assert cl-check-type cl-typep |
222fbb8b GM |
254 | ;;;;;; cl-deftype cl-defstruct cl-callf2 cl-callf cl-letf* cl-letf |
255 | ;;;;;; cl-rotatef cl-shiftf cl-remf cl-psetf cl-declare cl-the cl-locally | |
256 | ;;;;;; cl-multiple-value-setq cl-multiple-value-bind cl-symbol-macrolet | |
257 | ;;;;;; cl-macrolet cl-labels cl-flet* cl-flet cl-progv cl-psetq | |
258 | ;;;;;; cl-do-all-symbols cl-do-symbols cl-dotimes cl-dolist cl-do* | |
259 | ;;;;;; cl-do cl-loop cl-return-from cl-return cl-block cl-etypecase | |
260 | ;;;;;; cl-typecase cl-ecase cl-case cl-load-time-value cl-eval-when | |
261 | ;;;;;; cl-destructuring-bind cl-function cl-defmacro cl-defun cl-gentemp | |
972debf2 | 262 | ;;;;;; cl-gensym cl--compiler-macro-cXXr cl--compiler-macro-list*) |
94c66ce5 | 263 | ;;;;;; "cl-macs" "cl-macs.el" "885919e79dbcd11081cfb2e039b470c7") |
d1b8746d SM |
264 | ;;; Generated autoloads from cl-macs.el |
265 | ||
972debf2 SM |
266 | (autoload 'cl--compiler-macro-list* "cl-macs" "\ |
267 | ||
268 | ||
269 | \(fn FORM ARG &rest OTHERS)" nil nil) | |
270 | ||
271 | (autoload 'cl--compiler-macro-cXXr "cl-macs" "\ | |
272 | ||
273 | ||
274 | \(fn FORM X)" nil nil) | |
275 | ||
093c0257 | 276 | (autoload 'cl-gensym "cl-macs" "\ |
d1b8746d SM |
277 | Generate a new uninterned symbol. |
278 | The name is made by appending a number to PREFIX, default \"G\". | |
279 | ||
280 | \(fn &optional PREFIX)" nil nil) | |
281 | ||
093c0257 | 282 | (autoload 'cl-gentemp "cl-macs" "\ |
d1b8746d SM |
283 | Generate a new interned symbol with a unique name. |
284 | The name is made by appending a number to PREFIX, default \"G\". | |
285 | ||
286 | \(fn &optional PREFIX)" nil nil) | |
287 | ||
093c0257 | 288 | (autoload 'cl-defun "cl-macs" "\ |
d1b8746d SM |
289 | Define NAME as a function. |
290 | Like normal `defun', except ARGLIST allows full Common Lisp conventions, | |
093c0257 | 291 | and BODY is implicitly surrounded by (cl-block NAME ...). |
d1b8746d | 292 | |
03fef3e6 | 293 | \(fn NAME ARGLIST [DOCSTRING] BODY...)" nil t) |
b581bb5c | 294 | |
093c0257 | 295 | (put 'cl-defun 'doc-string-elt '3) |
b581bb5c | 296 | |
093c0257 | 297 | (put 'cl-defun 'lisp-indent-function '2) |
03fef3e6 | 298 | |
093c0257 | 299 | (autoload 'cl-defmacro "cl-macs" "\ |
d1b8746d SM |
300 | Define NAME as a macro. |
301 | Like normal `defmacro', except ARGLIST allows full Common Lisp conventions, | |
093c0257 | 302 | and BODY is implicitly surrounded by (cl-block NAME ...). |
d1b8746d | 303 | |
03fef3e6 | 304 | \(fn NAME ARGLIST [DOCSTRING] BODY...)" nil t) |
b581bb5c | 305 | |
093c0257 | 306 | (put 'cl-defmacro 'doc-string-elt '3) |
b581bb5c | 307 | |
093c0257 | 308 | (put 'cl-defmacro 'lisp-indent-function '2) |
03fef3e6 | 309 | |
093c0257 | 310 | (autoload 'cl-function "cl-macs" "\ |
d1b8746d SM |
311 | Introduce a function. |
312 | Like normal `function', except that if argument is a lambda form, | |
313 | its argument list allows full Common Lisp conventions. | |
314 | ||
03fef3e6 | 315 | \(fn FUNC)" nil t) |
d1b8746d | 316 | |
093c0257 | 317 | (autoload 'cl-destructuring-bind "cl-macs" "\ |
0d6459df | 318 | |
d1b8746d | 319 | |
03fef3e6 | 320 | \(fn ARGS EXPR &rest BODY)" nil t) |
d1b8746d | 321 | |
093c0257 | 322 | (put 'cl-destructuring-bind 'lisp-indent-function '2) |
b581bb5c | 323 | |
093c0257 | 324 | (autoload 'cl-eval-when "cl-macs" "\ |
d1b8746d SM |
325 | Control when BODY is evaluated. |
326 | If `compile' is in WHEN, BODY is evaluated when compiled at top-level. | |
327 | If `load' is in WHEN, BODY is evaluated when loaded after top-level compile. | |
328 | If `eval' is in WHEN, BODY is evaluated when interpreted or at non-top-level. | |
329 | ||
03fef3e6 | 330 | \(fn (WHEN...) BODY...)" nil t) |
d1b8746d | 331 | |
093c0257 | 332 | (put 'cl-eval-when 'lisp-indent-function '1) |
b581bb5c | 333 | |
093c0257 | 334 | (autoload 'cl-load-time-value "cl-macs" "\ |
d1b8746d SM |
335 | Like `progn', but evaluates the body at load time. |
336 | The result of the body appears to the compiler as a quoted constant. | |
337 | ||
03fef3e6 | 338 | \(fn FORM &optional READ-ONLY)" nil t) |
d1b8746d | 339 | |
093c0257 | 340 | (autoload 'cl-case "cl-macs" "\ |
d1b8746d SM |
341 | Eval EXPR and choose among clauses on that value. |
342 | Each clause looks like (KEYLIST BODY...). EXPR is evaluated and compared | |
343 | against each key in each KEYLIST; the corresponding BODY is evaluated. | |
093c0257 | 344 | If no clause succeeds, cl-case returns nil. A single atom may be used in |
d1b8746d SM |
345 | place of a KEYLIST of one atom. A KEYLIST of t or `otherwise' is |
346 | allowed only in the final clause, and matches if no other keys match. | |
347 | Key values are compared by `eql'. | |
348 | ||
03fef3e6 | 349 | \(fn EXPR (KEYLIST BODY...)...)" nil t) |
d1b8746d | 350 | |
093c0257 | 351 | (put 'cl-case 'lisp-indent-function '1) |
b581bb5c | 352 | |
093c0257 | 353 | (autoload 'cl-ecase "cl-macs" "\ |
222fbb8b | 354 | Like `cl-case', but error if no case fits. |
d1b8746d SM |
355 | `otherwise'-clauses are not allowed. |
356 | ||
03fef3e6 | 357 | \(fn EXPR (KEYLIST BODY...)...)" nil t) |
d1b8746d | 358 | |
093c0257 | 359 | (put 'cl-ecase 'lisp-indent-function '1) |
b581bb5c | 360 | |
093c0257 | 361 | (autoload 'cl-typecase "cl-macs" "\ |
d1b8746d SM |
362 | Evals EXPR, chooses among clauses on that value. |
363 | Each clause looks like (TYPE BODY...). EXPR is evaluated and, if it | |
364 | satisfies TYPE, the corresponding BODY is evaluated. If no clause succeeds, | |
093c0257 | 365 | cl-typecase returns nil. A TYPE of t or `otherwise' is allowed only in the |
d1b8746d SM |
366 | final clause, and matches if no other keys match. |
367 | ||
03fef3e6 | 368 | \(fn EXPR (TYPE BODY...)...)" nil t) |
d1b8746d | 369 | |
093c0257 | 370 | (put 'cl-typecase 'lisp-indent-function '1) |
b581bb5c | 371 | |
093c0257 SM |
372 | (autoload 'cl-etypecase "cl-macs" "\ |
373 | Like `cl-typecase', but error if no case fits. | |
d1b8746d SM |
374 | `otherwise'-clauses are not allowed. |
375 | ||
03fef3e6 | 376 | \(fn EXPR (TYPE BODY...)...)" nil t) |
d1b8746d | 377 | |
093c0257 | 378 | (put 'cl-etypecase 'lisp-indent-function '1) |
b581bb5c | 379 | |
093c0257 | 380 | (autoload 'cl-block "cl-macs" "\ |
d1b8746d | 381 | Define a lexically-scoped block named NAME. |
093c0257 | 382 | NAME may be any symbol. Code inside the BODY forms can call `cl-return-from' |
d1b8746d SM |
383 | to jump prematurely out of the block. This differs from `catch' and `throw' |
384 | in two respects: First, the NAME is an unevaluated symbol rather than a | |
385 | quoted symbol or other form; and second, NAME is lexically rather than | |
386 | dynamically scoped: Only references to it within BODY will work. These | |
387 | references may appear inside macro expansions, but not inside functions | |
388 | called from BODY. | |
389 | ||
03fef3e6 | 390 | \(fn NAME &rest BODY)" nil t) |
d1b8746d | 391 | |
093c0257 | 392 | (put 'cl-block 'lisp-indent-function '1) |
b581bb5c | 393 | |
093c0257 | 394 | (autoload 'cl-return "cl-macs" "\ |
d1b8746d | 395 | Return from the block named nil. |
093c0257 | 396 | This is equivalent to `(cl-return-from nil RESULT)'. |
d1b8746d | 397 | |
03fef3e6 | 398 | \(fn &optional RESULT)" nil t) |
d1b8746d | 399 | |
093c0257 | 400 | (autoload 'cl-return-from "cl-macs" "\ |
d1b8746d | 401 | Return from the block named NAME. |
093c0257 | 402 | This jumps out to the innermost enclosing `(cl-block NAME ...)' form, |
d1b8746d SM |
403 | returning RESULT from that form (or nil if RESULT is omitted). |
404 | This is compatible with Common Lisp, but note that `defun' and | |
405 | `defmacro' do not create implicit blocks as they do in Common Lisp. | |
406 | ||
03fef3e6 | 407 | \(fn NAME &optional RESULT)" nil t) |
d1b8746d | 408 | |
093c0257 | 409 | (put 'cl-return-from 'lisp-indent-function '1) |
b581bb5c | 410 | |
093c0257 SM |
411 | (autoload 'cl-loop "cl-macs" "\ |
412 | The Common Lisp `cl-loop' macro. | |
d1b8746d SM |
413 | Valid clauses are: |
414 | for VAR from/upfrom/downfrom NUM to/upto/downto/above/below NUM by NUM, | |
415 | for VAR in LIST by FUNC, for VAR on LIST by FUNC, for VAR = INIT then EXPR, | |
416 | for VAR across ARRAY, repeat NUM, with VAR = INIT, while COND, until COND, | |
417 | always COND, never COND, thereis COND, collect EXPR into VAR, | |
418 | append EXPR into VAR, nconc EXPR into VAR, sum EXPR into VAR, | |
419 | count EXPR into VAR, maximize EXPR into VAR, minimize EXPR into VAR, | |
420 | if COND CLAUSE [and CLAUSE]... else CLAUSE [and CLAUSE...], | |
421 | unless COND CLAUSE [and CLAUSE]... else CLAUSE [and CLAUSE...], | |
422 | do EXPRS..., initially EXPRS..., finally EXPRS..., return EXPR, | |
423 | finally return EXPR, named NAME. | |
424 | ||
03fef3e6 | 425 | \(fn CLAUSE...)" nil t) |
d1b8746d | 426 | |
093c0257 SM |
427 | (autoload 'cl-do "cl-macs" "\ |
428 | The Common Lisp `cl-do' loop. | |
d1b8746d | 429 | |
03fef3e6 | 430 | \(fn ((VAR INIT [STEP])...) (END-TEST [RESULT...]) BODY...)" nil t) |
d1b8746d | 431 | |
093c0257 | 432 | (put 'cl-do 'lisp-indent-function '2) |
b581bb5c | 433 | |
093c0257 SM |
434 | (autoload 'cl-do* "cl-macs" "\ |
435 | The Common Lisp `cl-do*' loop. | |
d1b8746d | 436 | |
03fef3e6 | 437 | \(fn ((VAR INIT [STEP])...) (END-TEST [RESULT...]) BODY...)" nil t) |
d1b8746d | 438 | |
093c0257 | 439 | (put 'cl-do* 'lisp-indent-function '2) |
b581bb5c | 440 | |
093c0257 | 441 | (autoload 'cl-dolist "cl-macs" "\ |
d1b8746d SM |
442 | Loop over a list. |
443 | Evaluate BODY with VAR bound to each `car' from LIST, in turn. | |
444 | Then evaluate RESULT to get return value, default nil. | |
568352e7 | 445 | An implicit nil block is established around the loop. |
d1b8746d | 446 | |
03fef3e6 | 447 | \(fn (VAR LIST [RESULT]) BODY...)" nil t) |
d1b8746d | 448 | |
222fbb8b GM |
449 | (put 'cl-dolist 'lisp-indent-function '1) |
450 | ||
093c0257 | 451 | (autoload 'cl-dotimes "cl-macs" "\ |
d1b8746d SM |
452 | Loop a certain number of times. |
453 | Evaluate BODY with VAR bound to successive integers from 0, inclusive, | |
454 | to COUNT, exclusive. Then evaluate RESULT to get return value, default | |
455 | nil. | |
456 | ||
03fef3e6 | 457 | \(fn (VAR COUNT [RESULT]) BODY...)" nil t) |
d1b8746d | 458 | |
222fbb8b GM |
459 | (put 'cl-dotimes 'lisp-indent-function '1) |
460 | ||
093c0257 | 461 | (autoload 'cl-do-symbols "cl-macs" "\ |
d1b8746d SM |
462 | Loop over all symbols. |
463 | Evaluate BODY with VAR bound to each interned symbol, or to each symbol | |
464 | from OBARRAY. | |
465 | ||
03fef3e6 | 466 | \(fn (VAR [OBARRAY [RESULT]]) BODY...)" nil t) |
d1b8746d | 467 | |
093c0257 | 468 | (put 'cl-do-symbols 'lisp-indent-function '1) |
b581bb5c | 469 | |
093c0257 | 470 | (autoload 'cl-do-all-symbols "cl-macs" "\ |
0d6459df | 471 | |
d1b8746d | 472 | |
03fef3e6 | 473 | \(fn SPEC &rest BODY)" nil t) |
d1b8746d | 474 | |
093c0257 | 475 | (put 'cl-do-all-symbols 'lisp-indent-function '1) |
b581bb5c | 476 | |
093c0257 | 477 | (autoload 'cl-psetq "cl-macs" "\ |
d1b8746d SM |
478 | Set SYMs to the values VALs in parallel. |
479 | This is like `setq', except that all VAL forms are evaluated (in order) | |
480 | before assigning any symbols SYM to the corresponding values. | |
481 | ||
03fef3e6 | 482 | \(fn SYM VAL SYM VAL ...)" nil t) |
d1b8746d | 483 | |
093c0257 | 484 | (autoload 'cl-progv "cl-macs" "\ |
d1b8746d SM |
485 | Bind SYMBOLS to VALUES dynamically in BODY. |
486 | The forms SYMBOLS and VALUES are evaluated, and must evaluate to lists. | |
487 | Each symbol in the first list is bound to the corresponding value in the | |
488 | second list (or made unbound if VALUES is shorter than SYMBOLS); then the | |
489 | BODY forms are executed and their result is returned. This is much like | |
490 | a `let' form, except that the list of symbols can be computed at run-time. | |
491 | ||
03fef3e6 | 492 | \(fn SYMBOLS VALUES &rest BODY)" nil t) |
d1b8746d | 493 | |
093c0257 | 494 | (put 'cl-progv 'lisp-indent-function '2) |
b581bb5c | 495 | |
093c0257 | 496 | (autoload 'cl-flet "cl-macs" "\ |
d1b8746d | 497 | Make temporary function definitions. |
de7e2b36 | 498 | Like `cl-labels' but the definitions are not recursive. |
d1b8746d | 499 | |
03fef3e6 | 500 | \(fn ((FUNC ARGLIST BODY...) ...) FORM...)" nil t) |
d1b8746d | 501 | |
093c0257 | 502 | (put 'cl-flet 'lisp-indent-function '1) |
b581bb5c | 503 | |
d5c6faf9 SM |
504 | (autoload 'cl-flet* "cl-macs" "\ |
505 | Make temporary function definitions. | |
506 | Like `cl-flet' but the definitions can refer to previous ones. | |
507 | ||
508 | \(fn ((FUNC ARGLIST BODY...) ...) FORM...)" nil t) | |
509 | ||
510 | (put 'cl-flet* 'lisp-indent-function '1) | |
511 | ||
093c0257 | 512 | (autoload 'cl-labels "cl-macs" "\ |
d1b8746d | 513 | Make temporary function bindings. |
222fbb8b GM |
514 | The bindings can be recursive and the scoping is lexical, but capturing them |
515 | in closures will only work if `lexical-binding' is in use. | |
d1b8746d | 516 | |
03fef3e6 | 517 | \(fn ((FUNC ARGLIST BODY...) ...) FORM...)" nil t) |
d1b8746d | 518 | |
093c0257 | 519 | (put 'cl-labels 'lisp-indent-function '1) |
b581bb5c | 520 | |
093c0257 | 521 | (autoload 'cl-macrolet "cl-macs" "\ |
d1b8746d | 522 | Make temporary macro definitions. |
093c0257 | 523 | This is like `cl-flet', but for macros instead of functions. |
d1b8746d | 524 | |
03fef3e6 | 525 | \(fn ((NAME ARGLIST BODY...) ...) FORM...)" nil t) |
d1b8746d | 526 | |
093c0257 | 527 | (put 'cl-macrolet 'lisp-indent-function '1) |
b581bb5c | 528 | |
093c0257 | 529 | (autoload 'cl-symbol-macrolet "cl-macs" "\ |
d1b8746d SM |
530 | Make symbol macro definitions. |
531 | Within the body FORMs, references to the variable NAME will be replaced | |
2ee3d7f0 | 532 | by EXPANSION, and (setq NAME ...) will act like (setf EXPANSION ...). |
d1b8746d | 533 | |
03fef3e6 | 534 | \(fn ((NAME EXPANSION) ...) FORM...)" nil t) |
d1b8746d | 535 | |
093c0257 | 536 | (put 'cl-symbol-macrolet 'lisp-indent-function '1) |
b581bb5c | 537 | |
093c0257 | 538 | (autoload 'cl-multiple-value-bind "cl-macs" "\ |
d1b8746d SM |
539 | Collect multiple return values. |
540 | FORM must return a list; the BODY is then executed with the first N elements | |
541 | of this list bound (`let'-style) to each of the symbols SYM in turn. This | |
093c0257 SM |
542 | is analogous to the Common Lisp `cl-multiple-value-bind' macro, using lists to |
543 | simulate true multiple return values. For compatibility, (cl-values A B C) is | |
d1b8746d SM |
544 | a synonym for (list A B C). |
545 | ||
03fef3e6 | 546 | \(fn (SYM...) FORM BODY)" nil t) |
d1b8746d | 547 | |
093c0257 | 548 | (put 'cl-multiple-value-bind 'lisp-indent-function '2) |
b581bb5c | 549 | |
093c0257 | 550 | (autoload 'cl-multiple-value-setq "cl-macs" "\ |
d1b8746d SM |
551 | Collect multiple return values. |
552 | FORM must return a list; the first N elements of this list are stored in | |
553 | each of the symbols SYM in turn. This is analogous to the Common Lisp | |
093c0257 SM |
554 | `cl-multiple-value-setq' macro, using lists to simulate true multiple return |
555 | values. For compatibility, (cl-values A B C) is a synonym for (list A B C). | |
d1b8746d | 556 | |
03fef3e6 | 557 | \(fn (SYM...) FORM)" nil t) |
d1b8746d | 558 | |
093c0257 | 559 | (put 'cl-multiple-value-setq 'lisp-indent-function '1) |
b581bb5c | 560 | |
093c0257 | 561 | (autoload 'cl-locally "cl-macs" "\ |
0d6459df | 562 | |
d1b8746d | 563 | |
03fef3e6 | 564 | \(fn &rest BODY)" nil t) |
d1b8746d | 565 | |
093c0257 | 566 | (autoload 'cl-the "cl-macs" "\ |
ba83908c SM |
567 | |
568 | ||
03fef3e6 | 569 | \(fn TYPE FORM)" nil t) |
ba83908c | 570 | |
093c0257 | 571 | (put 'cl-the 'lisp-indent-function '1) |
b581bb5c | 572 | |
093c0257 | 573 | (autoload 'cl-declare "cl-macs" "\ |
7b41decb | 574 | Declare SPECS about the current function while compiling. |
1b5eaeb3 | 575 | For instance |
0d6459df | 576 | |
093c0257 | 577 | (cl-declare (warn 0)) |
1b5eaeb3 | 578 | |
7b41decb LMI |
579 | will turn off byte-compile warnings in the function. |
580 | See Info node `(cl)Declarations' for details. | |
d1b8746d | 581 | |
03fef3e6 | 582 | \(fn &rest SPECS)" nil t) |
d1b8746d | 583 | |
093c0257 | 584 | (autoload 'cl-psetf "cl-macs" "\ |
d1b8746d | 585 | Set PLACEs to the values VALs in parallel. |
2ee3d7f0 | 586 | This is like `setf', except that all VAL forms are evaluated (in order) |
d1b8746d SM |
587 | before assigning any PLACEs to the corresponding values. |
588 | ||
03fef3e6 | 589 | \(fn PLACE VAL PLACE VAL ...)" nil t) |
d1b8746d | 590 | |
093c0257 | 591 | (autoload 'cl-remf "cl-macs" "\ |
d1b8746d | 592 | Remove TAG from property list PLACE. |
2ee3d7f0 | 593 | PLACE may be a symbol, or any generalized variable allowed by `setf'. |
d1b8746d SM |
594 | The form returns true if TAG was found and removed, nil otherwise. |
595 | ||
03fef3e6 | 596 | \(fn PLACE TAG)" nil t) |
d1b8746d | 597 | |
093c0257 | 598 | (autoload 'cl-shiftf "cl-macs" "\ |
d1b8746d | 599 | Shift left among PLACEs. |
093c0257 | 600 | Example: (cl-shiftf A B C) sets A to B, B to C, and returns the old A. |
2ee3d7f0 | 601 | Each PLACE may be a symbol, or any generalized variable allowed by `setf'. |
d1b8746d | 602 | |
03fef3e6 | 603 | \(fn PLACE... VAL)" nil t) |
d1b8746d | 604 | |
093c0257 | 605 | (autoload 'cl-rotatef "cl-macs" "\ |
d1b8746d | 606 | Rotate left among PLACEs. |
093c0257 | 607 | Example: (cl-rotatef A B C) sets A to B, B to C, and C to A. It returns nil. |
2ee3d7f0 | 608 | Each PLACE may be a symbol, or any generalized variable allowed by `setf'. |
d1b8746d | 609 | |
03fef3e6 | 610 | \(fn PLACE...)" nil t) |
d1b8746d | 611 | |
222fbb8b GM |
612 | (autoload 'cl-letf "cl-macs" "\ |
613 | Temporarily bind to PLACEs. | |
614 | This is the analogue of `let', but with generalized variables (in the | |
615 | sense of `setf') for the PLACEs. Each PLACE is set to the corresponding | |
616 | VALUE, then the BODY forms are executed. On exit, either normally or | |
617 | because of a `throw' or error, the PLACEs are set back to their original | |
618 | values. Note that this macro is *not* available in Common Lisp. | |
619 | As a special case, if `(PLACE)' is used instead of `(PLACE VALUE)', | |
620 | the PLACE is not modified before executing BODY. | |
621 | ||
622 | \(fn ((PLACE VALUE) ...) BODY...)" nil t) | |
623 | ||
624 | (put 'cl-letf 'lisp-indent-function '1) | |
625 | ||
626 | (autoload 'cl-letf* "cl-macs" "\ | |
627 | Temporarily bind to PLACEs. | |
628 | Like `cl-letf' but where the bindings are performed one at a time, | |
629 | rather than all at the end (i.e. like `let*' rather than like `let'). | |
630 | ||
631 | \(fn BINDINGS &rest BODY)" nil t) | |
632 | ||
633 | (put 'cl-letf* 'lisp-indent-function '1) | |
634 | ||
093c0257 | 635 | (autoload 'cl-callf "cl-macs" "\ |
d1b8746d SM |
636 | Set PLACE to (FUNC PLACE ARGS...). |
637 | FUNC should be an unquoted function name. PLACE may be a symbol, | |
2ee3d7f0 | 638 | or any generalized variable allowed by `setf'. |
d1b8746d | 639 | |
2ee3d7f0 | 640 | \(fn FUNC PLACE &rest ARGS)" nil t) |
d1b8746d | 641 | |
093c0257 | 642 | (put 'cl-callf 'lisp-indent-function '2) |
b581bb5c | 643 | |
093c0257 | 644 | (autoload 'cl-callf2 "cl-macs" "\ |
d1b8746d | 645 | Set PLACE to (FUNC ARG1 PLACE ARGS...). |
093c0257 | 646 | Like `cl-callf', but PLACE is the second argument of FUNC, not the first. |
d1b8746d | 647 | |
03fef3e6 | 648 | \(fn FUNC ARG1 PLACE ARGS...)" nil t) |
d1b8746d | 649 | |
093c0257 | 650 | (put 'cl-callf2 'lisp-indent-function '3) |
b581bb5c | 651 | |
093c0257 | 652 | (autoload 'cl-defstruct "cl-macs" "\ |
d1b8746d | 653 | Define a struct type. |
c7dc1ac1 CY |
654 | This macro defines a new data type called NAME that stores data |
655 | in SLOTs. It defines a `make-NAME' constructor, a `copy-NAME' | |
656 | copier, a `NAME-p' predicate, and slot accessors named `NAME-SLOT'. | |
2ee3d7f0 | 657 | You can use the accessors to set the corresponding slots, via `setf'. |
d1b8746d | 658 | |
c7dc1ac1 | 659 | NAME may instead take the form (NAME OPTIONS...), where each |
685f87b0 SM |
660 | OPTION is either a single keyword or (KEYWORD VALUE) where |
661 | KEYWORD can be one of :conc-name, :constructor, :copier, :predicate, | |
662 | :type, :named, :initial-offset, :print-function, or :include. | |
c7dc1ac1 CY |
663 | |
664 | Each SLOT may instead take the form (SLOT SLOT-OPTS...), where | |
665 | SLOT-OPTS are keyword-value pairs for that slot. Currently, only | |
666 | one keyword is supported, `:read-only'. If this has a non-nil | |
2ee3d7f0 | 667 | value, that slot cannot be set via `setf'. |
c7dc1ac1 | 668 | |
03fef3e6 | 669 | \(fn NAME SLOTS...)" nil t) |
d1b8746d | 670 | |
093c0257 | 671 | (put 'cl-defstruct 'doc-string-elt '2) |
b581bb5c | 672 | |
972debf2 SM |
673 | (put 'cl-defstruct 'lisp-indent-function '1) |
674 | ||
093c0257 | 675 | (autoload 'cl-deftype "cl-macs" "\ |
c93d41ba | 676 | Define NAME as a new data type. |
093c0257 | 677 | The type name can then be used in `cl-typecase', `cl-check-type', etc. |
c93d41ba | 678 | |
03fef3e6 | 679 | \(fn NAME ARGLIST &rest BODY)" nil t) |
c93d41ba | 680 | |
093c0257 | 681 | (put 'cl-deftype 'doc-string-elt '3) |
b581bb5c | 682 | |
093c0257 | 683 | (autoload 'cl-typep "cl-macs" "\ |
d1b8746d SM |
684 | Check that OBJECT is of type TYPE. |
685 | TYPE is a Common Lisp-style type specifier. | |
686 | ||
687 | \(fn OBJECT TYPE)" nil nil) | |
688 | ||
093c0257 | 689 | (autoload 'cl-check-type "cl-macs" "\ |
d1b8746d SM |
690 | Verify that FORM is of type TYPE; signal an error if not. |
691 | STRING is an optional description of the desired type. | |
692 | ||
03fef3e6 | 693 | \(fn FORM TYPE &optional STRING)" nil t) |
d1b8746d | 694 | |
093c0257 | 695 | (autoload 'cl-assert "cl-macs" "\ |
d1b8746d SM |
696 | Verify that FORM returns non-nil; signal an error if not. |
697 | Second arg SHOW-ARGS means to include arguments of FORM in message. | |
698 | Other args STRING and ARGS... are arguments to be passed to `error'. | |
699 | They are not evaluated unless the assertion fails. If STRING is | |
700 | omitted, a default message listing FORM itself is used. | |
701 | ||
03fef3e6 | 702 | \(fn FORM &optional SHOW-ARGS STRING &rest ARGS)" nil t) |
d1b8746d | 703 | |
093c0257 | 704 | (autoload 'cl-define-compiler-macro "cl-macs" "\ |
d1b8746d SM |
705 | Define a compiler-only macro. |
706 | This is like `defmacro', but macro expansion occurs only if the call to | |
707 | FUNC is compiled (i.e., not interpreted). Compiler macros should be used | |
708 | for optimizing the way calls to FUNC are compiled; the form returned by | |
709 | BODY should do the same thing as a call to the normal function called | |
710 | FUNC, though possibly more efficiently. Note that, like regular macros, | |
711 | compiler macros are expanded repeatedly until no further expansions are | |
712 | possible. Unlike regular macros, BODY can decide to \"punt\" and leave the | |
713 | original function call alone by declaring an initial `&whole foo' parameter | |
714 | and then returning foo. | |
715 | ||
03fef3e6 | 716 | \(fn FUNC ARGS &rest BODY)" nil t) |
d1b8746d | 717 | |
093c0257 | 718 | (autoload 'cl-compiler-macroexpand "cl-macs" "\ |
0d6459df | 719 | |
d1b8746d SM |
720 | |
721 | \(fn FORM)" nil nil) | |
722 | ||
093c0257 | 723 | (autoload 'cl-defsubst "cl-macs" "\ |
eb123b12 GM |
724 | Define NAME as a function. |
725 | Like `defun', except the function is automatically declared `inline', | |
726 | ARGLIST allows full Common Lisp conventions, and BODY is implicitly | |
093c0257 | 727 | surrounded by (cl-block NAME ...). |
eb123b12 | 728 | |
03fef3e6 | 729 | \(fn NAME ARGLIST [DOCSTRING] BODY...)" nil t) |
eb123b12 | 730 | |
2ee3d7f0 SM |
731 | (put 'cl-defsubst 'lisp-indent-function '2) |
732 | ||
71adb94b SM |
733 | (autoload 'cl--compiler-macro-adjoin "cl-macs" "\ |
734 | ||
735 | ||
736 | \(fn FORM A LIST &rest KEYS)" nil nil) | |
737 | ||
d1b8746d SM |
738 | ;;;*** |
739 | \f | |
093c0257 SM |
740 | ;;;### (autoloads (cl-tree-equal cl-nsublis cl-sublis cl-nsubst-if-not |
741 | ;;;;;; cl-nsubst-if cl-nsubst cl-subst-if-not cl-subst-if cl-subsetp | |
742 | ;;;;;; cl-nset-exclusive-or cl-set-exclusive-or cl-nset-difference | |
743 | ;;;;;; cl-set-difference cl-nintersection cl-intersection cl-nunion | |
744 | ;;;;;; cl-union cl-rassoc-if-not cl-rassoc-if cl-rassoc cl-assoc-if-not | |
745 | ;;;;;; cl-assoc-if cl-assoc cl--adjoin cl-member-if-not cl-member-if | |
746 | ;;;;;; cl-member cl-merge cl-stable-sort cl-sort cl-search cl-mismatch | |
747 | ;;;;;; cl-count-if-not cl-count-if cl-count cl-position-if-not cl-position-if | |
748 | ;;;;;; cl-position cl-find-if-not cl-find-if cl-find cl-nsubstitute-if-not | |
749 | ;;;;;; cl-nsubstitute-if cl-nsubstitute cl-substitute-if-not cl-substitute-if | |
750 | ;;;;;; cl-substitute cl-delete-duplicates cl-remove-duplicates cl-delete-if-not | |
751 | ;;;;;; cl-delete-if cl-delete cl-remove-if-not cl-remove-if cl-remove | |
e7c1b6ef | 752 | ;;;;;; cl-replace cl-fill cl-reduce) "cl-seq" "cl-seq.el" "4c1e1191e82dc8d5449a5ec4d59efc10") |
d1b8746d SM |
753 | ;;; Generated autoloads from cl-seq.el |
754 | ||
093c0257 | 755 | (autoload 'cl-reduce "cl-seq" "\ |
d1b8746d SM |
756 | Reduce two-argument FUNCTION across SEQ. |
757 | ||
758 | Keywords supported: :start :end :from-end :initial-value :key | |
759 | ||
760 | \(fn FUNCTION SEQ [KEYWORD VALUE]...)" nil nil) | |
761 | ||
093c0257 | 762 | (autoload 'cl-fill "cl-seq" "\ |
d1b8746d SM |
763 | Fill the elements of SEQ with ITEM. |
764 | ||
765 | Keywords supported: :start :end | |
766 | ||
767 | \(fn SEQ ITEM [KEYWORD VALUE]...)" nil nil) | |
768 | ||
093c0257 | 769 | (autoload 'cl-replace "cl-seq" "\ |
d1b8746d SM |
770 | Replace the elements of SEQ1 with the elements of SEQ2. |
771 | SEQ1 is destructively modified, then returned. | |
772 | ||
773 | Keywords supported: :start1 :end1 :start2 :end2 | |
774 | ||
775 | \(fn SEQ1 SEQ2 [KEYWORD VALUE]...)" nil nil) | |
776 | ||
093c0257 | 777 | (autoload 'cl-remove "cl-seq" "\ |
d1b8746d SM |
778 | Remove all occurrences of ITEM in SEQ. |
779 | This is a non-destructive function; it makes a copy of SEQ if necessary | |
780 | to avoid corrupting the original SEQ. | |
781 | ||
782 | Keywords supported: :test :test-not :key :count :start :end :from-end | |
783 | ||
784 | \(fn ITEM SEQ [KEYWORD VALUE]...)" nil nil) | |
785 | ||
093c0257 | 786 | (autoload 'cl-remove-if "cl-seq" "\ |
d1b8746d SM |
787 | Remove all items satisfying PREDICATE in SEQ. |
788 | This is a non-destructive function; it makes a copy of SEQ if necessary | |
789 | to avoid corrupting the original SEQ. | |
790 | ||
791 | Keywords supported: :key :count :start :end :from-end | |
792 | ||
793 | \(fn PREDICATE SEQ [KEYWORD VALUE]...)" nil nil) | |
794 | ||
093c0257 | 795 | (autoload 'cl-remove-if-not "cl-seq" "\ |
d1b8746d SM |
796 | Remove all items not satisfying PREDICATE in SEQ. |
797 | This is a non-destructive function; it makes a copy of SEQ if necessary | |
798 | to avoid corrupting the original SEQ. | |
799 | ||
800 | Keywords supported: :key :count :start :end :from-end | |
801 | ||
802 | \(fn PREDICATE SEQ [KEYWORD VALUE]...)" nil nil) | |
803 | ||
093c0257 | 804 | (autoload 'cl-delete "cl-seq" "\ |
d1b8746d SM |
805 | Remove all occurrences of ITEM in SEQ. |
806 | This is a destructive function; it reuses the storage of SEQ whenever possible. | |
807 | ||
808 | Keywords supported: :test :test-not :key :count :start :end :from-end | |
809 | ||
810 | \(fn ITEM SEQ [KEYWORD VALUE]...)" nil nil) | |
811 | ||
093c0257 | 812 | (autoload 'cl-delete-if "cl-seq" "\ |
d1b8746d SM |
813 | Remove all items satisfying PREDICATE in SEQ. |
814 | This is a destructive function; it reuses the storage of SEQ whenever possible. | |
815 | ||
816 | Keywords supported: :key :count :start :end :from-end | |
817 | ||
818 | \(fn PREDICATE SEQ [KEYWORD VALUE]...)" nil nil) | |
819 | ||
093c0257 | 820 | (autoload 'cl-delete-if-not "cl-seq" "\ |
d1b8746d SM |
821 | Remove all items not satisfying PREDICATE in SEQ. |
822 | This is a destructive function; it reuses the storage of SEQ whenever possible. | |
823 | ||
824 | Keywords supported: :key :count :start :end :from-end | |
825 | ||
826 | \(fn PREDICATE SEQ [KEYWORD VALUE]...)" nil nil) | |
827 | ||
093c0257 | 828 | (autoload 'cl-remove-duplicates "cl-seq" "\ |
d1b8746d SM |
829 | Return a copy of SEQ with all duplicate elements removed. |
830 | ||
831 | Keywords supported: :test :test-not :key :start :end :from-end | |
832 | ||
833 | \(fn SEQ [KEYWORD VALUE]...)" nil nil) | |
834 | ||
093c0257 | 835 | (autoload 'cl-delete-duplicates "cl-seq" "\ |
d1b8746d SM |
836 | Remove all duplicate elements from SEQ (destructively). |
837 | ||
838 | Keywords supported: :test :test-not :key :start :end :from-end | |
839 | ||
840 | \(fn SEQ [KEYWORD VALUE]...)" nil nil) | |
841 | ||
093c0257 | 842 | (autoload 'cl-substitute "cl-seq" "\ |
d1b8746d SM |
843 | Substitute NEW for OLD in SEQ. |
844 | This is a non-destructive function; it makes a copy of SEQ if necessary | |
845 | to avoid corrupting the original SEQ. | |
846 | ||
847 | Keywords supported: :test :test-not :key :count :start :end :from-end | |
848 | ||
849 | \(fn NEW OLD SEQ [KEYWORD VALUE]...)" nil nil) | |
850 | ||
093c0257 | 851 | (autoload 'cl-substitute-if "cl-seq" "\ |
d1b8746d SM |
852 | Substitute NEW for all items satisfying PREDICATE in SEQ. |
853 | This is a non-destructive function; it makes a copy of SEQ if necessary | |
854 | to avoid corrupting the original SEQ. | |
855 | ||
856 | Keywords supported: :key :count :start :end :from-end | |
857 | ||
858 | \(fn NEW PREDICATE SEQ [KEYWORD VALUE]...)" nil nil) | |
859 | ||
093c0257 | 860 | (autoload 'cl-substitute-if-not "cl-seq" "\ |
d1b8746d SM |
861 | Substitute NEW for all items not satisfying PREDICATE in SEQ. |
862 | This is a non-destructive function; it makes a copy of SEQ if necessary | |
863 | to avoid corrupting the original SEQ. | |
864 | ||
865 | Keywords supported: :key :count :start :end :from-end | |
866 | ||
867 | \(fn NEW PREDICATE SEQ [KEYWORD VALUE]...)" nil nil) | |
868 | ||
093c0257 | 869 | (autoload 'cl-nsubstitute "cl-seq" "\ |
d1b8746d SM |
870 | Substitute NEW for OLD in SEQ. |
871 | This is a destructive function; it reuses the storage of SEQ whenever possible. | |
872 | ||
873 | Keywords supported: :test :test-not :key :count :start :end :from-end | |
874 | ||
875 | \(fn NEW OLD SEQ [KEYWORD VALUE]...)" nil nil) | |
876 | ||
093c0257 | 877 | (autoload 'cl-nsubstitute-if "cl-seq" "\ |
d1b8746d SM |
878 | Substitute NEW for all items satisfying PREDICATE in SEQ. |
879 | This is a destructive function; it reuses the storage of SEQ whenever possible. | |
880 | ||
881 | Keywords supported: :key :count :start :end :from-end | |
882 | ||
883 | \(fn NEW PREDICATE SEQ [KEYWORD VALUE]...)" nil nil) | |
884 | ||
093c0257 | 885 | (autoload 'cl-nsubstitute-if-not "cl-seq" "\ |
d1b8746d SM |
886 | Substitute NEW for all items not satisfying PREDICATE in SEQ. |
887 | This is a destructive function; it reuses the storage of SEQ whenever possible. | |
888 | ||
889 | Keywords supported: :key :count :start :end :from-end | |
890 | ||
891 | \(fn NEW PREDICATE SEQ [KEYWORD VALUE]...)" nil nil) | |
892 | ||
093c0257 | 893 | (autoload 'cl-find "cl-seq" "\ |
d1b8746d SM |
894 | Find the first occurrence of ITEM in SEQ. |
895 | Return the matching ITEM, or nil if not found. | |
896 | ||
897 | Keywords supported: :test :test-not :key :start :end :from-end | |
898 | ||
899 | \(fn ITEM SEQ [KEYWORD VALUE]...)" nil nil) | |
900 | ||
093c0257 | 901 | (autoload 'cl-find-if "cl-seq" "\ |
d1b8746d SM |
902 | Find the first item satisfying PREDICATE in SEQ. |
903 | Return the matching item, or nil if not found. | |
904 | ||
905 | Keywords supported: :key :start :end :from-end | |
906 | ||
907 | \(fn PREDICATE SEQ [KEYWORD VALUE]...)" nil nil) | |
908 | ||
093c0257 | 909 | (autoload 'cl-find-if-not "cl-seq" "\ |
d1b8746d SM |
910 | Find the first item not satisfying PREDICATE in SEQ. |
911 | Return the matching item, or nil if not found. | |
912 | ||
913 | Keywords supported: :key :start :end :from-end | |
914 | ||
915 | \(fn PREDICATE SEQ [KEYWORD VALUE]...)" nil nil) | |
916 | ||
093c0257 | 917 | (autoload 'cl-position "cl-seq" "\ |
d1b8746d SM |
918 | Find the first occurrence of ITEM in SEQ. |
919 | Return the index of the matching item, or nil if not found. | |
920 | ||
921 | Keywords supported: :test :test-not :key :start :end :from-end | |
922 | ||
923 | \(fn ITEM SEQ [KEYWORD VALUE]...)" nil nil) | |
924 | ||
093c0257 | 925 | (autoload 'cl-position-if "cl-seq" "\ |
d1b8746d SM |
926 | Find the first item satisfying PREDICATE in SEQ. |
927 | Return the index of the matching item, or nil if not found. | |
928 | ||
929 | Keywords supported: :key :start :end :from-end | |
930 | ||
931 | \(fn PREDICATE SEQ [KEYWORD VALUE]...)" nil nil) | |
932 | ||
093c0257 | 933 | (autoload 'cl-position-if-not "cl-seq" "\ |
d1b8746d SM |
934 | Find the first item not satisfying PREDICATE in SEQ. |
935 | Return the index of the matching item, or nil if not found. | |
936 | ||
937 | Keywords supported: :key :start :end :from-end | |
938 | ||
939 | \(fn PREDICATE SEQ [KEYWORD VALUE]...)" nil nil) | |
940 | ||
093c0257 | 941 | (autoload 'cl-count "cl-seq" "\ |
d1b8746d SM |
942 | Count the number of occurrences of ITEM in SEQ. |
943 | ||
944 | Keywords supported: :test :test-not :key :start :end | |
945 | ||
946 | \(fn ITEM SEQ [KEYWORD VALUE]...)" nil nil) | |
947 | ||
093c0257 | 948 | (autoload 'cl-count-if "cl-seq" "\ |
d1b8746d SM |
949 | Count the number of items satisfying PREDICATE in SEQ. |
950 | ||
951 | Keywords supported: :key :start :end | |
952 | ||
953 | \(fn PREDICATE SEQ [KEYWORD VALUE]...)" nil nil) | |
954 | ||
093c0257 | 955 | (autoload 'cl-count-if-not "cl-seq" "\ |
d1b8746d SM |
956 | Count the number of items not satisfying PREDICATE in SEQ. |
957 | ||
958 | Keywords supported: :key :start :end | |
959 | ||
960 | \(fn PREDICATE SEQ [KEYWORD VALUE]...)" nil nil) | |
961 | ||
093c0257 | 962 | (autoload 'cl-mismatch "cl-seq" "\ |
d1b8746d SM |
963 | Compare SEQ1 with SEQ2, return index of first mismatching element. |
964 | Return nil if the sequences match. If one sequence is a prefix of the | |
965 | other, the return value indicates the end of the shorter sequence. | |
966 | ||
967 | Keywords supported: :test :test-not :key :start1 :end1 :start2 :end2 :from-end | |
968 | ||
969 | \(fn SEQ1 SEQ2 [KEYWORD VALUE]...)" nil nil) | |
970 | ||
093c0257 | 971 | (autoload 'cl-search "cl-seq" "\ |
d1b8746d SM |
972 | Search for SEQ1 as a subsequence of SEQ2. |
973 | Return the index of the leftmost element of the first match found; | |
974 | return nil if there are no matches. | |
975 | ||
976 | Keywords supported: :test :test-not :key :start1 :end1 :start2 :end2 :from-end | |
977 | ||
978 | \(fn SEQ1 SEQ2 [KEYWORD VALUE]...)" nil nil) | |
979 | ||
093c0257 | 980 | (autoload 'cl-sort "cl-seq" "\ |
d1b8746d SM |
981 | Sort the argument SEQ according to PREDICATE. |
982 | This is a destructive function; it reuses the storage of SEQ if possible. | |
983 | ||
984 | Keywords supported: :key | |
985 | ||
986 | \(fn SEQ PREDICATE [KEYWORD VALUE]...)" nil nil) | |
987 | ||
093c0257 | 988 | (autoload 'cl-stable-sort "cl-seq" "\ |
d1b8746d SM |
989 | Sort the argument SEQ stably according to PREDICATE. |
990 | This is a destructive function; it reuses the storage of SEQ if possible. | |
991 | ||
992 | Keywords supported: :key | |
993 | ||
994 | \(fn SEQ PREDICATE [KEYWORD VALUE]...)" nil nil) | |
995 | ||
093c0257 | 996 | (autoload 'cl-merge "cl-seq" "\ |
d1b8746d SM |
997 | Destructively merge the two sequences to produce a new sequence. |
998 | TYPE is the sequence type to return, SEQ1 and SEQ2 are the two argument | |
999 | sequences, and PREDICATE is a `less-than' predicate on the elements. | |
1000 | ||
1001 | Keywords supported: :key | |
1002 | ||
1003 | \(fn TYPE SEQ1 SEQ2 PREDICATE [KEYWORD VALUE]...)" nil nil) | |
1004 | ||
093c0257 | 1005 | (autoload 'cl-member "cl-seq" "\ |
d1b8746d SM |
1006 | Find the first occurrence of ITEM in LIST. |
1007 | Return the sublist of LIST whose car is ITEM. | |
1008 | ||
1009 | Keywords supported: :test :test-not :key | |
1010 | ||
1011 | \(fn ITEM LIST [KEYWORD VALUE]...)" nil nil) | |
1012 | ||
d9857e53 SM |
1013 | (put 'cl-member 'compiler-macro #'cl--compiler-macro-member) |
1014 | ||
093c0257 | 1015 | (autoload 'cl-member-if "cl-seq" "\ |
d1b8746d SM |
1016 | Find the first item satisfying PREDICATE in LIST. |
1017 | Return the sublist of LIST whose car matches. | |
1018 | ||
1019 | Keywords supported: :key | |
1020 | ||
1021 | \(fn PREDICATE LIST [KEYWORD VALUE]...)" nil nil) | |
1022 | ||
093c0257 | 1023 | (autoload 'cl-member-if-not "cl-seq" "\ |
d1b8746d SM |
1024 | Find the first item not satisfying PREDICATE in LIST. |
1025 | Return the sublist of LIST whose car matches. | |
1026 | ||
1027 | Keywords supported: :key | |
1028 | ||
1029 | \(fn PREDICATE LIST [KEYWORD VALUE]...)" nil nil) | |
1030 | ||
4735906a | 1031 | (autoload 'cl--adjoin "cl-seq" "\ |
cf3304e1 | 1032 | |
d1b8746d SM |
1033 | |
1034 | \(fn CL-ITEM CL-LIST &rest CL-KEYS)" nil nil) | |
1035 | ||
093c0257 | 1036 | (autoload 'cl-assoc "cl-seq" "\ |
d1b8746d SM |
1037 | Find the first item whose car matches ITEM in LIST. |
1038 | ||
1039 | Keywords supported: :test :test-not :key | |
1040 | ||
1041 | \(fn ITEM LIST [KEYWORD VALUE]...)" nil nil) | |
1042 | ||
d9857e53 SM |
1043 | (put 'cl-assoc 'compiler-macro #'cl--compiler-macro-assoc) |
1044 | ||
093c0257 | 1045 | (autoload 'cl-assoc-if "cl-seq" "\ |
d1b8746d SM |
1046 | Find the first item whose car satisfies PREDICATE in LIST. |
1047 | ||
1048 | Keywords supported: :key | |
1049 | ||
1050 | \(fn PREDICATE LIST [KEYWORD VALUE]...)" nil nil) | |
1051 | ||
093c0257 | 1052 | (autoload 'cl-assoc-if-not "cl-seq" "\ |
d1b8746d SM |
1053 | Find the first item whose car does not satisfy PREDICATE in LIST. |
1054 | ||
1055 | Keywords supported: :key | |
1056 | ||
1057 | \(fn PREDICATE LIST [KEYWORD VALUE]...)" nil nil) | |
1058 | ||
093c0257 | 1059 | (autoload 'cl-rassoc "cl-seq" "\ |
d1b8746d SM |
1060 | Find the first item whose cdr matches ITEM in LIST. |
1061 | ||
1062 | Keywords supported: :test :test-not :key | |
1063 | ||
1064 | \(fn ITEM LIST [KEYWORD VALUE]...)" nil nil) | |
1065 | ||
093c0257 | 1066 | (autoload 'cl-rassoc-if "cl-seq" "\ |
d1b8746d SM |
1067 | Find the first item whose cdr satisfies PREDICATE in LIST. |
1068 | ||
1069 | Keywords supported: :key | |
1070 | ||
1071 | \(fn PREDICATE LIST [KEYWORD VALUE]...)" nil nil) | |
1072 | ||
093c0257 | 1073 | (autoload 'cl-rassoc-if-not "cl-seq" "\ |
d1b8746d SM |
1074 | Find the first item whose cdr does not satisfy PREDICATE in LIST. |
1075 | ||
1076 | Keywords supported: :key | |
1077 | ||
1078 | \(fn PREDICATE LIST [KEYWORD VALUE]...)" nil nil) | |
1079 | ||
093c0257 | 1080 | (autoload 'cl-union "cl-seq" "\ |
d1b8746d | 1081 | Combine LIST1 and LIST2 using a set-union operation. |
16b737dc | 1082 | The resulting list contains all items that appear in either LIST1 or LIST2. |
d1b8746d SM |
1083 | This is a non-destructive function; it makes a copy of the data if necessary |
1084 | to avoid corrupting the original LIST1 and LIST2. | |
1085 | ||
1086 | Keywords supported: :test :test-not :key | |
1087 | ||
1088 | \(fn LIST1 LIST2 [KEYWORD VALUE]...)" nil nil) | |
1089 | ||
093c0257 | 1090 | (autoload 'cl-nunion "cl-seq" "\ |
d1b8746d | 1091 | Combine LIST1 and LIST2 using a set-union operation. |
16b737dc | 1092 | The resulting list contains all items that appear in either LIST1 or LIST2. |
d1b8746d SM |
1093 | This is a destructive function; it reuses the storage of LIST1 and LIST2 |
1094 | whenever possible. | |
1095 | ||
1096 | Keywords supported: :test :test-not :key | |
1097 | ||
1098 | \(fn LIST1 LIST2 [KEYWORD VALUE]...)" nil nil) | |
1099 | ||
093c0257 | 1100 | (autoload 'cl-intersection "cl-seq" "\ |
d1b8746d | 1101 | Combine LIST1 and LIST2 using a set-intersection operation. |
16b737dc | 1102 | The resulting list contains all items that appear in both LIST1 and LIST2. |
d1b8746d SM |
1103 | This is a non-destructive function; it makes a copy of the data if necessary |
1104 | to avoid corrupting the original LIST1 and LIST2. | |
1105 | ||
1106 | Keywords supported: :test :test-not :key | |
1107 | ||
1108 | \(fn LIST1 LIST2 [KEYWORD VALUE]...)" nil nil) | |
1109 | ||
093c0257 | 1110 | (autoload 'cl-nintersection "cl-seq" "\ |
d1b8746d | 1111 | Combine LIST1 and LIST2 using a set-intersection operation. |
16b737dc | 1112 | The resulting list contains all items that appear in both LIST1 and LIST2. |
d1b8746d SM |
1113 | This is a destructive function; it reuses the storage of LIST1 and LIST2 |
1114 | whenever possible. | |
1115 | ||
1116 | Keywords supported: :test :test-not :key | |
1117 | ||
1118 | \(fn LIST1 LIST2 [KEYWORD VALUE]...)" nil nil) | |
1119 | ||
093c0257 | 1120 | (autoload 'cl-set-difference "cl-seq" "\ |
d1b8746d | 1121 | Combine LIST1 and LIST2 using a set-difference operation. |
16b737dc | 1122 | The resulting list contains all items that appear in LIST1 but not LIST2. |
d1b8746d SM |
1123 | This is a non-destructive function; it makes a copy of the data if necessary |
1124 | to avoid corrupting the original LIST1 and LIST2. | |
1125 | ||
1126 | Keywords supported: :test :test-not :key | |
1127 | ||
1128 | \(fn LIST1 LIST2 [KEYWORD VALUE]...)" nil nil) | |
1129 | ||
093c0257 | 1130 | (autoload 'cl-nset-difference "cl-seq" "\ |
d1b8746d | 1131 | Combine LIST1 and LIST2 using a set-difference operation. |
16b737dc | 1132 | The resulting list contains all items that appear in LIST1 but not LIST2. |
d1b8746d SM |
1133 | This is a destructive function; it reuses the storage of LIST1 and LIST2 |
1134 | whenever possible. | |
1135 | ||
1136 | Keywords supported: :test :test-not :key | |
1137 | ||
1138 | \(fn LIST1 LIST2 [KEYWORD VALUE]...)" nil nil) | |
1139 | ||
093c0257 | 1140 | (autoload 'cl-set-exclusive-or "cl-seq" "\ |
d1b8746d | 1141 | Combine LIST1 and LIST2 using a set-exclusive-or operation. |
16b737dc | 1142 | The resulting list contains all items appearing in exactly one of LIST1, LIST2. |
d1b8746d SM |
1143 | This is a non-destructive function; it makes a copy of the data if necessary |
1144 | to avoid corrupting the original LIST1 and LIST2. | |
1145 | ||
1146 | Keywords supported: :test :test-not :key | |
1147 | ||
1148 | \(fn LIST1 LIST2 [KEYWORD VALUE]...)" nil nil) | |
1149 | ||
093c0257 | 1150 | (autoload 'cl-nset-exclusive-or "cl-seq" "\ |
d1b8746d | 1151 | Combine LIST1 and LIST2 using a set-exclusive-or operation. |
16b737dc | 1152 | The resulting list contains all items appearing in exactly one of LIST1, LIST2. |
d1b8746d SM |
1153 | This is a destructive function; it reuses the storage of LIST1 and LIST2 |
1154 | whenever possible. | |
1155 | ||
1156 | Keywords supported: :test :test-not :key | |
1157 | ||
1158 | \(fn LIST1 LIST2 [KEYWORD VALUE]...)" nil nil) | |
1159 | ||
093c0257 | 1160 | (autoload 'cl-subsetp "cl-seq" "\ |
d1b8746d SM |
1161 | Return true if LIST1 is a subset of LIST2. |
1162 | I.e., if every element of LIST1 also appears in LIST2. | |
1163 | ||
1164 | Keywords supported: :test :test-not :key | |
1165 | ||
1166 | \(fn LIST1 LIST2 [KEYWORD VALUE]...)" nil nil) | |
1167 | ||
093c0257 | 1168 | (autoload 'cl-subst-if "cl-seq" "\ |
d1b8746d SM |
1169 | Substitute NEW for elements matching PREDICATE in TREE (non-destructively). |
1170 | Return a copy of TREE with all matching elements replaced by NEW. | |
1171 | ||
1172 | Keywords supported: :key | |
1173 | ||
1174 | \(fn NEW PREDICATE TREE [KEYWORD VALUE]...)" nil nil) | |
1175 | ||
093c0257 | 1176 | (autoload 'cl-subst-if-not "cl-seq" "\ |
d1b8746d SM |
1177 | Substitute NEW for elts not matching PREDICATE in TREE (non-destructively). |
1178 | Return a copy of TREE with all non-matching elements replaced by NEW. | |
1179 | ||
1180 | Keywords supported: :key | |
1181 | ||
1182 | \(fn NEW PREDICATE TREE [KEYWORD VALUE]...)" nil nil) | |
1183 | ||
093c0257 | 1184 | (autoload 'cl-nsubst "cl-seq" "\ |
d1b8746d SM |
1185 | Substitute NEW for OLD everywhere in TREE (destructively). |
1186 | Any element of TREE which is `eql' to OLD is changed to NEW (via a call | |
1187 | to `setcar'). | |
1188 | ||
1189 | Keywords supported: :test :test-not :key | |
1190 | ||
1191 | \(fn NEW OLD TREE [KEYWORD VALUE]...)" nil nil) | |
1192 | ||
093c0257 | 1193 | (autoload 'cl-nsubst-if "cl-seq" "\ |
d1b8746d SM |
1194 | Substitute NEW for elements matching PREDICATE in TREE (destructively). |
1195 | Any element of TREE which matches is changed to NEW (via a call to `setcar'). | |
1196 | ||
1197 | Keywords supported: :key | |
1198 | ||
1199 | \(fn NEW PREDICATE TREE [KEYWORD VALUE]...)" nil nil) | |
1200 | ||
093c0257 | 1201 | (autoload 'cl-nsubst-if-not "cl-seq" "\ |
d1b8746d SM |
1202 | Substitute NEW for elements not matching PREDICATE in TREE (destructively). |
1203 | Any element of TREE which matches is changed to NEW (via a call to `setcar'). | |
1204 | ||
1205 | Keywords supported: :key | |
1206 | ||
1207 | \(fn NEW PREDICATE TREE [KEYWORD VALUE]...)" nil nil) | |
1208 | ||
093c0257 | 1209 | (autoload 'cl-sublis "cl-seq" "\ |
d1b8746d SM |
1210 | Perform substitutions indicated by ALIST in TREE (non-destructively). |
1211 | Return a copy of TREE with all matching elements replaced. | |
1212 | ||
1213 | Keywords supported: :test :test-not :key | |
1214 | ||
1215 | \(fn ALIST TREE [KEYWORD VALUE]...)" nil nil) | |
1216 | ||
093c0257 | 1217 | (autoload 'cl-nsublis "cl-seq" "\ |
d1b8746d SM |
1218 | Perform substitutions indicated by ALIST in TREE (destructively). |
1219 | Any matching element of TREE is changed via a call to `setcar'. | |
1220 | ||
1221 | Keywords supported: :test :test-not :key | |
1222 | ||
1223 | \(fn ALIST TREE [KEYWORD VALUE]...)" nil nil) | |
1224 | ||
093c0257 | 1225 | (autoload 'cl-tree-equal "cl-seq" "\ |
d1b8746d SM |
1226 | Return t if trees TREE1 and TREE2 have `eql' leaves. |
1227 | Atoms are compared by `eql'; cons cells are compared recursively. | |
1228 | ||
1229 | Keywords supported: :test :test-not :key | |
1230 | ||
1231 | \(fn TREE1 TREE2 [KEYWORD VALUE]...)" nil nil) | |
1232 | ||
1233 | ;;;*** | |
1234 | \f | |
1235 | ;; Local Variables: | |
1236 | ;; version-control: never | |
1237 | ;; no-byte-compile: t | |
1238 | ;; no-update-autoloads: t | |
e97a42c1 | 1239 | ;; coding: utf-8 |
d1b8746d | 1240 | ;; End: |
d1b8746d | 1241 | ;;; cl-loaddefs.el ends here |