(DEFINE-FILE-INFO READTABLE "INTERLISP" PACKAGE "INTERLISP") (FILECREATED "13-Jan-87 15:01:31" ("compiled on " {ERIS}LISPCORE>COMPARESOURCES.;7) " 7-Jan-87 03:28:48" tcompl'd in "Xerox Lisp 7-Jan-87 ..." dated " 7-Jan-87 03:56:58") (FILECREATED "13-Jan-87 15:00:32" {ERIS}LISPCORE>COMPARESOURCES.;7 26035 changes to%: (VARS COMPARESOURCESCOMS) (FNS COMPARESOURCES) previous date%: "29-Dec-86 12:46:44" {ERIS}LISPCORE>COMPARESOURCES.;6) COMPARESOURCES :D4 (P 26 TYPE P 25 Y P 24 X P 22 Y P 17 *PRINT-BASE* P 16 *READ-BASE* P 15 *READTABLE* P 14 *PACKAGE* P 13 E P 6 DECLAREY P 5 DECLAREX P 4 ENVY P 3 ENVX P 2 BODYY P 1 BODYX P 0 DIFFERENCES I 4 LISTSTREAM I 3 DW? I 2 EXAMINE I 1 FILEY I 0 FILEX) >@i @D oD D bAi AD oD D b@ _OI YA _OJ ZoD @D oD @g D oD AD oD Ag D oD D D I1 OO]IM YJ1 OO^JN ZKL OOOOIJCD M N IJAO$oO& Y1O.D H dg_OOh__O_^O&_dg_OOh__O_NO&__,I O,h_*O(O*h_(_&O$_$lO*&_(_0J _2O0_4O0O2O2O0 _2 _0O2FD oD gO4` o D oD D O0 O2 CD O._.(563 \CS.COMPARE.MASTERS 558 REVERSE 553 REVERSE 547 TERPRI 542 PRIN1 533 PRIN1 528 \APPEND2 521 EQLDIFFERENCE 509 PRIN1 500 TERPRI 489 LDIFFERENCE 483 LDIFFERENCE 460 SASSOC 413 SASSOC 326 REVERSE 320 TERPRI 302 \APPEND2 285 \CS.SORT.DECLARES 280 \CS.SORT.DECLARES 275 \CS.COMPARE.MASTERS 243 MAKE-READER-ENVIRONMENT 233 EQLDIFFERENCE 210 EQLDIFFERENCE 188 TERPRI 183 TERPRI 178 PRIN1 169 PRIN1 165 GETFILEINFO 157 PRIN1 148 PRIN1 142 PRIN1 133 PRIN1 129 GETFILEINFO 121 PRIN1 112 PRIN1 106 PRIN1 97 \CS.FILTER.GARBAGE 84 \MVLIST 81 READFILE 76 \CS.FILTER.GARBAGE 63 \MVLIST 60 READFILE 53 TERPRI 49 PRIN1 41 PRIN1 34 FINDFILE 26 TERPRI 22 PRIN1 14 PRIN1 7 FINDFILE) (518 DEFAULT.DECLARE.TAGS 513 DECLARE%: 372 DECLARE%: 333 DECLARE%: 246 READER-ENVIRONMENT 162 CREATIONDATE 126 CREATIONDATE) ( 538 " forms------" 525 (--) 505 "------" 174 ":" 153 " dated " 138 " and " 117 " dated " 102 "Comparing " 45 " not found" 18 " not found") \CS.COMPARE.MASTERSA0001 :D4 (I 2 STREAM I 1 Y I 0 X) @AB (9 COMPARELISTS) NIL () \CS.COMPARE.MASTERS :D4 (P 25 EXTRAS P 24 COMMENTY P 23 COMMENTX P 22 X P 17 DEFFER P 16 TYPE P 14 X P 12 NOSPELLFLG P 7 TMP P 6 Y P 5 DIFS P 4 PRED P 3 XTHING P 2 YTHING P 1 FNSY P 0 FNSX I 3 LISTSTREAM I 2 DW? I 1 BODYY I 0 BODYX F 26 DIFFERENCES F 27 EXAMINE F 28 FILEPKGTYPES F 29 FILEY F 30 FILEX) @1 OOX@H b0 H;dg_OOh__O_O&_d_O+O__OXA1 OOYAI b0 IE _Odg_OOh__O_O&_d_OaO__OYHd " 797 (FIX 1) 732 "---Expressions:" 421 " defined by " 201 "---Functions: ") \CS.COMPARE.TYPES :D4 (P 6 Y P 4 TAIL P 3 NAME P 2 RESULT P 1 Y P 0 X I 5 LISTSTREAM I 4 IDFN I 3 COMPAREFN I 2 TITLE I 1 YTHING I 0 XTHING F 7 EXAMINE F 8 FILEY F 9 FILEX) n@ Ae@Ad@ b bAN@B)E oE BE oE E E @dLXkDAMBhYPKE oE WE E WiWgWtgWlH e^kDKNiM]KE oE E CHIElCHIE E WiWgWgWHIh IAhLhKJZ;A@ IdNkD[E oE WE E WiWgWgWN KJZJ(352 EDITE 323 TERPRI 318 PRIN1 311 PRIN1 302 PRIN2 286 LDIFFERENCE 257 EDITE 224 TERPRI 219 COMPARELISTS 202 TERPRI 197 PRIN1 188 PRIN2 162 EDITE 131 TERPRI 126 PRIN1 119 PRIN1 110 PRIN2 76 TERPRI 71 TERPRI 66 PRIN1 57 PRIN1 51 PRIN1 42 TERPRI 22 LDIFFERENCE 16 LDIFFERENCE) (344 NEW 335 NEW 245 OLD 236 OLD 153 NEW 143 NEW) ( 307 " is not on " 193 ": " 115 " is not on " 62 ":" 47 "---") \CS.SORT.DECLARES :D4 (P 1 DEC P 0 RESULT I 0 DECLS)  @dY` H(13 \CS.SORT.DECLARE1) (10 DEFAULT.DECLARE.TAGS) () \CS.SORT.DECLARE1 :D4 (P 4 COMPLEMENT P 3 TAG P 2 CURRENT P 1 TAIL I 1 TAGLST I 0 DEC F 5 RESULT) @AHYh[ddggggKdgg[A gK AKIYhkKdggOggEKdgg8gg.Kdgg!ggKdgggg\AKLA AKh bhZ-gKA JAU ZUAhZh c JKJI(228 \NCONC2 215 SASSOC 205 \CS.SORT.DECLARE1 187 \APPEND2 179 SUBST 67 STRPOS 56 MEMB) (198 DECLARE%: 169 FIRST 163 NOTFIRST 159 NOTFIRST 153 FIRST 146 EVAL@LOAD 141 DONTEVAL@LOAD 136 DONTEVAL@LOAD 130 EVAL@LOAD 123 EVAL@COMPILE 118 DONTEVAL@COMPILE 113 DONTEVAL@COMPILE 107 EVAL@COMPILE 100 COPY 95 DONTCOPY 90 DONTCOPY 84 COPY 63 WHEN 51 COPY 45 DOCOPY 39 EVAL@COMPILE 34 DOEVAL@COMPILE 29 EVAL@LOAD 23 DOEVAL@LOAD) () \CS.FILTER.GARBAGE :D4 (L (0 FILECONTENTS)) U@AHI\g9Ldg'dgdgLgLLJ KhZHXK&NIL (57 FILEMAP 47 COPYRIGHT 33 DONTCOPY 24 DECLARE%: 15 FILECREATED) () EQLDIFFERENCE :D4 (L (1 Y 0 X)) &@1HIdA J KhZYHXK&Z(15 MEMB) NIL () \CS.ISVARFORM :D4 (L (0 X)) @dgdgdgiNIL (17 RPAQ? 11 RPAQQ 5 RPAQ) () \CS.COMPARE.VARS :D4 (P 2 YVAL P 1 XVAL I 2 STREAM I 1 Y I 0 X) @dAAB g@Hddi3 gHh@AdgHddi3 gHhIJ3@gggB oB AgggB B IJB (157 COMPARELISTS 150 TERPRI 146 PRIN1 128 PRIN1 120 PRIN1 17 COMPARELISTS) (142 VARS 138 INITVARS 133 RPAQ? 116 VARS 112 INITVARS 107 RPAQ? 85 QUOTE 62 RPAQQ 46 QUOTE 22 RPAQQ) ( 124 " -> ") \CS.ISMACROFORM :D4 (L (0 X)) @dgig @`NIL (22 MACROPROPS 12 PUTPROPS 5 DEFMACRO) () \CS.ISRECFORM :D4 (L (0 X)) @`NIL (4 CLISPRECORDTYPES) () \CS.ISCOURIERFORM :D4 (L (0 X)) @gNIL (4 COURIERPROGRAM) () \CS.ISTEMPLATEFORM :D4 (L (0 X)) @gNIL (4 SETTEMPLATE) () \CS.COMPARE.TEMPLATES :D4 (I 2 STREAM I 1 Y I 0 X) :@A+@dg Ag@AB @AB (55 COMPARELISTS 48 COMPARELISTS) (29 QUOTE 17 QUOTE) () \CS.ISPROPFORM :D4 (L (0 X)) @g @hNIL (4 PUTPROPS) () \CS.PROP.NAME :D4 (L (0 X)) @@hNIL NIL () \CS.COMPARE.PROPS :D4 (I 2 STREAM I 1 Y I 0 X) @AB (13 COMPARELISTS) NIL () \CS.ISADDVARFORM :D4 (L (0 X)) @gNIL (4 ADDTOVAR) () \CS.COMPARE.ADDVARS :D4 (I 2 STREAM I 1 Y I 0 X) @AB (9 COMPARELISTS) NIL () \CS.ISFPKGCOMFORM :D4 (L (0 X)) @g @oNIL (4 PUTDEF) ( 15 (QUOTE FILEPKGCOMS)) \CS.COMPARE.FPKGCOMS :D4 (I 2 STREAM I 1 Y I 0 X) @AB (17 COMPARELISTS) NIL () (PRETTYCOMPRINT COMPARESOURCESCOMS) (RPAQQ COMPARESOURCESCOMS ((FNS COMPARESOURCES \CS.COMPARE.MASTERS \CS.COMPARE.TYPES \CS.SORT.DECLARES \CS.SORT.DECLARE1 \CS.FILTER.GARBAGE EQLDIFFERENCE) (FNS \CS.ISVARFORM \CS.COMPARE.VARS \CS.ISMACROFORM \CS.ISRECFORM \CS.ISCOURIERFORM \CS.ISTEMPLATEFORM \CS.COMPARE.TEMPLATES \CS.ISPROPFORM \CS.PROP.NAME \CS.COMPARE.PROPS \CS.ISADDVARFORM \CS.COMPARE.ADDVARS \CS.ISFPKGCOMFORM \CS.COMPARE.FPKGCOMS) (VARS COMPARESOURCETYPES DEFAULT.DECLARE.TAGS) (DECLARE%: EVAL@COMPILE DONTCOPY (RECORDS CSTYPE) (GLOBALVARS COMPARESOURCETYPES CLISPRECORDTYPES MACROPROPS NOSPELLFLG DEFAULT.DECLARE.TAGS)))) (RPAQQ COMPARESOURCETYPES ((VARS \CS.ISVARFORM \CS.COMPARE.VARS) (MACROS \CS.ISMACROFORM) (RECORDS \CS.ISRECFORM) (PROPS \CS.ISPROPFORM \CS.COMPARE.PROPS \CS.PROP.NAME "Properties") (ADDVARS \CS.ISADDVARFORM \CS.COMPARE.ADDVARS CADR "Additions to lists") (TEMPLATES \CS.ISTEMPLATEFORM \CS.COMPARE.TEMPLATES CADADR) (COURIERPROGRAMS \CS.ISCOURIERFORM) (FILEPKGCOMS \CS.ISFPKGCOMFORM \CS.COMPARE.FPKGCOMS CADADR))) (RPAQQ DEFAULT.DECLARE.TAGS (EVAL@LOAD DONTEVAL@COMPILE COPY NOTFIRST)) (PUTPROPS COMPARESOURCES COPYRIGHT ("Xerox Corporation" 1985 1986 1987)) NIL