Commit | Line | Data |
---|---|---|
c1009b56 TL |
1 | $pr$ complra.l ?^(def $pr$ $? |
2 | $pr$ complrc.l ?^(def $pr$ (macro (x) `(patom ,(cadr x) compout)))$? | |
3 | $pr$ compmacs.l ?^(def $pr$ (macro (x) `(patom ,(cadr x) compout)))$? | |
4 | $terpri complra.l ?^(def $terpri (lambda () (terpr compout)))$? | |
5 | '= complrd.l ?^(defsysf '= '_Lequal)$? | |
6 | '> complrd.l ?^(defsysf '> '_Lgreaterp)$? | |
7 | 'add complrd.l ?^(defsysf 'add '_Ladd)$? | |
8 | 'add1 complrd.l ?^(defsysf 'add1 '_Ladd1)$? | |
9 | 'concat complrd.l ?^(defsysf 'concat '_Lconcat)$? | |
10 | 'cons complrd.l ?^(defsysf 'cons '_Lcons)$? | |
11 | 'difference complrd.l ?^(defsysf 'difference '_Lsub)$? | |
12 | 'get complrd.l ?^(defsysf 'get '_Lget)$? | |
13 | 'list complrd.l ?^(defsysf 'list '_Llist)$? | |
14 | 'mapc complrd.l ?^(defsysf 'mapc '_Lmapc)$? | |
15 | 'mapcan complrd.l ?^(defsysf 'mapcan '_Lmapcan)$? | |
16 | 'minus complrd.l ?^(defsysf 'minus '_Lminus)$? | |
17 | 'patom complrd.l ?^(defsysf 'patom '_Lpatom)$? | |
18 | 'plist complrd.l ?^(defsysf 'plist '_Lplist)$? | |
19 | 'plus complrd.l ?^(defsysf 'plus '_Ladd)$? | |
20 | 'print complrd.l ?^(defsysf 'print '_Lprint)$? | |
21 | 'putprop complrd.l ?^(defsysf 'putprop '_Lputprop)$? | |
22 | 'read complrd.l ?^(defsysf 'read '_Lread)$? | |
23 | 'sub1 complrd.l ?^(defsysf 'sub1 '_Lsub1)$? | |
24 | 'times complrd.l ?^(defsysf 'times '_Ltimes)$? | |
25 | *expr complrb.l ?^(def *expr (nlambda (args) nil)) ; ignore$? | |
26 | *fexpr complrb.l ?^(def *fexpr$? | |
27 | append complra.l ?^(def append (lambda (x y)$? | |
28 | aprint complra.l ?^(def aprint $? | |
29 | assoc complra.l ?^(def assoc$? | |
30 | chain complra.l ?^(def chain $? | |
31 | cleanup complra.l ?^(def cleanup (lambda nil$? | |
32 | cm-alist complrb.l ?^(def cm-alist$? | |
33 | cm-alst1 complrb.l ?^(def cm-alst1$? | |
34 | cm-alst2 complrb.l ?^(def cm-alst2$? | |
35 | cm-alst3 complrb.l ?^(def cm-alst3$? | |
36 | cm-alst4 complrb.l ?^(def cm-alst4$? | |
37 | cm-bind complrb.l ?^(def cm-bind$? | |
38 | cm-emit complrb.l ?^(def cm-emit $? | |
39 | cmacroexpand complrb.l ?^(def cmacroexpand$? | |
40 | comp-err compmacs.l ?^(def comp-err$? | |
41 | comp-note compmacs.l ?^(def comp-note$? | |
42 | comp-warn compmacs.l ?^(def comp-warn$? | |
43 | cvt complra.l ?^(def cvt (lambda (a)$? | |
44 | defsysf complra.l ?^(def defsysf$? | |
45 | dodcl complrb.l ?^(def dodcl $? | |
46 | dodef complrb.l ?^(def dodef$? | |
47 | e-*throw complrd.l ?^(def e-*throw$? | |
48 | e-addr complrd.l ?^(def e-addr $? | |
49 | e-alist complrd.l ?^(def e-alist$? | |
50 | e-arg complrd.l ?^(def e-arg$? | |
51 | e-begin complrd.l ?^(def e-begin $? | |
52 | e-bind complrd.l ?^(def e-bind $? | |
53 | e-call complrd.l ?^(def e-call $? | |
54 | e-catchent complrd.l ?^(def e-catchent$? | |
55 | e-catchexit complrd.l ?^(def e-catchexit$? | |
56 | e-chain complrd.l ?^(def e-chain $? | |
57 | e-dopop complrd.l ?^(def e-dopop $? | |
58 | e-drop complrd.l ?^(def e-drop $? | |
59 | e-end complrd.l ?^(def e-end$? | |
60 | e-entry complrd.l ?^(def e-entry$? | |
61 | e-eq complrd.l ?^(def e-eq$? | |
62 | e-eqs complrd.l ?^(def e-eqs $? | |
63 | e-eqv complrd.l ?^(def e-eqv $? | |
64 | e-false complrd.l ?^(def e-false $? | |
65 | e-fini complrd.l ?^(def e-fini$? | |
66 | e-fpush complrd.l ?^(def e-fpush $? | |
67 | e-get complrd.l ?^(def e-get $? | |
68 | e-getype complrd.l ?^(def e-getype $? | |
69 | e-gfpush complrd.l ?^(def e-gfpush$? | |
70 | e-go complrd.l ?^(def e-go $? | |
71 | e-gpush complrd.l ?^(def e-gpush $? | |
72 | e-have complrd.l ?^(def e-have $? | |
73 | e-label complrd.l ?^(def e-label $? | |
74 | e-list complrd.l ?^(def e-list (lambda nil nil)) $? | |
75 | e-lose complrd.l ?^(def e-lose $? | |
76 | e-mark complrd.l ?^(def e-mark $? | |
77 | e-minus complrd.l ?^(def e-minus $? | |
78 | e-note complrd.l ?^(def e-note $? | |
79 | e-push complrd.l ?^(def e-push $? | |
80 | e-pushnil complrd.l ?^(def e-pushnil$? | |
81 | e-pushnoreg complrd.l ?^(def e-pushnoreg$? | |
82 | e-reg complrd.l ?^(def e-reg $? | |
83 | e-repeat complrd.l ?^(def e-repeat $? | |
84 | e-save complrd.l ?^(def e-save$? | |
85 | e-set complrd.l ?^(def e-set $? | |
86 | e-seta complrd.l ?^(def e-seta $? | |
87 | e-setas complrd.l ?^(def e-setas $? | |
88 | e-setd complrd.l ?^(def e-setd $? | |
89 | e-setds complrd.l ?^(def e-setds $? | |
90 | e-setnoreg complrd.l ?^(def e-setnoreg$? | |
91 | e-skip complrd.l ?^(def e-skip $? | |
92 | e-true complrd.l ?^(def e-true $? | |
93 | e-type complrd.l ?^(def e-type$? | |
94 | e-unbind complrd.l ?^(def e-unbind$? | |
95 | e-unsave complrd.l ?^(def e-unsave$? | |
96 | e-xbind complrd.l ?^(def e-xbind$? | |
97 | emit1 complra.l ?^(def emit1 $? | |
98 | emit2 complra.l ?^(def emit2 $? | |
99 | emit3 complra.l ?^(def emit3 $? | |
100 | emit4 complra.l ?^(def emit4 $? | |
101 | f-*catch complrc.l ?^(def f-*catch$? | |
102 | f-*throw complrc.l ?^(def f-*throw$? | |
103 | f-addi complrc.l ?^(def f-addi $? | |
104 | f-all complrc.l ?^(def f-all $? | |
105 | f-and complrc.l ?^(def f-and $? | |
106 | f-aor complrc.l ?^(def f-aor $? | |
107 | f-arg complrc.l ?^(def f-arg$? | |
108 | f-atom complrc.l ?^(def f-atom $? | |
109 | f-bcdp complrc.l ?^(def f-bcdp $? | |
110 | f-chop complrc.l ?^(def f-chop $? | |
111 | f-con complrc.l ?^(def f-con $? | |
112 | f-cond complrc.l ?^(def f-cond $? | |
113 | f-do complrc.l ?^(def f-do$? | |
114 | f-dobody complrc.l ?^(def f-dobody$? | |
115 | f-domap complrc.l ?^(def f-domap$? | |
116 | f-dtpr complrc.l ?^(def f-dtpr $? | |
117 | f-endbody complrc.l ?^(def f-endbody$? | |
118 | f-endtest complrc.l ?^(def f-endtest$? | |
119 | f-eq complrc.l ?^(def f-eq $? | |
120 | f-errset complrc.l ?^(def f-errset$? | |
121 | f-exp complrb.l ?^(def f-exp $? | |
122 | f-func complrb.l ?^(def f-func $? | |
123 | f-go complrc.l ?^(def f-go $? | |
124 | f-if complrc.l ?^(def f-if $? | |
125 | f-inits complrc.l ?^(def f-inits$? | |
126 | f-initv complrc.l ?^(def f-initv$? | |
127 | f-iter complrc.l ?^(def f-iter$? | |
128 | f-labl complrc.l ?^(def f-labl $? | |
129 | f-lambbody complrb.l ?^(def f-lambbody$? | |
130 | f-lambexp complrb.l ?^(def f-lambexp$? | |
131 | f-leap complrc.l ?^(def f-leap $? | |
132 | f-like complrc.l ?^(def f-like $? | |
133 | f-make complrc.l ?^(def f-make $? | |
134 | f-map complrc.l ?^(def f-map$? | |
135 | f-mapc complrc.l ?^(def f-mapc$? | |
136 | f-mapcar complrc.l ?^(def f-mapcar$? | |
137 | f-maplist complrc.l ?^(def f-maplist$? | |
138 | f-nice complrc.l ?^(def f-nice $? | |
139 | f-null complrc.l ?^(def f-null $? | |
140 | f-numberp complrc.l ?^(def f-numberp $? | |
141 | f-one complrc.l ?^(def f-one $? | |
142 | f-or complrc.l ?^(def f-or $? | |
143 | f-plist complrc.l ?^(def f-plist $? | |
144 | f-prog complrb.l ?^(def f-prog$? | |
145 | f-pusha complrc.l ?^(def f-pusha$? | |
146 | f-quote complrc.l ?^(def f-quote $? | |
147 | f-reg complrc.l ?^(def f-reg $? | |
148 | f-repl complrc.l ?^(def f-repl $? | |
149 | f-reps complrc.l ?^(def f-reps$? | |
150 | f-repv complrc.l ?^(def f-repv$? | |
151 | f-return complrc.l ?^(def f-return$? | |
152 | f-rplaca complrc.l ?^(def f-rplaca $? | |
153 | f-rplacd complrc.l ?^(def f-rplacd $? | |
154 | f-seq complrc.l ?^(def f-seq$? | |
155 | f-seqp complrc.l ?^(def f-seqp $? | |
156 | f-setq complrc.l ?^(def f-setq $? | |
157 | f-stringp complrc.l ?^(def f-stringp $? | |
158 | f-swap complrc.l ?^(def f-swap $? | |
159 | f-symbolp complrc.l ?^(def f-symbolp $? | |
160 | f-test complrc.l ?^(def f-test $? | |
161 | f-tfo complrc.l ?^(def f-tfo $? | |
162 | f-ty complrc.l ?^(def f-ty $? | |
163 | f-type complrc.l ?^(def f-type $? | |
164 | f-use complrc.l ?^(def f-use$? | |
165 | f-vble complrc.l ?^(def f-vble $? | |
166 | f-xgo complrc.l ?^(def f-xgo $? | |
167 | f-xreturn complrc.l ?^(def f-xreturn $? | |
168 | f-xval complrc.l ?^(def f-xval $? | |
169 | f-zerop complrc.l ?^(def f-zerop $? | |
170 | flag complra.l ?^(def flag $? | |
171 | g-specialchk complrb.l ?^(def g-specialchk$? | |
172 | gensym complra.l ?^(def Gensym (lambda (x)$? | |
173 | ifflag complra.l ?^(def ifflag $? | |
174 | ismacro complra.l ?^(def ismacro $? | |
175 | isnlam complra.l ?^(def isnlam $? | |
176 | lcf complrb.l ?^(def lcf$? | |
177 | lcfform complrb.l ?^(def lcfform$? | |
178 | lcfinit complrb.l ?^(def lcfinit$? | |
179 | leftshift complra.l ?^(def leftshift $? | |
180 | macros complrb.l ?^(def macros (nlambda (args) (setq macros (car args))))$? | |
181 | mapconvert complrc.l ?^(def mapconvert$? | |
182 | member complra.l ?^(def member (lambda ($a$ $l$)$? | |
183 | mylogor complra.l ?^(def mylogor (lambda (x y)$? | |
184 | nth complra.l ?^(def nth$? | |
185 | olddo-to-newdo complrc.l ?^(def olddo-to-newdo$? | |
186 | prog2toprog complrc.l ?^(def prog2toprog$? | |
187 | put complra.l ?^(def put $? | |
188 | put complrc.l ?^(def put $? | |
189 | put compmacs.l ?^(def put $? | |
190 | reverse complra.l ?^(def reverse (lambda (x)$? | |
191 | reverse1 complra.l ?^(def reverse1 $? | |
192 | special complrb.l ?^(def special$? | |
193 | ucar complra.l ?^(def ucar $? | |
194 | unflag complra.l ?^(def unflag $? | |
195 | unspecial complrb.l ?^(def unspecial$? | |
196 | w-save complrb.l ?^(def w-save$? | |
197 | w-unsave complrb.l ?^(def w-unsave$? |