(THE% RECORD% PACKAGE CHAPTER (84 72 69 32 82 69 67 79 82 68 32 80 65 67 75 65 71 69) NIL (3) CHAPRECORDPACKAGE.IM;19 68) (RECORDPACKAGE TAG NIL NIL (3) CHAPRECORDPACKAGE.IM;19 149) (RECORD% PACKAGE TERM record% package (*BEGIN*) (3) CHAPRECORDPACKAGE.IM;19 181) (RECORDS (File Package Command) NIL NIL (3) CHAPRECORDPACKAGE.IM;19 3194) (FETCH% AND% REPLACE SUBSEC (70 69 84 67 72 32 97 110 100 32 82 69 80 76 65 67 69) NIL (1 3) CHAPRECORDPACKAGE.IM;19 3436) (FETCH (Record Operator) NIL (*PRIMARY*) (1 3) CHAPRECORDPACKAGE.IM;19 3479) (REPLACE (Record Operator) NIL (*PRIMARY*) (1 3) CHAPRECORDPACKAGE.IM;19 3523) (AMBIGUOUS% RECORD% FIELD (Error Message) NIL NIL (1 3) CHAPRECORDPACKAGE.IM;19 5026) (AMBIGUOUS% DATA% PATH (Error Message) NIL NIL (1 3) CHAPRECORDPACKAGE.IM;19 7522) (FFETCH (Record Package) NIL NIL (1 3) CHAPRECORDPACKAGE.IM;19 7677) (FREPLACE (Record Package) NIL NIL (1 3) CHAPRECORDPACKAGE.IM;19 7730) (/REPLACE (Record Package) NIL NIL (1 3) CHAPRECORDPACKAGE.IM;19 7833) (CREATE SUBSEC (67 82 69 65 84 69) NIL (2 3) CHAPRECORDPACKAGE.IM;19 7961) (CREATE (Record Operator) NIL (*PRIMARY*) (2 3) CHAPRECORDPACKAGE.IM;19 8005) (USING (Record Package) NIL NIL (2 3) CHAPRECORDPACKAGE.IM;19 9089) (COPYING (Record Package) NIL NIL (2 3) CHAPRECORDPACKAGE.IM;19 9253) (REUSING (Record Package) NIL NIL (2 3) CHAPRECORDPACKAGE.IM;19 9330) (SMASHING (Record Package) NIL NIL (2 3) CHAPRECORDPACKAGE.IM;19 9624) (TYPE? SUBSEC (84 89 80 69 63) NIL (3 3) CHAPRECORDPACKAGE.IM;19 12877) (TYPE? (Record Operator) NIL (*PRIMARY*) (3 3) CHAPRECORDPACKAGE.IM;19 12920) (TYPE?% NOT% IMPLEMENTED% FOR% THIS% RECORD (Error Message) NIL NIL (3 3) CHAPRECORDPACKAGE.IM;19 14099) (WITH SUBSEC (87 73 84 72) NIL (4 3) CHAPRECORDPACKAGE.IM;19 14401) (WITH (Record Operator) NIL (*PRIMARY*) (4 3) CHAPRECORDPACKAGE.IM;19 14443) (RECORD% DECLARATIONS SUBSEC (82 101 99 111 114 100 32 68 101 99 108 97 114 97 116 105 111 110 115) NIL (5 3) CHAPRECORDPACKAGE.IM;19 15638) (RECORDDECLARATIONS TAG NIL NIL (5 3) CHAPRECORDPACKAGE.IM;19 15665) (RECORD% DECLARATIONS TERM record% declarations (*BEGIN*) (5 3) CHAPRECORDPACKAGE.IM;19 15703) (RECORD% DECLARATIONS TERM record% declarations (*PRIMARY*) (5 3) CHAPRECORDPACKAGE.IM;19 15741) (RECORD-TYPE (Record Package) record-type NIL (5 3) CHAPRECORDPACKAGE.IM;19 16215) (RECORD (Record Type) ((FONT . LISP) 82 69 67 79 82 68 (UNDO . FONT)) (*DEF*) (5 3) CHAPRECORDPACKAGE.IM;19 18094) (TYPERECORD (Record Type) ((FONT . LISP) 84 89 80 69 82 69 67 79 82 68 (UNDO . FONT)) (*DEF*) (5 3) CHAPRECORDPACKAGE.IM;19 18762) (TYPE? (Record Package) NIL NIL (5 3) CHAPRECORDPACKAGE.IM;19 19026) (ASSOCRECORD (Record Type) ((FONT . LISP) 65 83 83 79 67 82 69 67 79 82 68 (UNDO . FONT)) (*DEF*) (5 3) CHAPRECORDPACKAGE.IM;19 19435) (PROPRECORD (Record Type) ((FONT . LISP) 80 82 79 80 82 69 67 79 82 68 (UNDO . FONT)) (*DEF*) (5 3) CHAPRECORDPACKAGE.IM;19 19834) (ARRAYRECORD (Record Type) ((FONT . LISP) 65 82 82 65 89 82 69 67 79 82 68 (UNDO . FONT)) (*DEF*) (5 3) CHAPRECORDPACKAGE.IM;19 20699) (HASHLINK (Record Type) ((FONT . LISP) 72 65 83 72 76 73 78 75 (UNDO . FONT)) (*DEF*) (5 3) CHAPRECORDPACKAGE.IM;19 21366) (ATOMRECORD (Record Type) ((FONT . LISP) 65 84 79 77 82 69 67 79 82 68 (UNDO . FONT)) (*DEF*) (5 3) CHAPRECORDPACKAGE.IM;19 22527) (DATATYPE (Record Type) ((FONT . LISP) 68 65 84 65 84 89 80 69 (UNDO . FONT)) (*DEF*) (5 3) CHAPRECORDPACKAGE.IM;19 22849) (RECORDDECLARATIONDATATYPE TAG NIL NIL (5 3) CHAPRECORDPACKAGE.IM;19 22881) (POINTER (record field type) NIL NIL (5 3) CHAPRECORDPACKAGE.IM;19 23555) (BITS (record field type) NIL NIL (5 3) CHAPRECORDPACKAGE.IM;19 23684) (BETWEEN (record field type) NIL NIL (5 3) CHAPRECORDPACKAGE.IM;19 23829) (INTEGER (record field type) NIL NIL (5 3) CHAPRECORDPACKAGE.IM;19 24270) (FIXP (record field type) NIL NIL (5 3) CHAPRECORDPACKAGE.IM;19 24302) (FLOATING (record field type) NIL NIL (5 3) CHAPRECORDPACKAGE.IM;19 24470) (FLOATP (record field type) NIL NIL (5 3) CHAPRECORDPACKAGE.IM;19 24504) (FLAG (record field type) NIL NIL (5 3) CHAPRECORDPACKAGE.IM;19 24615) (RECORDS (File Package Command) NIL NIL (5 3) CHAPRECORDPACKAGE.IM;19 25628) (INITRECORDS (File Package Command) NIL NIL (5 3) CHAPRECORDPACKAGE.IM;19 25798) (ARRAYBLOCK (Record Type) ((FONT . LISP) 65 82 82 65 89 66 76 79 67 75 (UNDO . FONT)) (*DEF*) (5 3) CHAPRECORDPACKAGE.IM;19 26726) (ACCESSFNS (Record Type) ((FONT . LISP) 65 67 67 69 83 83 70 78 83 (UNDO . FONT)) (*DEF*) (5 3) CHAPRECORDPACKAGE.IM;19 27229) (DATUM (Variable) NIL NIL (5 3) CHAPRECORDPACKAGE.IM;19 27885) (NEWVALUE (Variable) NIL NIL (5 3) CHAPRECORDPACKAGE.IM;19 27905) (REPLACE% UNDEFINED% FOR% FIELD (Error Message) NIL NIL (5 3) CHAPRECORDPACKAGE.IM;19 28402) (CREATE% NOT% DEFINED% FOR% THIS% RECORD (Error Message) NIL NIL (5 3) CHAPRECORDPACKAGE.IM;19 28789) (← (in record declarations) NIL NIL (5 3) CHAPRECORDPACKAGE.IM;19 30760) (CREATE (Record Package) NIL NIL (5 3) CHAPRECORDPACKAGE.IM;19 30925) (CREATE (Record Package) NIL NIL (5 3) CHAPRECORDPACKAGE.IM;19 31200) (ACCESSFNS (Record Package) NIL NIL (5 3) CHAPRECORDPACKAGE.IM;19 31326) (DATUM (Variable) NIL NIL (5 3) CHAPRECORDPACKAGE.IM;19 31584) (← (in record declarations) NIL NIL (5 3) CHAPRECORDPACKAGE.IM;19 31889) (INIT (in record declarations) NIL NIL (5 3) CHAPRECORDPACKAGE.IM;19 31961) (TYPE? (in record declarations) NIL NIL (5 3) CHAPRECORDPACKAGE.IM;19 32409) (RECORDDECLARATIONTYPE? TAG NIL NIL (5 3) CHAPRECORDPACKAGE.IM;19 32437) (DATUM (Variable) NIL NIL (5 3) CHAPRECORDPACKAGE.IM;19 32601) (SUBDECLARATIONS (Record Package) subdeclarations NIL (5 3) CHAPRECORDPACKAGE.IM;19 33423) (RECORDSUBDECLARATIONS TAG NIL NIL (5 3) CHAPRECORDPACKAGE.IM;19 33450) (RECORD% DECLARATIONS TERM record% declarations (*END*) (5 3) CHAPRECORDPACKAGE.IM;19 34729) (DEFINING% NEW% RECORD% TYPES SUBSEC (68 101 102 105 110 105 110 103 32 78 101 119 32 82 101 99 111 114 100 32 84 121 112 101 115) NIL (6 3) CHAPRECORDPACKAGE.IM;19 35139) (CLISPRECORDTYPES (Variable) NIL NIL (6 3) CHAPRECORDPACKAGE.IM;19 35357) (USERRECORDTYPE (Property Name) NIL NIL (6 3) CHAPRECORDPACKAGE.IM;19 35688) (RECORD% MANIPULATION% FUNCTIONS SUBSEC (82 101 99 111 114 100 32 77 97 110 105 112 117 108 97 116 105 111 110 32 70 117 110 99 116 105 111 110 115) NIL (7 3) CHAPRECORDPACKAGE.IM;19 36068) (CHANGING% RECORD% DECLARATIONS TERM changing% record% declarations NIL (7 3) CHAPRECORDPACKAGE.IM;19 36106) (EDITREC (Function) ((FONT . LISP) 40 69 68 73 84 82 69 67 32 (FONT . ARG) 78 65 77 69 32 67 79 77 (TEXT (92 115 117 98 123) 123) 49 (TEXT (125) 125) 32 (TEXT (36 92 99 100 111 116 115 36) 36) 32 67 79 77 (TEXT (92 115 117 98 123) 123) 78 (TEXT (125) 125) (FONT . LISP) 41 (UNDO . FONT) (UNDO . FONT) (UNDO . FONT)) (*DEF*) (7 3) CHAPRECORDPACKAGE.IM;19 36287) (RECLOOK (Function) ((FONT . LISP) 40 82 69 67 76 79 79 75 32 (FONT . ARG) 82 69 67 79 82 68 78 65 77 69 32 (TEXT (123) 123) 45 45 45 (TEXT (125) 125) 32 (TEXT (123) 123) 45 45 45 (TEXT (125) 125) 32 (TEXT (123) 123) 45 45 45 (TEXT (125) 125) 32 (TEXT (123) 123) 45 45 45 (TEXT (125) 125) (FONT . LISP) 41 (UNDO . FONT) (UNDO . FONT) (UNDO . FONT)) (*DEF*) (7 3) CHAPRECORDPACKAGE.IM;19 37372) (FIELDLOOK (Function) ((FONT . LISP) 40 70 73 69 76 68 76 79 79 75 32 (FONT . ARG) 70 73 69 76 68 78 65 77 69 (FONT . LISP) 41 (UNDO . FONT) (UNDO . FONT) (UNDO . FONT)) (*DEF*) (7 3) CHAPRECORDPACKAGE.IM;19 37843) (RECORDFIELDNAMES (Function) ((FONT . LISP) 40 82 69 67 79 82 68 70 73 69 76 68 78 65 77 69 83 32 (FONT . ARG) 82 69 67 79 82 68 78 65 77 69 (FONT . LISP) 41 (UNDO . FONT) (UNDO . FONT) (UNDO . FONT)) (*DEF*) (7 3) CHAPRECORDPACKAGE.IM;19 37990) (RECORDACCESS (Function) ((FONT . LISP) 40 82 69 67 79 82 68 65 67 67 69 83 83 32 (FONT . ARG) 70 73 69 76 68 32 68 65 84 85 77 32 68 69 67 32 84 89 80 69 32 78 69 87 86 65 76 85 69 (FONT . LISP) 41 (UNDO . FONT) (UNDO . FONT) (UNDO . FONT)) (*DEF*) (7 3) CHAPRECORDPACKAGE.IM;19 38199) (CHANGETRAN SUBSEC (67 104 97 110 103 101 116 114 97 110) NIL (8 3) CHAPRECORDPACKAGE.IM;19 39035) (CHANGETRAN TERM Changetran (*BEGIN*) (8 3) CHAPRECORDPACKAGE.IM;19 39112) (STRUCTURE% MODIFICATION% %(IN% CHANGETRAN%) TERM structure% modification% %(in% Changetran%) NIL (8 3) CHAPRECORDPACKAGE.IM;19 40747) (ADD (Change Word) ((FONT . LISP) 40 65 68 68 32 (FONT . ARG) 68 65 84 85 77 32 73 84 69 77 (TEXT (92 115 117 98 123) 123) 49 (TEXT (125) 125) 32 73 84 69 77 (TEXT (92 115 117 98 123) 123) 50 (TEXT (125) 125) 32 (TEXT (36 92 99 100 111 116 115 36) 36) (FONT . LISP) 41 (UNDO . FONT) (UNDO . FONT) (UNDO . FONT)) (*DEF*) (8 3) CHAPRECORDPACKAGE.IM;19 42741) (PUSH (Change Word) ((FONT . LISP) 40 80 85 83 72 32 (FONT . ARG) 68 65 84 85 77 32 73 84 69 77 (TEXT (92 115 117 98 123) 123) 49 (TEXT (125) 125) 32 73 84 69 77 (TEXT (92 115 117 98 123) 123) 50 (TEXT (125) 125) 32 (TEXT (36 92 99 100 111 116 115 36) 36) (FONT . LISP) 41 (UNDO . FONT) (UNDO . FONT) (UNDO . FONT)) (*DEF*) (8 3) CHAPRECORDPACKAGE.IM;19 43054) (PUSHNEW (Change Word) ((FONT . LISP) 40 80 85 83 72 78 69 87 32 (FONT . ARG) 68 65 84 85 77 32 73 84 69 77 (FONT . LISP) 41 (UNDO . FONT) (UNDO . FONT) (UNDO . FONT)) (*DEF*) (8 3) CHAPRECORDPACKAGE.IM;19 43336) (PUSHLIST (Change Word) ((FONT . LISP) 40 80 85 83 72 76 73 83 84 32 (FONT . ARG) 68 65 84 85 77 32 73 84 69 77 (TEXT (92 115 117 98 123) 123) 49 (TEXT (125) 125) 32 73 84 69 77 (TEXT (92 115 117 98 123) 123) 50 (TEXT (125) 125) 32 (TEXT (36 92 99 100 111 116 115 36) 36) (FONT . LISP) 41 (UNDO . FONT) (UNDO . FONT) (UNDO . FONT)) (*DEF*) (8 3) CHAPRECORDPACKAGE.IM;19 43744) (POP (Change Word) ((FONT . LISP) 40 80 79 80 32 (FONT . ARG) 68 65 84 85 77 (FONT . LISP) 41 (UNDO . FONT) (UNDO . FONT) (UNDO . FONT)) (*DEF*) (8 3) CHAPRECORDPACKAGE.IM;19 44002) (SWAP (Change Word) ((FONT . LISP) 40 83 87 65 80 32 (FONT . ARG) 68 65 84 85 77 (TEXT (92 115 117 98 123) 123) 49 (TEXT (125) 125) 32 68 65 84 85 77 (TEXT (92 115 117 98 123) 123) 50 (TEXT (125) 125) (FONT . LISP) 41 (UNDO . FONT) (UNDO . FONT) (UNDO . FONT)) (*DEF*) (8 3) CHAPRECORDPACKAGE.IM;19 44370) (CHANGE (Change Word) ((FONT . LISP) 40 67 72 65 78 71 69 32 (FONT . ARG) 68 65 84 85 77 32 70 79 82 77 (FONT . LISP) 41 (UNDO . FONT) (UNDO . FONT) (UNDO . FONT)) (*DEF*) (8 3) CHAPRECORDPACKAGE.IM;19 44519) (DATUM (in Changetran) NIL NIL (8 3) CHAPRECORDPACKAGE.IM;19 45022) (CLISPWORD (Property Name) NIL NIL (8 3) CHAPRECORDPACKAGE.IM;19 45669) (CHANGEWORD (Property Name) NIL NIL (8 3) CHAPRECORDPACKAGE.IM;19 45994) (CHANGETRAN TERM Changetran (*END*) (8 3) CHAPRECORDPACKAGE.IM;19 47411) (RECORD% PACKAGE TERM record% package (*END*) (3) CHAPRECORDPACKAGE.IM;19 47469) (USER% DEFINED% DATA% TYPES SUBSEC (85 115 101 114 32 68 101 102 105 110 101 100 32 68 97 116 97 32 84 121 112 101 115) NIL (9 3) CHAPRECORDPACKAGE.IM;19 48418) (USERDATATYPES TAG NIL NIL (9 3) CHAPRECORDPACKAGE.IM;19 48439) (DECLAREDATATYPE (Function) ((FONT . LISP) 40 68 69 67 76 65 82 69 68 65 84 65 84 89 80 69 32 (FONT . ARG) 84 89 80 69 78 65 77 69 32 70 73 69 76 68 83 80 69 67 83 (FONT . LISP) 41 (UNDO . FONT) (UNDO . FONT) (UNDO . FONT)) (*DEF*) (9 3) CHAPRECORDPACKAGE.IM;19 49467) (POINTER (as a field specification) NIL NIL (9 3) CHAPRECORDPACKAGE.IM;19 49795) (FIXP (as a field specification) NIL NIL (9 3) CHAPRECORDPACKAGE.IM;19 49901) (FLOATP (as a field specification) NIL NIL (9 3) CHAPRECORDPACKAGE.IM;19 50000) (BITS (as a field specification) NIL NIL (9 3) CHAPRECORDPACKAGE.IM;19 50118) (FETCHFIELD (Function) ((FONT . LISP) 40 70 69 84 67 72 70 73 69 76 68 32 (FONT . ARG) 68 69 83 67 82 73 80 84 79 82 32 68 65 84 85 77 (FONT . LISP) 41 (UNDO . FONT) (UNDO . FONT) (UNDO . FONT)) (*DEF*) (9 3) CHAPRECORDPACKAGE.IM;19 50655) (DATUM% OF% INCORRECT% TYPE (Error Message) NIL NIL (9 3) CHAPRECORDPACKAGE.IM;19 50996) (REPLACEFIELD (Function) ((FONT . LISP) 40 82 69 80 76 65 67 69 70 73 69 76 68 32 (FONT . ARG) 68 69 83 67 82 73 80 84 79 82 32 68 65 84 85 77 32 78 69 87 86 65 76 85 69 (FONT . LISP) 41 (UNDO . FONT) (UNDO . FONT) (UNDO . FONT)) (*DEF*) (9 3) CHAPRECORDPACKAGE.IM;19 51200) (NCREATE (Function) ((FONT . LISP) 40 78 67 82 69 65 84 69 32 (FONT . ARG) 84 89 80 69 78 65 77 69 32 70 82 79 77 (FONT . LISP) 41 (UNDO . FONT) (UNDO . FONT) (UNDO . FONT)) (*DEF*) (9 3) CHAPRECORDPACKAGE.IM;19 51587) (ILLEGAL% DATA% TYPE (Error Message) NIL NIL (9 3) CHAPRECORDPACKAGE.IM;19 52070) (GETFIELDSPECS (Function) ((FONT . LISP) 40 71 69 84 70 73 69 76 68 83 80 69 67 83 32 (FONT . ARG) 84 89 80 69 78 65 77 69 (FONT . LISP) 41 (UNDO . FONT) (UNDO . FONT) (UNDO . FONT)) (*DEF*) (9 3) CHAPRECORDPACKAGE.IM;19 52207) (GETDESCRIPTORS (Function) ((FONT . LISP) 40 71 69 84 68 69 83 67 82 73 80 84 79 82 83 32 (FONT . ARG) 84 89 80 69 78 65 77 69 (FONT . LISP) 41 (UNDO . FONT) (UNDO . FONT) (UNDO . FONT)) (*DEF*) (9 3) CHAPRECORDPACKAGE.IM;19 52462) (USERDATATYPES (Function) ((FONT . LISP) 40 85 83 69 82 68 65 84 65 84 89 80 69 83 41 (UNDO . FONT)) (*DEF*) (9 3) CHAPRECORDPACKAGE.IM;19 52622)