annotate lisp/cl/cl-autoload.el @ 172:a38aed19690b

Added tag r20-3b12 for changeset 929b76928fce
author cvs
date Mon, 13 Aug 2007 09:47:55 +0200
parents ac2d302a0011
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
0
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1 ;;; cl-autoload.el --- Generate the autoload file cl-defs.el.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
2
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
3 ;; Copyright (C) 1993 Free Software Foundation, Inc.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
4
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
5 ;; Author: Dave Gillespie <daveg@synaptics.com>, Ben Wing <wing@666.com>
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
6 ;; Version: 2.02
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
7 ;; Keywords: extensions, lisp
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
8
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
9 ;; This file is part of XEmacs.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
10
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
11 ;; XEmacs is free software; you can redistribute it and/or modify it
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
12 ;; under the terms of the GNU General Public License as published by
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
13 ;; the Free Software Foundation; either version 2, or (at your option)
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
14 ;; any later version.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
15
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
16 ;; XEmacs is distributed in the hope that it will be useful, but
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
17 ;; WITHOUT ANY WARRANTY; without even the implied warranty of
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
18 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
19 ;; General Public License for more details.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
20
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
21 ;; You should have received a copy of the GNU General Public License
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
22 ;; along with XEmacs; see the file COPYING. If not, write to the Free
2
ac2d302a0011 Import from CVS: tag r19-15b2
cvs
parents: 0
diff changeset
23 ;; Software Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
ac2d302a0011 Import from CVS: tag r19-15b2
cvs
parents: 0
diff changeset
24 ;; 02111-1307, USA.
0
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
25
2
ac2d302a0011 Import from CVS: tag r19-15b2
cvs
parents: 0
diff changeset
26 ;;; Synched up with: FSF 19.34 (cl.el).
0
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
27
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
28 ;;; Commentary:
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
29
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
30 ;;; Run this file to regenerate cl-defs.el.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
31 ;;; Make sure to first erase the old autoloads from cl-defs.el!
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
32
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
33 ;;; This file was extracted almost directly from cl.el, and the code
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
34 ;;; there was replaced with (load "cl-defs.el"). What used to happen
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
35 ;;; is that when cl.el was loaded, it set up autoloads for all of the
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
36 ;;; functions and macros in the other files. (See the commented-out
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
37 ;;; code below.) However, the doc strings didn't get properly inserted,
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
38 ;;; so the functions had no documentation, which is bad. I changed it
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
39 ;;; so that you run this only once (to generate cl-defs.el), and then
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
40 ;;; cl.el loads cl-defs.el. Note that this relies on a hacked
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
41 ;;; autoload.el (included with XEmacs 19.14 / 20.0). --ben
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
42
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
43 ;;; Autoload the other portions of the package.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
44 (mapcar (function
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
45 (lambda (set)
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
46 ; The old definition:
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
47 ; (mapcar (function
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
48 ; (lambda (func)
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
49 ; (autoload func (car set) nil nil (nth 1 set))))
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
50 ; (cddr set))))
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
51 (find-file "cl-defs.el")
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
52 (goto-char (point-max))
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
53 (generate-file-autoloads (car set) (cddr set))))
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
54 '(("cl-extra.el" nil
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
55 coerce equalp maplist mapc mapl mapcan mapcon
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
56 cl-map-keymap cl-map-keymap-recursively cl-map-intervals
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
57 cl-map-overlays cl-set-frame-visible-p cl-float-limits
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
58 gcd lcm isqrt floor* ceiling* truncate* round*
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
59 mod* rem* signum random* make-random-state random-state-p
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
60 concatenate cl-mapcar-many map some every notany
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
61 notevery revappend nreconc list-length tailp get* getf
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
62 cl-set-getf cl-do-remf make-hash-table cl-hash-lookup
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
63 cl-puthash hash-table-p
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
64 hash-table-count cl-progv-before cl-prettyexpand
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
65 cl-macroexpand-all
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
66 ;; XEmacs: removed the following:
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
67 ;; expt copy-tree subseq remprop gethash remhash clrhash maphash
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
68 ;; cl-map-keymap appeared twice
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
69 )
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
70 ("cl-seq.el" nil
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
71 reduce fill replace remq remove remove* remove-if remove-if-not
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
72 delete* delete-if delete-if-not remove-duplicates
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
73 delete-duplicates substitute substitute-if substitute-if-not
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
74 nsubstitute nsubstitute-if nsubstitute-if-not find find-if
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
75 find-if-not position position-if position-if-not count count-if
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
76 count-if-not mismatch search sort* stable-sort merge member*
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
77 member-if member-if-not cl-adjoin assoc* assoc-if assoc-if-not
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
78 rassoc* rassoc-if rassoc-if-not union nunion intersection
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
79 nintersection set-difference nset-difference set-exclusive-or
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
80 nset-exclusive-or subsetp subst-if subst-if-not nsubst nsubst-if
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
81 nsubst-if-not sublis nsublis tree-equal
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
82 ;; XEmacs: removed the following:
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
83 ;; delete rassoc
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
84 )
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
85 ("cl-macs.el" nil
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
86 gensym gentemp typep cl-do-pop get-setf-method
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
87 cl-struct-setf-expander compiler-macroexpand cl-compile-time-init)
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
88 ("cl-macs.el" t
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
89 defun* defmacro* function* destructuring-bind eval-when
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
90 load-time-value case ecase typecase etypecase
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
91 block return return-from loop do do* dolist dotimes do-symbols
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
92 do-all-symbols psetq progv flet labels macrolet symbol-macrolet
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
93 lexical-let lexical-let* multiple-value-bind multiple-value-setq
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
94 locally the declare define-setf-method defsetf define-modify-macro
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
95 setf psetf remf shiftf rotatef letf letf* callf callf2 defstruct
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
96 check-type assert ignore-errors define-compiler-macro
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
97 ;; XEmacs: removed the following:
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
98 ;; eval-when-compile
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
99 )))