Commit | Line | Data |
---|---|---|
9c0b83b7 C |
1 | (File macros.l) |
2 | (>=& macro quote list caddr cadr) | |
3 | (>= macro nreverse cond car quote list setf push cdr null do cons list* setq cdddr caddr cadr) | |
4 | (<=& macro quote list caddr cadr) | |
5 | (<= macro nreverse cond car quote list setf push cdr null do cons list* setq cdddr caddr cadr) | |
6 | (construct-list* lambda cdr null car cadr quote list cddr do reverse setq) | |
7 | (list* macro construct-list* car null cond cdr) | |
8 | (defvar macro quote list if car cddr setq cond caddr cadddr cadr) | |
9 | (if macro setf push setq reverse cddr append cons return null do car quote list cadr memq not eq =& and error <& cond length let cdr) | |
10 | (includef-if macro quote list eval cond caddr cadr) | |
11 | (include-if macro quote list eval cond caddr cadr) | |
12 | (listify macro cadr list quote cons) | |
13 | (let* macro cdr append quote cons list setq car null reverse do cddr cadr) | |
14 | (selectq macro quote nreverse cdr eq cond if car cons null liszt-internal-do mapcar setq cddr cadr) | |
15 | (caseq macro nreverse cdr list dtpr eq let car null liszt-internal-do mapcar cons quote gensym symbolp cond setq cddr cadr) | |
16 | (de-compose lambda cdr car de-compose nconc quote apply cons ncons atom null cond) | |
17 | (let macro rplacd list mapcar mapcan nreverse cdar do cdr quote de-compose append gensym cons atom cond car null setq liszt-internal-do mapc cddr cadr) | |
18 | (pop macro quote list car cddr setq cond caddr cadr) | |
19 | (push macro quote list caddr cadr) | |
20 | (g00439::args lambda cadr quote list) | |
21 | (g00433::arg lambda cadr quote list) | |
22 | (g00427::symeval lambda cadr quote list) | |
23 | (g00421::plist lambda cadr quote list) | |
24 | (g00415::get lambda caddr cadr quote list) | |
25 | (g00409::arraycall lambda quote list) | |
26 | (g00403::nthcdr lambda caddr cadr quote list) | |
27 | (g00397::nthelem lambda caddr cadr quote list) | |
28 | (g00391::nth lambda caddr cadr quote list) | |
29 | (g00385::vrefi-long lambda caddr cadr quote list) | |
30 | (g00379::vrefi-word lambda caddr cadr quote list) | |
31 | (g00373::vrefi-byte lambda caddr cadr quote list) | |
32 | (g00367::vref lambda caddr cadr quote list) | |
33 | (g00361::cxr lambda caddr cadr quote list) | |
34 | (g00355::cddr lambda cadr quote list) | |
35 | (g00349::cdar lambda cadr quote list) | |
36 | (g00343::cdr lambda cadr quote list) | |
37 | (g00337::cadr lambda cadr quote list) | |
38 | (g00331::caar lambda cadr quote list) | |
39 | (g00325::car lambda cadr quote list) | |
40 | (defsetf macro cons quote list cdddr caddr cadr) | |
41 | (setf-record-package-access-check lambda list cdaddaddar rplaca caddr setq copy cadr quote eq car dtpr and cond) | |
42 | (setf-check-cad+r lambda return memq not append implode ascii concat cons quote list eval setq null do car exploden cdr nreverse let getcharn eq cond if) | |
43 | (setf macro getdisc bcdp eq cxr getd setf-check-cad+r append cons apply get return setf-record-package-access-check setq car dtpr and do list quote error symbolp or atom cond cdddr caddr cadr) | |
44 | (defcmacro macro cddr append cons quote list gensym cadr concat let) | |
45 | (lambdacvt lambda rplacd ncons mapcan nconc return append let cadddr cdddr caddr liszt-internal-do mapcar gensym or + length nreverse |1+| cdr cadr atom error list cons eq |1-| quote memq cond setq null car do prog) | |
46 | (defmcrooption lambda cdr defmcrooption caddar append quote concatl cadar list cons caar setq atom cadr defmcrosrch car memq null cond) | |
47 | (defmcrosrch lambda nreverse list liszt-internal-do mapcar ncons setq cdr defmcrooption eq cddr cadr defmcrosrch car memq append quote concatl cons atom null cond) | |
48 | (defmacro macro caar dtpr ncons cdddr eval cadddr cond append nreverse car cdr null liszt-internal-do mapcar cons cadr list quote caddr defmcrosrch setq) |