aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorGlenn Morris2008-01-12 23:48:35 +0000
committerGlenn Morris2008-01-12 23:48:35 +0000
commit5c4133cb507d82f6f20542e9751e5343744afe73 (patch)
tree3fd4971d0c235444e5ac9489358e7565228d9de8
parent1e1cbbbff99d787ae8c558d5ae627ffff46aced6 (diff)
downloademacs-5c4133cb507d82f6f20542e9751e5343744afe73.tar.gz
emacs-5c4133cb507d82f6f20542e9751e5343744afe73.zip
Regenerate.
-rw-r--r--lisp/emacs-lisp/cl-loaddefs.el114
1 files changed, 57 insertions, 57 deletions
diff --git a/lisp/emacs-lisp/cl-loaddefs.el b/lisp/emacs-lisp/cl-loaddefs.el
index e47247557d0..bfc711478da 100644
--- a/lisp/emacs-lisp/cl-loaddefs.el
+++ b/lisp/emacs-lisp/cl-loaddefs.el
@@ -10,16 +10,16 @@
10;;;;;; ceiling* floor* isqrt lcm gcd cl-progv-before cl-set-frame-visible-p 10;;;;;; ceiling* floor* isqrt lcm gcd cl-progv-before cl-set-frame-visible-p
11;;;;;; cl-map-overlays cl-map-intervals cl-map-keymap-recursively 11;;;;;; cl-map-overlays cl-map-intervals cl-map-keymap-recursively
12;;;;;; notevery notany every some mapcon mapcan mapl maplist map 12;;;;;; notevery notany every some mapcon mapcan mapl maplist map
13;;;;;; cl-mapcar-many equalp coerce) "cl-extra" "cl-extra.el" "53c2b3ede19dac62cff13a37f58cdf9c") 13;;;;;; cl-mapcar-many equalp coerce) "cl-extra" "cl-extra.el" "2f89c94c42629315419a9d7404469c42")
14;;; Generated autoloads from cl-extra.el 14;;; Generated autoloads from cl-extra.el
15 15
16(autoload (quote coerce) "cl-extra" "\ 16(autoload 'coerce "cl-extra" "\
17Coerce OBJECT to type TYPE. 17Coerce OBJECT to type TYPE.
18TYPE is a Common Lisp type specifier. 18TYPE is a Common Lisp type specifier.
19 19
20\(fn OBJECT TYPE)" nil nil) 20\(fn OBJECT TYPE)" nil nil)
21 21
22(autoload (quote equalp) "cl-extra" "\ 22(autoload 'equalp "cl-extra" "\
23Return t if two Lisp objects have similar structures and contents. 23Return t if two Lisp objects have similar structures and contents.
24This is like `equal', except that it accepts numerically equal 24This is like `equal', except that it accepts numerically equal
25numbers of different types (float vs. integer), and also compares 25numbers of different types (float vs. integer), and also compares
@@ -27,246 +27,246 @@ strings case-insensitively.
27 27
28\(fn X Y)" nil nil) 28\(fn X Y)" nil nil)
29 29
30(autoload (quote cl-mapcar-many) "cl-extra" "\ 30(autoload 'cl-mapcar-many "cl-extra" "\
31Not documented 31Not documented
32 32
33\(fn CL-FUNC CL-SEQS)" nil nil) 33\(fn CL-FUNC CL-SEQS)" nil nil)
34 34
35(autoload (quote map) "cl-extra" "\ 35(autoload 'map "cl-extra" "\
36Map a FUNCTION across one or more SEQUENCEs, returning a sequence. 36Map a FUNCTION across one or more SEQUENCEs, returning a sequence.
37TYPE is the sequence type to return. 37TYPE is the sequence type to return.
38 38
39\(fn TYPE FUNCTION SEQUENCE...)" nil nil) 39\(fn TYPE FUNCTION SEQUENCE...)" nil nil)
40 40
41(autoload (quote maplist) "cl-extra" "\ 41(autoload 'maplist "cl-extra" "\
42Map FUNCTION to each sublist of LIST or LISTs. 42Map FUNCTION to each sublist of LIST or LISTs.
43Like `mapcar', except applies to lists and their cdr's rather than to 43Like `mapcar', except applies to lists and their cdr's rather than to
44the elements themselves. 44the elements themselves.
45 45
46\(fn FUNCTION LIST...)" nil nil) 46\(fn FUNCTION LIST...)" nil nil)
47 47
48(autoload (quote mapl) "cl-extra" "\ 48(autoload 'mapl "cl-extra" "\
49Like `maplist', but does not accumulate values returned by the function. 49Like `maplist', but does not accumulate values returned by the function.
50 50
51\(fn FUNCTION LIST...)" nil nil) 51\(fn FUNCTION LIST...)" nil nil)
52 52
53(autoload (quote mapcan) "cl-extra" "\ 53(autoload 'mapcan "cl-extra" "\
54Like `mapcar', but nconc's together the values returned by the function. 54Like `mapcar', but nconc's together the values returned by the function.
55 55
56\(fn FUNCTION SEQUENCE...)" nil nil) 56\(fn FUNCTION SEQUENCE...)" nil nil)
57 57
58(autoload (quote mapcon) "cl-extra" "\ 58(autoload 'mapcon "cl-extra" "\
59Like `maplist', but nconc's together the values returned by the function. 59Like `maplist', but nconc's together the values returned by the function.
60 60
61\(fn FUNCTION LIST...)" nil nil) 61\(fn FUNCTION LIST...)" nil nil)
62 62
63(autoload (quote some) "cl-extra" "\ 63(autoload 'some "cl-extra" "\
64Return true if PREDICATE is true of any element of SEQ or SEQs. 64Return true if PREDICATE is true of any element of SEQ or SEQs.
65If so, return the true (non-nil) value returned by PREDICATE. 65If so, return the true (non-nil) value returned by PREDICATE.
66 66
67\(fn PREDICATE SEQ...)" nil nil) 67\(fn PREDICATE SEQ...)" nil nil)
68 68
69(autoload (quote every) "cl-extra" "\ 69(autoload 'every "cl-extra" "\
70Return true if PREDICATE is true of every element of SEQ or SEQs. 70Return true if PREDICATE is true of every element of SEQ or SEQs.
71 71
72\(fn PREDICATE SEQ...)" nil nil) 72\(fn PREDICATE SEQ...)" nil nil)
73 73
74(autoload (quote notany) "cl-extra" "\ 74(autoload 'notany "cl-extra" "\
75Return true if PREDICATE is false of every element of SEQ or SEQs. 75Return true if PREDICATE is false of every element of SEQ or SEQs.
76 76
77\(fn PREDICATE SEQ...)" nil nil) 77\(fn PREDICATE SEQ...)" nil nil)
78 78
79(autoload (quote notevery) "cl-extra" "\ 79(autoload 'notevery "cl-extra" "\
80Return true if PREDICATE is false of some element of SEQ or SEQs. 80Return true if PREDICATE is false of some element of SEQ or SEQs.
81 81
82\(fn PREDICATE SEQ...)" nil nil) 82\(fn PREDICATE SEQ...)" nil nil)
83 83
84(defalias (quote cl-map-keymap) (quote map-keymap)) 84(defalias 'cl-map-keymap 'map-keymap)
85 85
86(autoload (quote cl-map-keymap-recursively) "cl-extra" "\ 86(autoload 'cl-map-keymap-recursively "cl-extra" "\
87Not documented 87Not documented
88 88
89\(fn CL-FUNC-REC CL-MAP &optional CL-BASE)" nil nil) 89\(fn CL-FUNC-REC CL-MAP &optional CL-BASE)" nil nil)
90 90
91(autoload (quote cl-map-intervals) "cl-extra" "\ 91(autoload 'cl-map-intervals "cl-extra" "\
92Not documented 92Not documented
93 93
94\(fn CL-FUNC &optional CL-WHAT CL-PROP CL-START CL-END)" nil nil) 94\(fn CL-FUNC &optional CL-WHAT CL-PROP CL-START CL-END)" nil nil)
95 95
96(autoload (quote cl-map-overlays) "cl-extra" "\ 96(autoload 'cl-map-overlays "cl-extra" "\
97Not documented 97Not documented
98 98
99\(fn CL-FUNC &optional CL-BUFFER CL-START CL-END CL-ARG)" nil nil) 99\(fn CL-FUNC &optional CL-BUFFER CL-START CL-END CL-ARG)" nil nil)
100 100
101(autoload (quote cl-set-frame-visible-p) "cl-extra" "\ 101(autoload 'cl-set-frame-visible-p "cl-extra" "\
102Not documented 102Not documented
103 103
104\(fn FRAME VAL)" nil nil) 104\(fn FRAME VAL)" nil nil)
105 105
106(autoload (quote cl-progv-before) "cl-extra" "\ 106(autoload 'cl-progv-before "cl-extra" "\
107Not documented 107Not documented
108 108
109\(fn SYMS VALUES)" nil nil) 109\(fn SYMS VALUES)" nil nil)
110 110
111(autoload (quote gcd) "cl-extra" "\ 111(autoload 'gcd "cl-extra" "\
112Return the greatest common divisor of the arguments. 112Return the greatest common divisor of the arguments.
113 113
114\(fn &rest ARGS)" nil nil) 114\(fn &rest ARGS)" nil nil)
115 115
116(autoload (quote lcm) "cl-extra" "\ 116(autoload 'lcm "cl-extra" "\
117Return the least common multiple of the arguments. 117Return the least common multiple of the arguments.
118 118
119\(fn &rest ARGS)" nil nil) 119\(fn &rest ARGS)" nil nil)
120 120
121(autoload (quote isqrt) "cl-extra" "\ 121(autoload 'isqrt "cl-extra" "\
122Return the integer square root of the argument. 122Return the integer square root of the argument.
123 123
124\(fn X)" nil nil) 124\(fn X)" nil nil)
125 125
126(autoload (quote floor*) "cl-extra" "\ 126(autoload 'floor* "cl-extra" "\
127Return a list of the floor of X and the fractional part of X. 127Return a list of the floor of X and the fractional part of X.
128With two arguments, return floor and remainder of their quotient. 128With two arguments, return floor and remainder of their quotient.
129 129
130\(fn X &optional Y)" nil nil) 130\(fn X &optional Y)" nil nil)
131 131
132(autoload (quote ceiling*) "cl-extra" "\ 132(autoload 'ceiling* "cl-extra" "\
133Return a list of the ceiling of X and the fractional part of X. 133Return a list of the ceiling of X and the fractional part of X.
134With two arguments, return ceiling and remainder of their quotient. 134With two arguments, return ceiling and remainder of their quotient.
135 135
136\(fn X &optional Y)" nil nil) 136\(fn X &optional Y)" nil nil)
137 137
138(autoload (quote truncate*) "cl-extra" "\ 138(autoload 'truncate* "cl-extra" "\
139Return a list of the integer part of X and the fractional part of X. 139Return a list of the integer part of X and the fractional part of X.
140With two arguments, return truncation and remainder of their quotient. 140With two arguments, return truncation and remainder of their quotient.
141 141
142\(fn X &optional Y)" nil nil) 142\(fn X &optional Y)" nil nil)
143 143
144(autoload (quote round*) "cl-extra" "\ 144(autoload 'round* "cl-extra" "\
145Return a list of X rounded to the nearest integer and the remainder. 145Return a list of X rounded to the nearest integer and the remainder.
146With two arguments, return rounding and remainder of their quotient. 146With two arguments, return rounding and remainder of their quotient.
147 147
148\(fn X &optional Y)" nil nil) 148\(fn X &optional Y)" nil nil)
149 149
150(autoload (quote mod*) "cl-extra" "\ 150(autoload 'mod* "cl-extra" "\
151The remainder of X divided by Y, with the same sign as Y. 151The remainder of X divided by Y, with the same sign as Y.
152 152
153\(fn X Y)" nil nil) 153\(fn X Y)" nil nil)
154 154
155(autoload (quote rem*) "cl-extra" "\ 155(autoload 'rem* "cl-extra" "\
156The remainder of X divided by Y, with the same sign as X. 156The remainder of X divided by Y, with the same sign as X.
157 157
158\(fn X Y)" nil nil) 158\(fn X Y)" nil nil)
159 159
160(autoload (quote signum) "cl-extra" "\ 160(autoload 'signum "cl-extra" "\
161Return 1 if X is positive, -1 if negative, 0 if zero. 161Return 1 if X is positive, -1 if negative, 0 if zero.
162 162
163\(fn X)" nil nil) 163\(fn X)" nil nil)
164 164
165(autoload (quote random*) "cl-extra" "\ 165(autoload 'random* "cl-extra" "\
166Return a random nonnegative number less than LIM, an integer or float. 166Return a random nonnegative number less than LIM, an integer or float.
167Optional second arg STATE is a random-state object. 167Optional second arg STATE is a random-state object.
168 168
169\(fn LIM &optional STATE)" nil nil) 169\(fn LIM &optional STATE)" nil nil)
170 170
171(autoload (quote make-random-state) "cl-extra" "\ 171(autoload 'make-random-state "cl-extra" "\
172Return a copy of random-state STATE, or of `*random-state*' if omitted. 172Return a copy of random-state STATE, or of `*random-state*' if omitted.
173If STATE is t, return a new state object seeded from the time of day. 173If STATE is t, return a new state object seeded from the time of day.
174 174
175\(fn &optional STATE)" nil nil) 175\(fn &optional STATE)" nil nil)
176 176
177(autoload (quote random-state-p) "cl-extra" "\ 177(autoload 'random-state-p "cl-extra" "\
178Return t if OBJECT is a random-state object. 178Return t if OBJECT is a random-state object.
179 179
180\(fn OBJECT)" nil nil) 180\(fn OBJECT)" nil nil)
181 181
182(autoload (quote cl-float-limits) "cl-extra" "\ 182(autoload 'cl-float-limits "cl-extra" "\
183Not documented 183Not documented
184 184
185\(fn)" nil nil) 185\(fn)" nil nil)
186 186
187(autoload (quote subseq) "cl-extra" "\ 187(autoload 'subseq "cl-extra" "\
188Return the subsequence of SEQ from START to END. 188Return the subsequence of SEQ from START to END.
189If END is omitted, it defaults to the length of the sequence. 189If END is omitted, it defaults to the length of the sequence.
190If START or END is negative, it counts from the end. 190If START or END is negative, it counts from the end.
191 191
192\(fn SEQ START &optional END)" nil nil) 192\(fn SEQ START &optional END)" nil nil)
193 193
194(autoload (quote concatenate) "cl-extra" "\ 194(autoload 'concatenate "cl-extra" "\
195Concatenate, into a sequence of type TYPE, the argument SEQUENCEs. 195Concatenate, into a sequence of type TYPE, the argument SEQUENCEs.
196 196
197\(fn TYPE SEQUENCE...)" nil nil) 197\(fn TYPE SEQUENCE...)" nil nil)
198 198
199(autoload (quote revappend) "cl-extra" "\ 199(autoload 'revappend "cl-extra" "\
200Equivalent to (append (reverse X) Y). 200Equivalent to (append (reverse X) Y).
201 201
202\(fn X Y)" nil nil) 202\(fn X Y)" nil nil)
203 203
204(autoload (quote nreconc) "cl-extra" "\ 204(autoload 'nreconc "cl-extra" "\
205Equivalent to (nconc (nreverse X) Y). 205Equivalent to (nconc (nreverse X) Y).
206 206
207\(fn X Y)" nil nil) 207\(fn X Y)" nil nil)
208 208
209(autoload (quote list-length) "cl-extra" "\ 209(autoload 'list-length "cl-extra" "\
210Return the length of list X. Return nil if list is circular. 210Return the length of list X. Return nil if list is circular.
211 211
212\(fn X)" nil nil) 212\(fn X)" nil nil)
213 213
214(autoload (quote tailp) "cl-extra" "\ 214(autoload 'tailp "cl-extra" "\
215Return true if SUBLIST is a tail of LIST. 215Return true if SUBLIST is a tail of LIST.
216 216
217\(fn SUBLIST LIST)" nil nil) 217\(fn SUBLIST LIST)" nil nil)
218 218
219(autoload (quote get*) "cl-extra" "\ 219(autoload 'get* "cl-extra" "\
220Return the value of SYMBOL's PROPNAME property, or DEFAULT if none. 220Return the value of SYMBOL's PROPNAME property, or DEFAULT if none.
221 221
222\(fn SYMBOL PROPNAME &optional DEFAULT)" nil nil) 222\(fn SYMBOL PROPNAME &optional DEFAULT)" nil nil)
223 223
224(autoload (quote getf) "cl-extra" "\ 224(autoload 'getf "cl-extra" "\
225Search PROPLIST for property PROPNAME; return its value or DEFAULT. 225Search PROPLIST for property PROPNAME; return its value or DEFAULT.
226PROPLIST is a list of the sort returned by `symbol-plist'. 226PROPLIST is a list of the sort returned by `symbol-plist'.
227 227
228\(fn PROPLIST PROPNAME &optional DEFAULT)" nil nil) 228\(fn PROPLIST PROPNAME &optional DEFAULT)" nil nil)
229 229
230(autoload (quote cl-set-getf) "cl-extra" "\ 230(autoload 'cl-set-getf "cl-extra" "\
231Not documented 231Not documented
232 232
233\(fn PLIST TAG VAL)" nil nil) 233\(fn PLIST TAG VAL)" nil nil)
234 234
235(autoload (quote cl-do-remf) "cl-extra" "\ 235(autoload 'cl-do-remf "cl-extra" "\
236Not documented 236Not documented
237 237
238\(fn PLIST TAG)" nil nil) 238\(fn PLIST TAG)" nil nil)
239 239
240(autoload (quote cl-remprop) "cl-extra" "\ 240(autoload 'cl-remprop "cl-extra" "\
241Remove from SYMBOL's plist the property PROPNAME and its value. 241Remove from SYMBOL's plist the property PROPNAME and its value.
242 242
243\(fn SYMBOL PROPNAME)" nil nil) 243\(fn SYMBOL PROPNAME)" nil nil)
244 244
245(defalias (quote remprop) (quote cl-remprop)) 245(defalias 'remprop 'cl-remprop)
246 246
247(defalias (quote cl-gethash) (quote gethash)) 247(defalias 'cl-gethash 'gethash)
248 248
249(defalias (quote cl-puthash) (quote puthash)) 249(defalias 'cl-puthash 'puthash)
250 250
251(defalias (quote cl-remhash) (quote remhash)) 251(defalias 'cl-remhash 'remhash)
252 252
253(defalias (quote cl-clrhash) (quote clrhash)) 253(defalias 'cl-clrhash 'clrhash)
254 254
255(defalias (quote cl-maphash) (quote maphash)) 255(defalias 'cl-maphash 'maphash)
256 256
257(defalias (quote cl-make-hash-table) (quote make-hash-table)) 257(defalias 'cl-make-hash-table 'make-hash-table)
258 258
259(defalias (quote cl-hash-table-p) (quote hash-table-p)) 259(defalias 'cl-hash-table-p 'hash-table-p)
260 260
261(defalias (quote cl-hash-table-count) (quote hash-table-count)) 261(defalias 'cl-hash-table-count 'hash-table-count)
262 262
263(autoload (quote cl-macroexpand-all) "cl-extra" "\ 263(autoload 'cl-macroexpand-all "cl-extra" "\
264Expand all macro calls through a Lisp FORM. 264Expand all macro calls through a Lisp FORM.
265This also does some trivial optimizations to make the form prettier. 265This also does some trivial optimizations to make the form prettier.
266 266
267\(fn FORM &optional ENV)" nil nil) 267\(fn FORM &optional ENV)" nil nil)
268 268
269(autoload (quote cl-prettyexpand) "cl-extra" "\ 269(autoload 'cl-prettyexpand "cl-extra" "\
270Not documented 270Not documented
271 271
272\(fn FORM &optional FULL)" nil nil) 272\(fn FORM &optional FULL)" nil nil)
@@ -283,7 +283,7 @@ Not documented
283;;;;;; do* do loop return-from return block etypecase typecase ecase 283;;;;;; do* do loop return-from return block etypecase typecase ecase
284;;;;;; case load-time-value eval-when destructuring-bind function* 284;;;;;; case load-time-value eval-when destructuring-bind function*
285;;;;;; defmacro* defun* gentemp gensym cl-compile-time-init) "cl-macs" 285;;;;;; defmacro* defun* gentemp gensym cl-compile-time-init) "cl-macs"
286;;;;;; "cl-macs.el" "c9b59a98f2066022e751aa5203b8d6b0") 286;;;;;; "cl-macs.el" "b75c9203d71424764cb7d91607a965eb")
287;;; Generated autoloads from cl-macs.el 287;;; Generated autoloads from cl-macs.el
288 288
289(autoload 'cl-compile-time-init "cl-macs" "\ 289(autoload 'cl-compile-time-init "cl-macs" "\
@@ -745,7 +745,7 @@ Not documented
745;;;;;; find nsubstitute-if-not nsubstitute-if nsubstitute substitute-if-not 745;;;;;; find nsubstitute-if-not nsubstitute-if nsubstitute substitute-if-not
746;;;;;; substitute-if substitute delete-duplicates remove-duplicates 746;;;;;; substitute-if substitute delete-duplicates remove-duplicates
747;;;;;; delete-if-not delete-if delete* remove-if-not remove-if remove* 747;;;;;; delete-if-not delete-if delete* remove-if-not remove-if remove*
748;;;;;; replace fill reduce) "cl-seq" "cl-seq.el" "77bee7df392948b6ab0699e391e8abc1") 748;;;;;; replace fill reduce) "cl-seq" "cl-seq.el" "e3c349e5231811c1c0482dd378dae56a")
749;;; Generated autoloads from cl-seq.el 749;;; Generated autoloads from cl-seq.el
750 750
751(autoload 'reduce "cl-seq" "\ 751(autoload 'reduce "cl-seq" "\