(FUNCTION% DEFINITION,% MANIPULATION,% AND% EVALUATION CHAPTER (70 117 110 99 116 105 111 110 32 68 101 102 105 110 105 116 105 111 110 44 32 77 97 110 105 112 117 108 97 116 105 111 110 44 32 97 110 100 32 69 118 97 108 117 97 116 105 111 110) NIL (10) 1) (EXPR% DEFINITIONS TERM Expr% definitions NIL (10) 1) (FUNCTION% TYPES SUBSEC (70 117 110 99 116 105 111 110 32 84 121 112 101 115) NIL (1 10) 2) (FUNCTION% TYPES TERM Function% types (*PRIMARY*) (1 10) 2) (FNTYPES TAG NIL NIL (1 10) 2) (EXPR% DEFINITIONS TERM Expr% definitions (*PRIMARY*) (1 10) 2) (ARGUMENT% LISTS% OF% FUNCTIONS TERM Argument% lists% of% functions (*PRIMARY*) (1 10) 2) (FUNCTION% DEFINITIONS TERM Function% definitions (*PRIMARY*) (1 10) 2) (EVALUATING% ARGUMENTS% TO% FUNCTIONS TERM Evaluating% arguments% to% functions (*PRIMARY*) (1 10) 2) (LAMBDA (Litatom) NIL (*PRIMARY*) (1 10) 2) (NLAMBDA (Litatom) NIL (*PRIMARY*) (1 10) 2) (LAMBDA% FUNCTIONS TERM Lambda% functions (*PRIMARY*) (1 10) 2) (NLAMBDA% FUNCTIONS TERM Nlambda% functions (*PRIMARY*) (1 10) 2) (SPREAD% FUNCTIONS TERM Spread% functions (*PRIMARY*) (1 10) 3) (NOSPREAD% FUNCTIONS TERM Nospread% functions (*PRIMARY*) (1 10) 3) (ARG% NOT% LITATOM (Error Message) NIL NIL (1 10) 3) (ATTEMPT% TO% BIND% NIL% OR% T (Error Message) NIL NIL (1 10) 3) (TOO% MANY% ARGUMENTS (Error Message) NIL NIL (1 10) 3) (LAMBDA-SPREAD% FUNCTIONS SUBSEC (76 97 109 98 100 97 45 83 112 114 101 97 100 32 70 117 110 99 116 105 111 110 115) NIL (1 1 10) 3) (LAMBDA-SPREAD% FUNCTIONS TERM Lambda-spread% functions (*PRIMARY*) (1 1 10) 3) (NLAMBDA-SPREAD% FUNCTIONS SUBSEC (78 108 97 109 98 100 97 45 83 112 114 101 97 100 32 70 117 110 99 116 105 111 110 115) NIL (2 1 10) 4) (NLAMBDA-SPREAD% FUNCTIONS TERM Nlambda-spread% functions (*PRIMARY*) (2 1 10) 4) (INFO (Property Name) NIL NIL (2 1 10) 4) (EVALUATING% NLAMBDA% ARGUMENTS TERM Evaluating% nlambda% arguments (*PRIMARY*) (2 1 10) 5) (LAMBDA-NOSPREAD% FUNCTIONS SUBSEC (76 97 109 98 100 97 45 78 111 115 112 114 101 97 100 32 70 117 110 99 116 105 111 110 115) NIL (3 1 10) 5) (LAMBDA-NOSPREAD% FUNCTIONS TERM Lambda-nospread% functions (*PRIMARY*) (3 1 10) 5) (ARG (Function) ((FONT . LISP) 40 65 82 71 32 (FONT . ARG) 86 65 82 32 77 (FONT . LISP) 41 (UNDO . FONT) (UNDO . FONT) (UNDO . FONT)) (*DEF*) (3 1 10) 5) (ARG (Function) NIL NIL (3 1 10) 5) (SETARG (Function) ((FONT . LISP) 40 83 69 84 65 82 71 32 (FONT . ARG) 86 65 82 32 77 32 88 (FONT . LISP) 41 (UNDO . FONT) (UNDO . FONT) (UNDO . FONT)) (*DEF*) (3 1 10) 5) (NLAMBDA-NOSPREAD% FUNCTIONS SUBSEC (78 108 97 109 98 100 97 45 78 111 115 112 114 101 97 100 32 70 117 110 99 116 105 111 110 115) NIL (4 1 10) 6) (NLAMBDA-NOSPREAD% FUNCTIONS TERM Nlambda-nospread% functions (*PRIMARY*) (4 1 10) 6) (COMPILED% FUNCTIONS SUBSEC (67 111 109 112 105 108 101 100 32 70 117 110 99 116 105 111 110 115) NIL (5 1 10) 6) (COMPILED% FUNCTION% OBJECTS TERM Compiled% function% objects (*PRIMARY*) (5 1 10) 6) (CCODEP (data type) NIL NIL (5 1 10) 6) (FUNCTION% TYPE% FUNCTIONS SUBSEC (70 117 110 99 116 105 111 110 32 84 121 112 101 32 70 117 110 99 116 105 111 110 115) NIL (6 1 10) 6) (FNTYP (Function) ((FONT . LISP) 40 70 78 84 89 80 32 (FONT . ARG) 70 78 (FONT . LISP) 41 (UNDO . FONT) (UNDO . FONT) (UNDO . FONT)) (*DEF*) (6 1 10) 7) (EXPR (Litatom) NIL (*PRIMARY*) (6 1 10) 7) (CEXPR (Litatom) NIL (*PRIMARY*) (6 1 10) 7) (FEXPR (Litatom) NIL (*PRIMARY*) (6 1 10) 7) (CFEXPR (Litatom) NIL (*PRIMARY*) (6 1 10) 7) (EXPR* (Litatom) NIL (*PRIMARY*) (6 1 10) 7) (CEXPR* (Litatom) NIL (*PRIMARY*) (6 1 10) 7) (FEXPR* (Litatom) NIL (*PRIMARY*) (6 1 10) 7) (CFEXPR* (Litatom) NIL (*PRIMARY*) (6 1 10) 7) (FUNARG (Litatom) NIL NIL (6 1 10) 7) (FUNARG (Litatom) NIL NIL (6 1 10) 7) (EXPRP (Function) ((FONT . LISP) 40 69 88 80 82 80 32 (FONT . ARG) 70 78 (FONT . LISP) 41 (UNDO . FONT) (UNDO . FONT) (UNDO . FONT)) (*DEF*) (6 1 10) 7) (EXPR (Litatom) NIL NIL (6 1 10) 7) (FEXPR (Litatom) NIL NIL (6 1 10) 7) (EXPR* (Litatom) NIL NIL (6 1 10) 7) (FEXPR* (Litatom) NIL NIL (6 1 10) 7) (CCODEP (Function) ((FONT . LISP) 40 67 67 79 68 69 80 32 (FONT . ARG) 70 78 (FONT . LISP) 41 (UNDO . FONT) (UNDO . FONT) (UNDO . FONT)) (*DEF*) (6 1 10) 7) (FNTYP (Function) NIL NIL (6 1 10) 7) (CEXPR (Litatom) NIL NIL (6 1 10) 7) (CFEXPR (Litatom) NIL NIL (6 1 10) 7) (CEXPR* (Litatom) NIL NIL (6 1 10) 7) (CFEXPR* (Litatom) NIL NIL (6 1 10) 7) (ARGTYPE (Function) ((FONT . LISP) 40 65 82 71 84 89 80 69 32 (FONT . ARG) 70 78 (FONT . LISP) 41 (UNDO . FONT) (UNDO . FONT) (UNDO . FONT)) (*DEF*) (6 1 10) 7) (EXPR (Litatom) NIL NIL (6 1 10) 7) (CEXPR (Litatom) NIL NIL (6 1 10) 7) (FEXPR (Litatom) NIL NIL (6 1 10) 7) (CFEXPR (Litatom) NIL NIL (6 1 10) 7) (EXPR* (Litatom) NIL NIL (6 1 10) 7) (CEXPR* (Litatom) NIL NIL (6 1 10) 7) (FEXPR* (Litatom) NIL NIL (6 1 10) 8) (CFEXPR* (Litatom) NIL NIL (6 1 10) 8) (NARGS (Function) ((FONT . LISP) 40 78 65 82 71 83 32 (FONT . ARG) 70 78 (FONT . LISP) 41 (UNDO . FONT) (UNDO . FONT) (UNDO . FONT)) (*DEF*) (6 1 10) 8) (ARGLIST (Function) ((FONT . LISP) 40 65 82 71 76 73 83 84 32 (FONT . ARG) 70 78 (FONT . LISP) 41 (UNDO . FONT) (UNDO . FONT) (UNDO . FONT)) (*DEF*) (6 1 10) 8) (ARGS% NOT% AVAILABLE (Error Message) NIL NIL (6 1 10) 8) (LAMBDASPLST (Variable) NIL NIL (6 1 10) 8) (SMARTARGLIST (Function) ((FONT . LISP) 40 83 77 65 82 84 65 82 71 76 73 83 84 32 (FONT . ARG) 70 78 32 69 88 80 76 65 73 78 70 76 71 32 84 65 73 76 (FONT . LISP) 41 (UNDO . FONT) (UNDO . FONT) (UNDO . FONT)) (*DEF*) (6 1 10) 8) (ARGNAMES (Property Name) NIL (*PRIMARY*) (6 1 10) 8) (FNCHECK (Function) NIL NIL (6 1 10) 8) (NOT% A% FUNCTION (Error Message) NIL NIL (6 1 10) 8) (DEFINING% FUNCTIONS SUBSEC (68 101 102 105 110 105 110 103 32 70 117 110 99 116 105 111 110 115) NIL (2 10) 9) (DEFINING% FUNCTIONS TERM Defining% functions (*PRIMARY*) (2 10) 9) (FUNCTION% DEFINITIONS TERM Function% definitions NIL (2 10) 9) (FUNCTIONDEFINITION TAG NIL NIL (2 10) 9) (FUNCTION% DEFINITION% CELLS TERM Function% definition% cells (*PRIMARY*) (2 10) 9) (DEFINEQ (Function) ((FONT . LISP) 40 68 69 70 73 78 69 81 32 (FONT . ARG) 88 (START.SUB) 49 (END.SUB) 32 88 (START.SUB) 50 (END.SUB) 32 46 46 46 32 88 (START.SUB) 78 (END.SUB) (FONT . LISP) 41 (UNDO . FONT) (UNDO . FONT) (UNDO . FONT)) (*DEF*) (2 10) 9) (DEFINE (Function) ((FONT . LISP) 40 68 69 70 73 78 69 32 (FONT . ARG) 88 32 61221 (FONT . LISP) 41 (UNDO . FONT) (UNDO . FONT) (UNDO . FONT)) (*DEF*) (2 10) 9) (INCORRECT% DEFINING% FORM (Error Message) NIL NIL (2 10) 9) (BROKEN (Property Name) NIL NIL (2 10) 9) (ADVISED (Property Name) NIL NIL (2 10) 9) (BROKEN-IN (Property Name) NIL NIL (2 10) 9) (TIME% STAMPS TERM time% stamps NIL (2 10) 9) (UNSAFE.TO.MODIFY.FNS (Variable) ((FONT . LISP) 85 78 83 65 70 69 46 84 79 46 77 79 68 73 70 89 46 70 78 83 (UNDO . FONT)) (*DEF*) (2 10) 10) (BACKSLASH% FUNCTIONS TERM Backslash% functions (*PRIMARY*) (2 10) 10) (\% FUNCTIONS TERM \% functions (*PRIMARY*) (2 10) 10) (DFNFLG (Variable) ((FONT . LISP) 68 70 78 70 76 71 (UNDO . FONT)) (*DEF*) (2 10) 10) (PROP (Litatom) NIL (*PRIMARY*) (2 10) 10) (ALLPROP (Litatom) NIL (*PRIMARY*) (2 10) 10) (EXPR (Property Name) NIL (*PRIMARY*) (2 10) 10) (REDEFINED (printed by system) ((FONT . LISP) 40 (FONT . ARG) 70 78 (UNDO . FONT) 32 114 101 100 101 102 105 110 101 100 41 (UNDO . FONT) 32) NIL (2 10) 10) (GETD (Function) ((FONT . LISP) 40 71 69 84 68 32 (FONT . ARG) 70 78 (FONT . LISP) 41 (UNDO . FONT) (UNDO . FONT) (UNDO . FONT)) (*DEF*) (2 10) 10) (EQPCOMPILEDCODE TAG NIL NIL (2 10) 10) (PUTD (Function) ((FONT . LISP) 40 80 85 84 68 32 (FONT . ARG) 70 78 32 68 69 70 32 61221 (FONT . LISP) 41 (UNDO . FONT) (UNDO . FONT) (UNDO . FONT)) (*DEF*) (2 10) 11) (ILLEGAL% ARG (Error Message) NIL NIL (2 10) 11) (ARG% NOT% LITATOM (Error Message) NIL NIL (2 10) 11) (MOVD (Function) ((FONT . LISP) 40 77 79 86 68 32 (FONT . ARG) 70 82 79 77 32 84 79 32 67 79 80 89 70 76 71 32 61221 (FONT . LISP) 41 (UNDO . FONT) (UNDO . FONT) (UNDO . FONT)) (*DEF*) (2 10) 11) (MOVD? (Function) ((FONT . LISP) 40 77 79 86 68 63 32 (FONT . ARG) 70 82 79 77 32 84 79 32 67 79 80 89 70 76 71 32 61221 (FONT . LISP) 41 (UNDO . FONT) (UNDO . FONT) (UNDO . FONT)) (*DEF*) (2 10) 11) (FUNCTION% EVALUATION SUBSEC (70 117 110 99 116 105 111 110 32 69 118 97 108 117 97 116 105 111 110) NIL (3 10) 11) (EVALUATING% FUNCTIONS TERM Evaluating% functions (*PRIMARY*) (3 10) 11) (EVALUATING% EXPRESSIONS TERM Evaluating% expressions (*PRIMARY*) (3 10) 11) (INTERPRETING% EXPRESSIONS TERM Interpreting% expressions (*PRIMARY*) (3 10) 11) (APPLYING% FUNCTIONS% TO% ARGUMENTS TERM Applying% functions% to% arguments NIL (3 10) 11) (APPLY (Function) ((FONT . LISP) 40 65 80 80 76 89 32 (FONT . ARG) 70 78 32 65 82 71 76 73 83 84 32 61221 (FONT . LISP) 41 (UNDO . FONT) (UNDO . FONT) (UNDO . FONT)) (*DEF*) (3 10) 11) (APPLY* (Function) ((FONT . LISP) 40 65 80 80 76 89 42 32 (FONT . ARG) 70 78 32 65 82 71 (START.SUB) 49 (END.SUB) 32 65 82 71 (START.SUB) 50 (END.SUB) 32 46 46 46 32 65 82 71 (START.SUB) 78 (END.SUB) (FONT . LISP) 41 (UNDO . FONT) (UNDO . FONT) (UNDO . FONT)) (*DEF*) (3 10) 12) (EVAL (Function) ((FONT . LISP) 40 69 86 65 76 32 (FONT . ARG) 88 32 61221 (FONT . LISP) 41 (UNDO . FONT) (UNDO . FONT) (UNDO . FONT)) (*DEF*) (3 10) 12) (EVALUATING% ARGUMENTS% TO% FUNCTIONS TERM Evaluating% arguments% to% functions NIL (3 10) 12) (QUOTE (Function) ((FONT . LISP) 40 81 85 79 84 69 32 (FONT . ARG) 88 (FONT . LISP) 41 (UNDO . FONT) (UNDO . FONT) (UNDO . FONT)) (*DEF*) (3 10) 12) (' (Read macro) NIL NIL (3 10) 12) (PARENTHESIS% ERROR (Error Message) NIL NIL (3 10) 13) (KWOTE (Function) ((FONT . LISP) 40 75 87 79 84 69 32 (FONT . ARG) 88 (FONT . LISP) 41 (UNDO . FONT) (UNDO . FONT) (UNDO . FONT)) (*DEF*) (3 10) 13) (NLAMBDA.ARGS (Function) ((FONT . LISP) 40 78 76 65 77 66 68 65 46 65 82 71 83 32 (FONT . ARG) 88 (FONT . LISP) 41 (UNDO . FONT) (UNDO . FONT) (UNDO . FONT)) (*DEF*) (3 10) 13) (ASSOCIATION% LISTS% IN% EVALA TERM Association% lists% in% EVALA (*PRIMARY*) (3 10) 13) (EVALA (Function) ((FONT . LISP) 40 69 86 65 76 65 32 (FONT . ARG) 88 32 65 (FONT . LISP) 41 (UNDO . FONT) (UNDO . FONT) (UNDO . FONT)) (*DEF*) (3 10) 13) (EVALUATING% DATA% TYPES TERM Evaluating% data% types (*PRIMARY*) (3 10) 13) (DATA% TYPE% EVALUATING TERM Data% type% evaluating (*PRIMARY*) (3 10) 13) (DEFEVAL (Function) ((FONT . LISP) 40 68 69 70 69 86 65 76 32 (FONT . ARG) 84 89 80 69 32 70 78 (FONT . LISP) 41 (UNDO . FONT) (UNDO . FONT) (UNDO . FONT)) (*DEF*) (3 10) 13) (COMPILETYPELST (Variable) NIL NIL (3 10) 14) (EVALHOOK (Function) ((FONT . LISP) 40 69 86 65 76 72 79 79 75 32 (FONT . ARG) 70 79 82 77 32 69 86 65 76 72 79 79 75 70 78 (FONT . LISP) 41 (UNDO . FONT) (UNDO . FONT) (UNDO . FONT)) (*DEF*) (3 10) 14) (ITERATING% AND% MAPPING% FUNCTIONS SUBSEC (73 116 101 114 97 116 105 110 103 32 97 110 100 32 77 97 112 112 105 110 103 32 70 117 110 99 116 105 111 110 115) NIL (4 10) 14) (RPT (Function) ((FONT . LISP) 40 82 80 84 32 (FONT . ARG) 78 32 70 79 82 77 (FONT . LISP) 41 (UNDO . FONT) (UNDO . FONT) (UNDO . FONT)) (*DEF*) (4 10) 15) (RPTQ (Function) ((FONT . LISP) 40 82 80 84 81 32 (FONT . ARG) 78 32 70 79 82 77 (START.SUB) 49 (END.SUB) 32 70 79 82 77 (START.SUB) 50 (END.SUB) 32 46 46 46 32 70 79 82 77 (START.SUB) 78 (END.SUB) (FONT . LISP) 41 (UNDO . FONT) (UNDO . FONT) (UNDO . FONT)) (*DEF*) (4 10) 15) (FRPTQ (Function) ((FONT . LISP) 40 70 82 80 84 81 32 (FONT . ARG) 78 32 70 79 82 77 (START.SUB) 49 (END.SUB) 32 70 79 82 77 (START.SUB) 50 (END.SUB) 32 46 46 46 32 70 79 82 77 (START.SUB) 78 (END.SUB) (FONT . LISP) 41 (UNDO . FONT) (UNDO . FONT) (UNDO . FONT)) (*DEF*) (4 10) 15) (MAP (Function) ((FONT . LISP) 40 77 65 80 32 (FONT . ARG) 77 65 80 88 32 77 65 80 70 78 49 32 77 65 80 70 78 50 (FONT . LISP) 41 (UNDO . FONT) (UNDO . FONT) (UNDO . FONT)) (*DEF*) (4 10) 15) (MAPC (Function) ((FONT . LISP) 40 77 65 80 67 32 (FONT . ARG) 77 65 80 88 32 77 65 80 70 78 49 32 77 65 80 70 78 50 (FONT . LISP) 41 (UNDO . FONT) (UNDO . FONT) (UNDO . FONT)) (*DEF*) (4 10) 15) (MAPLIST (Function) ((FONT . LISP) 40 77 65 80 76 73 83 84 32 (FONT . ARG) 77 65 80 88 32 77 65 80 70 78 49 32 77 65 80 70 78 50 (FONT . LISP) 41 (UNDO . FONT) (UNDO . FONT) (UNDO . FONT)) (*DEF*) (4 10) 15) (MAPCAR (Function) ((FONT . LISP) 40 77 65 80 67 65 82 32 (FONT . ARG) 77 65 80 88 32 77 65 80 70 78 49 32 77 65 80 70 78 50 (FONT . LISP) 41 (UNDO . FONT) (UNDO . FONT) (UNDO . FONT)) (*DEF*) (4 10) 15) (MAPCON (Function) ((FONT . LISP) 40 77 65 80 67 79 78 32 (FONT . ARG) 77 65 80 88 32 77 65 80 70 78 49 32 77 65 80 70 78 50 (FONT . LISP) 41 (UNDO . FONT) (UNDO . FONT) (UNDO . FONT)) (*DEF*) (4 10) 15) (MAPCONC (Function) ((FONT . LISP) 40 77 65 80 67 79 78 67 32 (FONT . ARG) 77 65 80 88 32 77 65 80 70 78 49 32 77 65 80 70 78 50 (FONT . LISP) 41 (UNDO . FONT) (UNDO . FONT) (UNDO . FONT)) (*DEF*) (4 10) 16) (MAP2C (Function) ((FONT . LISP) 40 77 65 80 50 67 32 (FONT . ARG) 77 65 80 88 32 77 65 80 89 32 77 65 80 70 78 49 32 77 65 80 70 78 50 (FONT . LISP) 41 (UNDO . FONT) (UNDO . FONT) (UNDO . FONT)) (*DEF*) (4 10) 16) (MAP2CAR (Function) ((FONT . LISP) 40 77 65 80 50 67 65 82 32 (FONT . ARG) 77 65 80 88 32 77 65 80 89 32 77 65 80 70 78 49 32 77 65 80 70 78 50 (FONT . LISP) 41 (UNDO . FONT) (UNDO . FONT) (UNDO . FONT)) (*DEF*) (4 10) 16) (SUBSET (Function) ((FONT . LISP) 40 83 85 66 83 69 84 32 (FONT . ARG) 77 65 80 88 32 77 65 80 70 78 49 32 77 65 80 70 78 50 (FONT . LISP) 41 (UNDO . FONT) (UNDO . FONT) (UNDO . FONT)) (*DEF*) (4 10) 17) (EVERY (Function) ((FONT . LISP) 40 69 86 69 82 89 32 (FONT . ARG) 69 86 69 82 89 88 32 69 86 69 82 89 70 78 49 32 69 86 69 82 89 70 78 50 (FONT . LISP) 41 (UNDO . FONT) (UNDO . FONT) (UNDO . FONT)) (*DEF*) (4 10) 17) (SOME (Function) ((FONT . LISP) 40 83 79 77 69 32 (FONT . ARG) 83 79 77 69 88 32 83 79 77 69 70 78 49 32 83 79 77 69 70 78 50 (FONT . LISP) 41 (UNDO . FONT) (UNDO . FONT) (UNDO . FONT)) (*DEF*) (4 10) 17) (NOTANY (Function) ((FONT . LISP) 40 78 79 84 65 78 89 32 (FONT . ARG) 83 79 77 69 88 32 83 79 77 69 70 78 49 32 83 79 77 69 70 78 50 (FONT . LISP) 41 (UNDO . FONT) (UNDO . FONT) (UNDO . FONT)) (*DEF*) (4 10) 17) (NOTEVERY (Function) ((FONT . LISP) 40 78 79 84 69 86 69 82 89 32 (FONT . ARG) 69 86 69 82 89 88 32 69 86 69 82 89 70 78 49 32 69 86 69 82 89 70 78 50 (FONT . LISP) 41 (UNDO . FONT) (UNDO . FONT) (UNDO . FONT)) (*DEF*) (4 10) 17) (MAPRINT (Function) ((FONT . LISP) 40 77 65 80 82 73 78 84 32 (FONT . ARG) 76 83 84 32 70 73 76 69 32 76 69 70 84 32 82 73 71 72 84 32 83 69 80 32 80 70 78 32 76 73 83 80 88 80 82 73 78 84 70 76 71 (FONT . LISP) 41 (UNDO . FONT) (UNDO . FONT) (UNDO . FONT)) (*DEF*) (4 10) 17) (FUNCTIONAL% ARGUMENTS SUBSEC (70 117 110 99 116 105 111 110 97 108 32 65 114 103 117 109 101 110 116 115) NIL (5 10) 18) (FUNCTIONAL% ARGUMENTS TERM Functional% arguments (*PRIMARY*) (5 10) 18) (NILL (Function) ((FONT . LISP) 40 78 73 76 76 32 (FONT . ARG) 88 (START.SUB) 49 (END.SUB) 32 46 46 46 32 88 (START.SUB) 78 (END.SUB) (FONT . LISP) 41 (UNDO . FONT) (UNDO . FONT) (UNDO . FONT)) (*DEF*) (5 10) 18) (TRUE (Function) ((FONT . LISP) 40 84 82 85 69 32 (FONT . ARG) 88 (START.SUB) 49 (END.SUB) 32 46 46 46 32 88 (START.SUB) 78 (END.SUB) (FONT . LISP) 41 (UNDO . FONT) (UNDO . FONT) (UNDO . FONT)) (*DEF*) (5 10) 18) (ZERO (Function) ((FONT . LISP) 40 90 69 82 79 32 (FONT . ARG) 88 (START.SUB) 49 (END.SUB) 32 46 46 46 32 88 (START.SUB) 78 (END.SUB) (FONT . LISP) 41 (UNDO . FONT) (UNDO . FONT) (UNDO . FONT)) (*DEF*) (5 10) 18) (FUNCTION (Function) ((FONT . LISP) 40 70 85 78 67 84 73 79 78 32 (FONT . ARG) 70 78 32 69 78 86 (FONT . LISP) 41 (UNDO . FONT) (UNDO . FONT) (UNDO . FONT)) (*DEF*) (5 10) 18) (FUNARG TAG NIL NIL (5 10) 19) (FUNARG (Litatom) NIL (*PRIMARY*) (5 10) 19) (VARIABLE% BINDINGS TERM Variable% bindings NIL (5 10) 19) (MACROS SUBSEC (77 97 99 114 111 115) NIL (6 10) 21) (MACROS TAG NIL NIL (6 10) 21) (MACROS TERM Macros (*PRIMARY*) (6 10) 21) (MACROPROPS (Variable) NIL NIL (6 10) 21) (DMACRO (Property Name) NIL (*PRIMARY*) (6 10) 21) (10MACRO (Property Name) NIL (*PRIMARY*) (6 10) 21) (VAXMACRO (Property Name) NIL (*PRIMARY*) (6 10) 21) (JMACRO (Property Name) NIL (*PRIMARY*) (6 10) 21) (MACRO (Property Name) NIL (*PRIMARY*) (6 10) 21) (COMPILERMACROPROPS (Variable) NIL NIL (6 10) 22) (LAMBDA (Macro Type) NIL (*PRIMARY*) (6 10) 22) (NLAMBDA (Macro Type) NIL (*PRIMARY*) (6 10) 22) (SUBSTITUTION% MACROS TERM Substitution% macros (*PRIMARY*) (6 10) 22) (OPENLAMBDA (Macro Type) NIL (*PRIMARY*) (6 10) 22) (T (Macro Type) NIL (*PRIMARY*) (6 10) 23) (COMPUTED% MACROS TERM Computed% macros (*PRIMARY*) (6 10) 23) (IGNOREMACRO (Litatom) NIL NIL (6 10) 23) (INSTRUCTIONS (Litatom) NIL NIL (6 10) 23) (EXPANDMACRO (Function) ((FONT . LISP) 40 69 88 80 65 78 68 77 65 67 82 79 32 (FONT . ARG) 69 88 80 32 81 85 73 69 84 70 76 71 32 61221 32 61221 (FONT . LISP) 41 (UNDO . FONT) (UNDO . FONT) (UNDO . FONT)) (*DEF*) (6 10) 24) (DEFMACRO SUBSEC (68 69 70 77 65 67 82 79) NIL (1 6 10) 24) (OPTIONAL% MACRO% ARGUMENTS TERM Optional% macro% arguments (*PRIMARY*) (1 6 10) 24) (KEYWORD% MACRO% ARGUMENTS TERM Keyword% macro% arguments (*PRIMARY*) (1 6 10) 24) (DEFMACRO (Function) ((FONT . LISP) 40 68 69 70 77 65 67 82 79 32 (FONT . ARG) 78 65 77 69 32 65 82 71 83 32 70 79 82 77 (FONT . LISP) 41 (UNDO . FONT) (UNDO . FONT) (UNDO . FONT)) (*DEF*) (1 6 10) 24) (OPTIONAL (DEFMACRO keyword) ((FONT . LISP) 38 79 80 84 73 79 78 65 76 (UNDO . FONT)) NIL (1 6 10) 25) (&OPTIONAL (DEFMACRO keyword) NIL (*PRIMARY*) (1 6 10) 25) (REST (DEFMACRO keyword) ((FONT . LISP) 38 82 69 83 84 (UNDO . FONT)) NIL (1 6 10) 25) (&REST (DEFMACRO keyword) NIL (*PRIMARY*) (1 6 10) 25) (BODY (DEFMACRO keyword) ((FONT . LISP) 38 66 79 68 89 (UNDO . FONT)) NIL (1 6 10) 25) (&BODY (DEFMACRO keyword) NIL (*PRIMARY*) (1 6 10) 25) (KEY (DEFMACRO keyword) ((FONT . LISP) 38 75 69 89 (UNDO . FONT)) NIL (1 6 10) 25) (&KEY (DEFMACRO keyword) NIL (*PRIMARY*) (1 6 10) 25) (ALLOW-OTHER-KEYS (DEFMACRO keyword) ((FONT . LISP) 38 65 76 76 79 87 45 79 84 72 69 82 45 75 69 89 83 (UNDO . FONT)) NIL (1 6 10) 26) (&ALLOW-OTHER-KEYS (DEFMACRO keyword) NIL (*PRIMARY*) (1 6 10) 26) (AUX (DEFMACRO keyword) ((FONT . LISP) 38 65 85 88 (UNDO . FONT)) NIL (1 6 10) 26) (&AUX (DEFMACRO keyword) NIL (*PRIMARY*) (1 6 10) 26) (WHOLE (DEFMACRO keyword) ((FONT . LISP) 38 87 72 79 76 69 (UNDO . FONT)) NIL (1 6 10) 27) (&WHOLE (DEFMACRO keyword) NIL (*PRIMARY*) (1 6 10) 27) (DESTRUCTURING% ARGUMENT% LISTS TERM Destructuring% argument% lists (*PRIMARY*) (1 6 10) 27) (INTERPRETING% MACROS SUBSEC (73 110 116 101 114 112 114 101 116 105 110 103 32 77 97 99 114 111 115) NIL (2 6 10) 28) (SHOULDCOMPILEMACROATOMS (Variable) NIL NIL (2 6 10) 28) (UNSAFEMACROATOMS (Variable) NIL NIL (2 6 10) 28) (UNDEFINED% TAG (Error Message) NIL NIL (2 6 10) 28)