2 |
(IN-PACKAGE "COMPILER") |
(IN-PACKAGE "COMPILER") |
3 |
(PROCLAIM '(FTYPE (FUNCTION (T) FIXNUM) F-TYPE)) |
(PROCLAIM '(FTYPE (FUNCTION (T) FIXNUM) F-TYPE)) |
4 |
(PROCLAIM |
(PROCLAIM |
5 |
'(FTYPE (FUNCTION (T T) FIXNUM) ANALYZE-REGS PROCLAIMED-ARGD |
'(FTYPE (FUNCTION (T T) FIXNUM) PROCLAIMED-ARGD ANALYZE-REGS |
6 |
ANALYZE-REGS1)) |
ANALYZE-REGS1)) |
7 |
(PROCLAIM |
(PROCLAIM |
8 |
'(FTYPE (FUNCTION (T T T) *) WT-INLINE C2IF C2FLET C2LABELS |
'(FTYPE (FUNCTION (T T T) *) WT-INLINE C2COMPILER-LET C2IF C2FLET |
9 |
C2COMPILER-LET)) |
C2LABELS)) |
10 |
(PROCLAIM |
(PROCLAIM |
11 |
'(FTYPE (FUNCTION (T T T T) *) C1DM-VL C1DM-V C2DM C2RETURN-FROM |
'(FTYPE (FUNCTION (T T T T) *) C1DM-VL C1DM-V C2RETURN-FROM |
12 |
C2APPLY-OPTIMIZE)) |
C2APPLY-OPTIMIZE C2DM)) |
13 |
(PROCLAIM '(FTYPE (FUNCTION (T T *) *) T3DEFUN-AUX)) |
(PROCLAIM '(FTYPE (FUNCTION (T T *) *) T3DEFUN-AUX)) |
14 |
(PROCLAIM |
(PROCLAIM |
15 |
'(FTYPE (FUNCTION (T T T T) T) C2CALL-GLOBAL WT-GLOBAL-ENTRY |
'(FTYPE (FUNCTION (T T T T) T) T3DEFUN-VARARG T3DEFUN-NORMAL |
16 |
C2CALL-UNKNOWN-GLOBAL SYSTEM::RECORD-FN C1MAKE-VAR C2SWITCH |
MY-CALL WT-GLOBAL-ENTRY C1MAKE-VAR C2STRUCTURE-REF C2SWITCH |
17 |
C2STRUCTURE-REF T3DEFUN-VARARG T3DEFUN-NORMAL MY-CALL)) |
C2CALL-GLOBAL C2CALL-UNKNOWN-GLOBAL)) |
18 |
(PROCLAIM |
(PROCLAIM |
19 |
'(FTYPE (FUNCTION (T T T T T) T) T3LOCAL-DCFUN T3LOCAL-FUN T2DEFUN |
'(FTYPE (FUNCTION (T T T) T) BOOLE3 WT-INLINE-COND WT-INLINE-FIXNUM |
20 |
T2DEFENTRY T3DEFENTRY C1APPLY-OPTIMIZE C2STRUCTURE-SET |
WT-INLINE-INTEGER C1MAP-FUNCTIONS WT-INLINE-CHARACTER |
21 |
T3DEFUN-LOCAL-ENTRY T3DEFUN)) |
WT-INLINE-LONG-FLOAT WT-INLINE-SHORT-FLOAT C2MAPCAR C2MAPC |
22 |
(PROCLAIM |
C2MAPCAN FIX-DOWN-ARGS WT-IF-PROCLAIMED SET-VAR |
23 |
'(FTYPE (FUNCTION (T T T) T) ADD-FAST-LINK INLINE-TYPE-MATCHES |
C1STRUCTURE-REF1 ASSIGN-DOWN-VARS CJF C2MULTIPLE-VALUE-BIND |
24 |
C2FUNCALL-SFUN WT-IF-PROCLAIMED C2LET WT-INLINE-COND |
C2PRINC C1DM TOO-MANY-ARGS T3DEFCFUN TOO-FEW-ARGS |
25 |
FIX-DOWN-ARGS WT-INLINE-FIXNUM WT-INLINE-CHARACTER |
CMP-EXPAND-MACRO ADD-FUNCTION-PROCLAMATION |
26 |
ASSIGN-DOWN-VARS WT-INLINE-LONG-FLOAT WT-INLINE-SHORT-FLOAT |
ADD-FUNCTION-DECLARATION CAN-BE-REPLACED* C2LET* |
27 |
SUBLIS1-INLINE C1DM C1STRUCTURE-REF1 C2CASE GET-INLINE-INFO |
SUBLIS1-INLINE CHECK-VDECL GET-INLINE-INFO C2TAGBODY C2GO |
28 |
CJT C2LET* CJF T3DEFCFUN CAN-BE-REPLACED* TOO-MANY-ARGS |
C2CASE AND-FORM-TYPE CHECK-FORM-TYPE C2FUNCALL-SFUN CJT |
29 |
TOO-FEW-ARGS C2TAGBODY C2PROGV C2GO CMP-EXPAND-MACRO |
C2LET ADD-FAST-LINK INLINE-TYPE-MATCHES C2PROGV)) |
30 |
AND-FORM-TYPE C2MAPCAR ADD-FUNCTION-PROCLAMATION |
(PROCLAIM |
31 |
CHECK-FORM-TYPE ADD-FUNCTION-DECLARATION C2MAPC C2MAPCAN |
'(FTYPE (FUNCTION (T T *) T) INLINE-ARGS C2FUNCALL C2LAMBDA-EXPR)) |
32 |
C1MAP-FUNCTIONS CHECK-VDECL C2MULTIPLE-VALUE-BIND C2PRINC |
(PROCLAIM |
33 |
SET-VAR)) |
'(FTYPE (FUNCTION (T T T T T) T) T3DEFUN-LOCAL-ENTRY T3DEFUN |
34 |
(PROCLAIM |
T3LOCAL-DCFUN T3LOCAL-FUN C1APPLY-OPTIMIZE C2STRUCTURE-SET |
35 |
'(FTYPE (FUNCTION (T T *) T) C2FUNCALL C2LAMBDA-EXPR INLINE-ARGS)) |
T2DEFUN T2DEFENTRY T3DEFENTRY)) |
36 |
(PROCLAIM |
(PROCLAIM |
37 |
'(FTYPE (FUNCTION (T T T T T T) T) DEFSYSFUN T2DEFMACRO T3DEFMACRO)) |
'(FTYPE (FUNCTION (T T T T T T) T) DEFSYSFUN T2DEFMACRO T3DEFMACRO)) |
38 |
(PROCLAIM '(FTYPE (FUNCTION (T T T *) T) WT-SIMPLE-CALL)) |
(PROCLAIM '(FTYPE (FUNCTION (T T T *) T) WT-SIMPLE-CALL)) |
39 |
(PROCLAIM '(FTYPE (FUNCTION NIL *) WT-DATA-FILE WT-FASD-DATA-FILE)) |
(PROCLAIM '(FTYPE (FUNCTION NIL *) WT-FASD-DATA-FILE WT-DATA-FILE)) |
40 |
(PROCLAIM |
(PROCLAIM |
41 |
'(FTYPE (FUNCTION NIL T) TAIL-RECURSION-POSSIBLE |
'(FTYPE (FUNCTION NIL T) WT-NEXT-VAR-ARG WT-FIRST-VAR-ARG |
42 |
CLOSE-INLINE-BLOCKS C1T CVS-PUSH WT-CVARS |
CLOSE-INLINE-BLOCKS WT-DATA-BEGIN WT-DATA-END C1T |
43 |
ADD-LOAD-TIME-SHARP-COMMA WT-C-PUSH RESET-TOP |
ADD-LOAD-TIME-SHARP-COMMA RESET-TOP CVS-PUSH WT-CVARS |
44 |
INIT-ENV VS-PUSH BABOON PRINT-CURRENT-FORM |
PRINT-CURRENT-FORM INIT-ENV INC-INLINE-BLOCKS WT-C-PUSH |
45 |
NO-MAKE-PROCLAIMS-HACK WT-NEXT-VAR-ARG INIT-FN C1NIL |
C1NIL VS-PUSH BABOON TAIL-RECURSION-POSSIBLE CCB-VS-PUSH |
46 |
LIST-UNDEFINED-FUNCTIONS WT-DATA-BEGIN |
WFS-ERROR)) |
47 |
LIST-UNCALLED-FUNCTIONS WT-DATA-END CCB-VS-PUSH WFS-ERROR |
(PROCLAIM '(FTYPE (FUNCTION (*) *) INLINE-BOOLE3)) |
48 |
CURRENT-FN CLEAR-CALL-TABLE)) |
(PROCLAIM |
49 |
(PROCLAIM |
'(FTYPE (FUNCTION (*) T) MAKE-INFO FCALLN-INLINE MAKE-BLK |
50 |
'(FTYPE (FUNCTION (*) *) INLINE-BOOLE3 DUMP-FN-DATA |
LIST-INLINE LIST*-INLINE MAKE-TAG MAKE-FUN CS-PUSH MAKE-VAR |
51 |
MAKE-ALL-PROCLAIMS)) |
WT-CLINK)) |
|
(PROCLAIM |
|
|
'(FTYPE (FUNCTION (*) T) MAKE-INFO FCALLN-INLINE MAKE-FUN MAKE-VAR |
|
|
MAKE-FN MAKE-PROCLAIMS MAKE-TAG WT-CLINK LIST-INLINE CS-PUSH |
|
|
LIST*-INLINE MAKE-BLK)) |
|
52 |
(PROCLAIM |
(PROCLAIM |
53 |
'(FTYPE (FUNCTION (T) *) T1EXPR C2AND C2OR T1EVAL-WHEN WT-LOC |
'(FTYPE (FUNCTION (T) *) SET-LOC C2OR T1EXPR C2EXPR C2PROGN |
54 |
|
T1EVAL-WHEN CMP-TOPLEVEL-EVAL WT-TO-STRING CMP-EVAL WT-LOC |
55 |
WT-FIXNUM-LOC WT-CHARACTER-LOC WT-LONG-FLOAT-LOC |
WT-FIXNUM-LOC WT-CHARACTER-LOC WT-LONG-FLOAT-LOC |
56 |
WT-SHORT-FLOAT-LOC C2EXPR CMP-EVAL CMP-TOPLEVEL-EVAL |
WT-SHORT-FLOAT-LOC C2AND)) |
|
WT-TO-STRING SET-LOC C2PROGN)) |
|
57 |
(PROCLAIM |
(PROCLAIM |
|
'(FTYPE (FUNCTION (T) T) C1NTHCDR-CONDITION C1NTHCDR C1LOCAL-FUN |
|
|
C1DOWNWARD-FUNCTION C1RPLACA-NTHCDR CMP-MACRO-FUNCTION |
|
|
WT-DATA-PACKAGE-OPERATION C2DOWNWARD-FUNCTION C1LIST-NTH |
|
|
TYPE-FILTER T1ORDINARY C1BOOLE-CONDITION |
|
|
FUNCTION-RETURN-TYPE C1BOOLE3 T1PROGN C1ASH-CONDITION |
|
|
CHECK-DOWNWARD VOLATILE C1ASH PUSH-ARGS C1LENGTH |
|
|
PUSH-ARGS-LISPCALL NEED-TO-SET-VS-POINTERS FASD-INDEX |
|
|
INFO-P FASD-PACKAGE FASD-DIRECTION VARARG-P FASD-EOF |
|
|
MAXARGS NAME-TO-SD FASD-TABLE UNWIND-NO-EXIT FASD-STREAM |
|
|
WT-DOWNWARD-CLOSURE-MACRO THE-PARAMETER REPLACE-CONSTANT |
|
|
ADD-OBJECT FASD-MACRO FASD-TABLE_LENGTH |
|
|
ARGS-CAUSE-SIDE-EFFECT C1IF C2FUNCALL-AUX FASD-FILEPOS |
|
|
WT-LIST SET-UP-VAR-CVS INFO-CHANGED-VARS C1AND C1FUNOB |
|
|
C1DM-BAD-KEY INFO-REFERRED-VARS INFO-TYPE C1OR |
|
|
WT-FUNCTION-LINK PARSE-CVSPECS C2DM-RESERVE-VL |
|
|
INFO-SP-CHANGE NAME-SD1 WT-FUNCALL-C C1VAR C2DM-RESERVE-V |
|
|
INFO-VOLATILE T1DEFUN SAVE-FUNOB T1DEFMACRO REP-TYPE |
|
|
AET-C-TYPE C1CATCH WT1 T1CLINES C1ECASE WT-H1 T1DEFCFUN |
|
|
C1UNWIND-PROTECT T1DEFENTRY CHECK-VREF T1DEFLA C1THROW |
|
|
RECORD-ARG-INFO C1ADD-GLOBALS T1DEFVAR INLINE-POSSIBLE |
|
|
C1FLET C2VAR-KIND C1FMLA-CONSTANT SET-PUSH-CATCH-FRAME |
|
|
T2ORDINARY C1LET C1LABELS T2DECLARE C1LET* C1MACROLET |
|
|
VAR-KIND FUN-P |
|
|
C1LOCAL-CLOSURE T3CLINES C1STACK-LET FUN-NAME FUN-REF |
|
|
C2EXPR* FUN-REF-CCB PROCLAIM CTOP-WRITE FUN-CFUN |
|
|
PROCLAMATION FUN-LEVEL T1DEFINE-STRUCTURE FIXNUM-LOC-P |
|
|
WRITE-BLOCK-OPEN CHARACTER-LOC-P LONG-FLOAT-LOC-P |
|
|
WT-VV INLINE-TYPE C2VAR SHORT-FLOAT-LOC-P WT-CAR C2LOCATION |
|
|
WT-CDR C1SETQ WT-CADR C1TAGBODY GET-VAR-TYPES C1PROGV |
|
|
WT-VS-BASE GET-VALUE-TYPE1 UNDEFINED-VARIABLE C1GO |
|
|
GET-VALUE-TYPE C1PSETQ WT-DOWN C1PROGN ADD-CALLEE C1SWITCH |
|
|
RESULT-TYPE-FROM-LOC CMP-MACROEXPAND REGISTER SET-RETURN |
|
|
ADD-SYMBOL WT-VS* CMP-MACROEXPAND-1 SET-TOP PUSH-DATA-INCF |
|
|
VAR-P ADD-REG1 WT-DATA1 VAR-NAME ADD-LOOP-REGISTERS |
|
|
ADD-MACRO-CALLEE VAR-REF C2TAGBODY-LOCAL C1EXPR WT-CCB-VS |
|
|
VAR-REF-CCB OBJECT-TYPE C2TAGBODY-BODY FUNCTION-ARG-TYPES |
|
|
VAR-LOC C2TAGBODY-CLB C1MAPCAR SCH-LOCAL-FUN VAR-TYPE |
|
|
RESET-INFO-TYPE C2TAGBODY-CCB C1MAPLIST EMIT-FN FN-P |
|
|
VAR-REGISTER C2GO-LOCAL SCH-GLOBAL C2GO-CLB C1MAPC |
|
|
DEFAULT-INIT C2GO-CCB C1MAPL WT-SWITCH-CASE C1MAPCAN |
|
|
ADD-CONSTANT VERIFY-DATA-VECTOR C1MAPCON BLK-P BLK-NAME |
|
|
GET-ARG-TYPES BLK-REF GET-RETURN-TYPE BLK-REF-CLB FN-NAME |
|
|
TAG-P GET-LOCAL-ARG-TYPES BLK-REF-CCB FN-DEF TAG-NAME |
|
|
C1MULTIPLE-VALUE-CALL GET-LOCAL-RETURN-TYPE BLK-EXIT C2BIND |
|
|
FN-VALUE-TYPE TAG-REF INLINE-BOOLE3-STRING BLK-VALUE-TO-GO |
|
|
FN-FUN-VALUES TAG-REF-CLB C1MULTIPLE-VALUE-PROG1 |
|
|
RESULT-TYPE BLK-VAR FN-CALLEES WT-VS TAG-REF-CCB |
|
|
FN-RETURN-TYPE TAG-LABEL C1VALUES GET-INCLUDED FN-ARG-TYPES |
|
|
CLINK TAG-UNWIND-EXIT C2VALUES CONS-TO-LISTA FN-NO-EMIT |
|
|
TAG-VAR C1MULTIPLE-VALUE-SETQ FN-MACROS TAG-SWITCH |
|
|
SYSTEM:UNDEF-COMPILER-MACRO ADD-FN-DATA |
|
|
C1MULTIPLE-VALUE-BIND CONSTANT-FOLD-P C1BLOCK C1PRINC |
|
|
C1STRUCTURE-REF C1TERPRI C1RETURN-FROM C1VREF C1APPLY |
|
|
C1STRUCTURE-SET C1FUNCALL C1RPLACA C2RPLACA C1SHARP-COMMA |
|
|
C1RPLACD C1DEFINE-STRUCTURE C1QUOTE C2RPLACD C1FUNCTION |
|
|
C1MEMQ C2FUNCTION C1MEMBER C1THE C1EVAL-WHEN C1ASSOC |
|
|
C1DECLARE C1COMPILER-LET C1GET C2GET WT-SYMBOL-FUNCTION |
|
|
C1NTH-CONDITION C1NTH)) |
|
|
(PROCLAIM |
|
|
'(FTYPE (FUNCTION (T T) *) WT-INLINE-LOC C1SYMBOL-FUN |
|
|
C2RETURN-LOCAL C1BODY C2DECL-BODY C2BLOCK C2BLOCK-LOCAL)) |
|
|
(PROCLAIM |
|
|
'(FTYPE (FUNCTION (T *) T) C1LAMBDA-EXPR WT-COMMENT C1CASE CMPERR |
|
|
FAST-LINK-PROCLAIMED-TYPE-P CMPWARN CMPNOTE UNWIND-EXIT |
|
|
ADD-INIT WT-CVAR)) |
|
|
(PROCLAIM |
|
|
'(FTYPE (FUNCTION (T T) T) TYPE>= MAYBE-EVAL C2LIST-NTH-IMMEDIATE |
|
|
COMPILER-CLEAR-COMPILER-PROPERTIES |
|
|
compiler-def-hook |
|
|
WT-MAKE-DCLOSURE C2CALL-LOCAL C2CALL-LAMBDA CMPFIX-ARGS |
|
|
MAKE-INLINE-STRING CO1EQL CO1TYPEP CO1SCHAR ADD-INFO |
|
|
CO1CONS C2PSETQ ARGS-INFO-REFERRED-VARS CO1READ-BYTE |
|
|
CO1READ-CHAR CO1WRITE-BYTE C1EXPR* CHECK-FNAME-ARGS |
|
|
ADD-DEBUG-INFO CO1WRITE-CHAR INLINE-PROC CO1VECTOR-PUSH |
|
|
WT-REQUIREDS CO1SPECIAL-FIX-DECL C2LAMBDA-EXPR-WITHOUT-KEY |
|
|
CO1SUBLIS C1LAMBDA-FUN WT-V*-MACROS C2LAMBDA-EXPR-WITH-KEY |
|
|
C2EXPR-TOP C2EXPR-TOP* C1PROGN* C1ARGS |
|
|
CO1STRUCTURE-PREDICATE C1CONSTANT-VALUE COERCE-LOC |
|
|
SET-JUMP-TRUE C2DM-BIND-VL ARGS-INFO-CHANGED-VARS |
|
|
SET-JUMP-FALSE C2DM-BIND-LOC C2DM-BIND-INIT C2CATCH WT-VAR |
|
|
C2UNWIND-PROTECT C2THROW GET-INLINE-LOC NEED-TO-PROTECT |
|
|
C1FMLA T2SHARP-COMMA CONVERT-CASE-TO-SWITCH C2STACK-LET |
|
|
CAN-BE-REPLACED COERCE-LOC-STRUCTURE-REF SYSTEM::ADD-DEBUG |
|
|
UNWIND-BDS SET-DBIND C2BLOCK-CCB TYPE-OR C2SETQ |
|
|
C2RETURN-CLB WT-FIXNUM-VALUE C2RETURN-CCB |
|
|
WT-CHARACTER-VALUE SHIFT>> WT-LONG-FLOAT-VALUE SHIFT<< |
|
|
WT-SHORT-FLOAT-VALUE C1SETQ1 ADD-VALUE-TYPE JUMPS-TO-P |
|
|
TYPE-AND PROCLAIM-VAR SET-VS SMALL-ALL-T-P SET-BDS-BIND |
|
|
CO1CONSTANT-FOLD PUSH-CHANGED-VARS C2MULTIPLE-VALUE-CALL |
|
|
C2BIND-LOC C2BIND-INIT C2MULTIPLE-VALUE-PROG1 |
|
|
STRUCT-TYPE-OPT C1DECL-BODY FAST-READ C2MULTIPLE-VALUE-SETQ |
|
|
CFAST-WRITE MULTIPLE-VALUE-CHECK C2APPLY ADD-ADDRESS |
|
|
RECORD-CALL-INFO C2MEMBER!2 C2ASSOC!2 WT-MAKE-CCLOSURE |
|
|
C2BLOCK-CLB)) |
|
58 |
|
'(FTYPE (FUNCTION (T) T) DECLARATION-TYPE WT-VS-BASE ADD-OBJECT |
59 |
|
C2BIND VOLATILE C2FUNCALL-AUX VAR-NAME C1FUNOB VAR-REF |
60 |
|
INFO-P VAR-REF-CCB WT-FUNCTION-LINK VAR-LOC WT-FUNCALL-C |
61 |
|
VAR-TYPE FIXNUM-LOC-P VAR-REGISTER CHARACTER-LOC-P |
62 |
|
SAVE-FUNOB LONG-FLOAT-LOC-P SHORT-FLOAT-LOC-P |
63 |
|
VERIFY-DATA-VECTOR WT-DATA-PACKAGE-OPERATION C1MAPCAR |
64 |
|
C1MAPLIST ARGS-CAUSE-SIDE-EFFECT T1ORDINARY C1MAPC |
65 |
|
NAME-TO-SD C1MAPL C1PROGN WT-H1 T1PROGN PROCLAIM |
66 |
|
CHECK-DOWNWARD C1MAPCAN PROCLAMATION C1VAR CHECK-VREF |
67 |
|
C1MAPCON VAR-P C1VREF ADD-SYMBOL WT-VS* VARARG-P FLAGS-POS |
68 |
|
MAXARGS C1CATCH C1MULTIPLE-VALUE-CALL C1EXPR |
69 |
|
C1UNWIND-PROTECT WT-CCB-VS C1MULTIPLE-VALUE-PROG1 |
70 |
|
C2DM-RESERVE-VL INLINE-BOOLE3-STRING INFO-CHANGED-VARS |
71 |
|
AET-C-TYPE RESULT-TYPE C1THROW C1VALUES C2DM-RESERVE-V |
72 |
|
INFO-REFERRED-VARS C2VALUES INFO-TYPE GET-INCLUDED |
73 |
|
C1STRUCTURE-REF SET-PUSH-CATCH-FRAME C1MULTIPLE-VALUE-SETQ |
74 |
|
INFO-SP-CHANGE CONS-TO-LISTA C1BLOCK C2VAR-KIND |
75 |
|
INFO-VOLATILE WT-VAR-DECL SET-UP-VAR-CVS |
76 |
|
C1MULTIPLE-VALUE-BIND C1STRUCTURE-SET CONSTANT-FOLD-P |
77 |
|
C1RETURN-FROM C1PRINC C1SHARP-COMMA PARSE-CVSPECS |
78 |
|
C1DOWNWARD-FUNCTION C1DEFINE-STRUCTURE C2DOWNWARD-FUNCTION |
79 |
|
C1TERPRI T1DEFUN C1APPLY T1DEFMACRO |
80 |
|
WT-DOWNWARD-CLOSURE-MACRO REPLACE-CONSTANT T1CLINES |
81 |
|
THE-PARAMETER T1DEFCFUN C1FUNCALL T1DEFENTRY C1DM-BAD-KEY |
82 |
|
C1RPLACA FASD-STREAM T1DEFLA C2RPLACA FASD-TABLE C1RPLACD |
83 |
|
BLK-P FASD-EOF C2RPLACD FASD-DIRECTION T2ORDINARY C1MEMQ |
84 |
|
FASD-PACKAGE T2DECLARE C1QUOTE C1MEMBER FASD-INDEX |
85 |
|
C1FUNCTION FASD-FILEPOS C2FUNCTION C1ASSOC BLK-NAME |
86 |
|
FASD-TABLE_LENGTH C1THE BLK-REF FASD-EVALD_FORMS |
87 |
|
C1EVAL-WHEN C1GET BLK-REF-CLB T3CLINES C1DECLARE C2GET |
88 |
|
BLK-REF-CCB C1COMPILER-LET C1NTH-CONDITION BLK-EXIT C1NTH |
89 |
|
BLK-VALUE-TO-GO CTOP-WRITE WT-SYMBOL-FUNCTION |
90 |
|
C1NTHCDR-CONDITION BLK-VAR C1NTHCDR NAME-SD1 |
91 |
|
UNDEFINED-VARIABLE T1DEFINE-STRUCTURE REGISTER |
92 |
|
C1RPLACA-NTHCDR C1LIST-NTH PUSH-DATA-INCF WT-DATA1 |
93 |
|
C1BOOLE-CONDITION C1BOOLE3 FUNCTION-ARG-TYPES |
94 |
|
CMP-MACROEXPAND C1IF C1ASH-CONDITION SCH-LOCAL-FUN |
95 |
|
CMP-MACROEXPAND-1 C1ASH SCH-GLOBAL C1LENGTH VAR-KIND |
96 |
|
ADD-CONSTANT ADD-REG1 ADD-LOOP-REGISTERS GET-ARG-TYPES WT1 |
97 |
|
C1ADD-GLOBALS C2TAGBODY-CCB GET-RETURN-TYPE REP-TYPE |
98 |
|
C2TAGBODY-CLB WRITE-BLOCK-OPEN C1FLET GET-LOCAL-ARG-TYPES |
99 |
|
C2TAGBODY-LOCAL GET-LOCAL-RETURN-TYPE C2TAGBODY-BODY C1LET |
100 |
|
C1LABELS WT-SWITCH-CASE C1LET* C2GO-CCB C1MACROLET C2GO-CLB |
101 |
|
C1STACK-LET C2GO-LOCAL INLINE-POSSIBLE C1TAGBODY C1OR FUN-P |
102 |
|
SAVE-AVMA WT-LIST C1GO C1LOCAL-CLOSURE TAG-P C1AND |
103 |
|
C1LOCAL-FUN C1SWITCH CMP-MACRO-FUNCTION OBJECT-TYPE C1ECASE |
104 |
|
RESET-INFO-TYPE C2EXPR* TAG-NAME DEFAULT-INIT TAG-REF |
105 |
|
TAG-REF-CLB SET-RETURN PUSH-ARGS WT-DOWN TAG-REF-CCB |
106 |
|
SET-TOP PUSH-ARGS-LISPCALL TAG-LABEL |
107 |
|
NEED-TO-SET-VS-POINTERS INLINE-TYPE C2LOCATION |
108 |
|
TAG-UNWIND-EXIT C2VAR TAG-VAR FUN-NAME C1SETQ TAG-SWITCH |
109 |
|
FUN-REF SYSTEM:UNDEF-COMPILER-MACRO WT-VS FUN-REF-CCB |
110 |
|
FIX-OPT C1PROGV WT-VV UNWIND-NO-EXIT FUN-CFUN CLINK WT-CAR |
111 |
|
FUN-LEVEL C1PSETQ TYPE-FILTER WT-CDR C1FMLA-CONSTANT |
112 |
|
WT-CADR FUNCTION-RETURN-TYPE)) |
113 |
|
(PROCLAIM |
114 |
|
'(FTYPE (FUNCTION (T T) *) C2BLOCK-LOCAL C1SYMBOL-FUN |
115 |
|
C2RETURN-LOCAL C2BLOCK C1BODY C2DECL-BODY WT-INLINE-LOC)) |
116 |
|
(PROCLAIM |
117 |
|
'(FTYPE (FUNCTION (T *) T) C1CASE UNWIND-EXIT WT-COMMENT CMPERR |
118 |
|
ADD-INIT CMPWARN CMPNOTE WT-INTEGER-LOC C1LAMBDA-EXPR |
119 |
|
FAST-LINK-PROCLAIMED-TYPE-P WT-CVAR)) |
120 |
|
(PROCLAIM |
121 |
|
'(FTYPE (FUNCTION (T T) T) SET-BDS-BIND WT-FIXNUM-VALUE UNWIND-BDS |
122 |
|
RESULT-TYPE-FROM-ARGS WT-CHARACTER-VALUE C2BIND-LOC |
123 |
|
WT-LONG-FLOAT-VALUE C2BIND-INIT WT-SHORT-FLOAT-VALUE |
124 |
|
SHIFT>> ADD-INFO SHIFT<< ARGS-INFO-REFERRED-VARS |
125 |
|
COMPILER-CLEAR-COMPILER-PROPERTIES MAYBE-EVAL |
126 |
|
PUSH-CHANGED-VARS C2BLOCK-CCB C1CONSTANT-VALUE C2BLOCK-CLB |
127 |
|
CMPFIX-ARGS MAKE-INLINE-STRING C1FMLA C1LAMBDA-FUN |
128 |
|
C2LAMBDA-EXPR-WITH-KEY MULTIPLE-VALUE-CHECK |
129 |
|
C2LAMBDA-EXPR-WITHOUT-KEY CO1CONSTANT-FOLD C1ARGS C2CATCH |
130 |
|
C2MULTIPLE-VALUE-CALL C2EXPR-TOP ADD-DEBUG-INFO C1EXPR* |
131 |
|
C2UNWIND-PROTECT C2RETURN-CCB C2MULTIPLE-VALUE-PROG1 |
132 |
|
C2RETURN-CLB WT-REQUIREDS STRUCT-TYPE-OPT |
133 |
|
C2THROW C2DM-BIND-LOC WT-V*-MACROS C2DM-BIND-INIT |
134 |
|
C2MULTIPLE-VALUE-SETQ FAST-READ CFAST-WRITE |
135 |
|
WT-MAKE-DCLOSURE C2APPLY C2EXPR-TOP* C1PROGN* ADD-ADDRESS |
136 |
|
T2SHARP-COMMA C2MEMBER!2 COMPILER-DEF-HOOK C2ASSOC!2 |
137 |
|
SYSTEM::ADD-DEBUG WT-MAKE-CCLOSURE SET-DBIND |
138 |
|
C2LIST-NTH-IMMEDIATE CONVERT-CASE-TO-SWITCH PROCLAIM-VAR |
139 |
|
CO1LDB CO1EQL JUMPS-TO-P CO1TYPEP COERCE-LOC CO1SCHAR |
140 |
|
ARGS-INFO-CHANGED-VARS CO1CONS CAN-BE-REPLACED CO1READ-BYTE |
141 |
|
CO1READ-CHAR CO1WRITE-BYTE CO1WRITE-CHAR WT-VAR |
142 |
|
CO1VECTOR-PUSH CO1SPECIAL-FIX-DECL C1DECL-BODY CO1SUBLIS |
143 |
|
CO1STRUCTURE-PREDICATE C2STACK-LET SET-VS GET-INLINE-LOC |
144 |
|
NEED-TO-PROTECT TYPE-AND SET-JUMP-TRUE SET-JUMP-FALSE |
145 |
|
C2CALL-LOCAL C2CALL-LAMBDA COERCE-LOC-STRUCTURE-REF C1SETQ1 |
146 |
|
C2PSETQ C2SETQ TYPE>= CHECK-FNAME-ARGS INLINE-PROC)) |