(FILECREATED " 8-Jan-84 21:07:57" ("compiled on " {PHYLUM}LISP>IMCOMPARE.;4) " 8-Jan-84 18:35:22" tcompl'd in WORK dated " 8-Jan-84 18:46:05") (FILECREATED " 8-Jan-84 21:07:31" {PHYLUM}LISP>IMCOMPARE.;4 25712 changes to: (FNS IMCOMPARE IMCOMPARE.CHUNKS IMCOMPARE.COLLECT.HASH.CHUNKS IMCOMPARE.DISPLAY.FILE.DIFFERENCE.GRAPH IMCOMPARE.HASH IMCOMPARE.UPDATE.SYMBOL.TABLE) previous date: " 6-Jan-84 16:21:39" {PHYLUM}LISP>IMCOMPARE.;3) IMCOMPARE D1 (P 1 OLDFILE P 0 NEWFILE I 3 GRAPH.REGION I 2 HASH.TYPE I 1 OLDFILENAME I 0 NEWFILENAME) @i Ai IYHVhjHg HhhjIg IhBCdildnlho` `  -oi @i oi Ai oi i h(221Q TERPRI 214Q PRIN1 203Q PRIN1 175Q PRIN1 164Q PRIN1 156Q PRIN1 144Q IMCOMPARE.CHUNKS 141Q GETREGION 135Q TERPRI 126Q PRIN1 113Q CLRPROMPT 52Q GETFILEINFO 33Q GETFILEINFO 11Q FINDFILE 4 FINDFILE) (132Q PROMPTWINDOW 123Q PROMPTWINDOW 47Q LENGTH 30Q LENGTH) ( 210Q " --- IMCOMPARE aborted" 171Q " & " 152Q "Can't find both files: " 120Q "Please specify a window for the file difference graph") IMCOMPARE.BOXNODE D1 (I 1 WINDOW I 0 NODE F 0 IMCOMPARE.LAST.NODE F 1 IMCOMPARE.LAST.GRAPH.WINDOW) IP%@d l@i @A @cAchPi PQ hcc(76Q PRINTDISPLAYNODE 70Q CREATE/LABEL/BITMAP 36Q PRINTDISPLAYNODE 31Q CREATE/LABEL/BITMAP) NIL () IMCOMPARE.CHUNKS D1 (P 2 OLDFILE.CHUNK.LIST P 1 NEWFILE.CHUNK.LIST P 0 CHUNK.SYMBOL.TABLE I 3 GRAPH.REGION I 2 HASH.TYPE I 1 OLDFILE.SPEC.CHUNK I 0 NEWFILE.SPEC.CHUNK) n h!@B YAB ZIH JHi I!K4I I YJ ZIi I YJ ZI J @ABCIJ h\H]k Mk LMMiK[(157Q EQP 146Q EQP 131Q IMCOMPARE.DISPLAY.FILE.DIFFERENCE.GRAPH 117Q IMCOMPARE.MERGE.UNCONNECTED.CHUNKS 113Q IMCOMPARE.MERGE.UNCONNECTED.CHUNKS 106Q DREVERSE 101Q DREVERSE 75Q IMCOMPARE.MERGE.CONNECTED.CHUNKS 67Q DREVERSE 62Q DREVERSE 56Q IMCOMPARE.MERGE.CONNECTED.CHUNKS 41Q IMCOMPARE.UPDATE.SYMBOL.TABLE 33Q IMCOMPARE.UPDATE.SYMBOL.TABLE 25Q IMCOMPARE.COLLECT.HASH.CHUNKS 17Q IMCOMPARE.COLLECT.HASH.CHUNKS 5 HARRAY) NIL () IMCOMPARE.COLLECT.HASH.CHUNKS D1 (P 3 CHUNK.LIST P 2 END.OF.CHUNK.PTR P 1 STREAM P 0 FILENAME I 1 HASH.TYPE I 0 CHUNK) R@1Hgg Yd@ @@Z0I JIJA M Nh]N&L[I K(116Q CLOSEF 67Q IMCOMPARE.HASH 54Q GETFILEPTR 34Q SETFILEPTR 24Q GETSTREAM 21Q OPENFILE) (16Q OLD 13Q INPUT) () IMCOMPARE.DISPLAY.FILE.DIFFERENCE.GRAPHA0001 D1 (L (0 WINDOW) F 0 IMCOMPARE.LAST.GRAPH.WINDOW F 1 IMCOMPARE.LAST.NODE) @PhcdcNIL NIL () IMCOMPARE.DISPLAY.FILE.DIFFERENCE.GRAPH D1 (P 30Q CORRESPONDING.NEW.CHUNK P 27Q OLD.CHUNK P 23Q Y P 21Q CORRESPONDING.OLD.CHUNK P 20Q NEW.CHUNK P 14Q Y P 11Q DIFF.GRAPH P 10Q YCOORD.INCREMENT P 7 NEW.CHUNK.XCOORD P 6 OLD.CHUNK.XCOORD P 5 OLD.CHUNK.NODES P 4 NEW.CHUNK.NODES P 3 GRAPH.WINDOW P 2 OLD.CHUNK.NODE.FROM.NODES P 1 OLDFILENAME P 0 NEWFILENAME I 5 OLDFILE.CHUNK.LIST I 4 NEWFILE.CHUNK.LIST I 3 GRAPH.REGION I 2 HASH.TYPE I 1 OLDFILE.SPEC.CHUNK I 0 NEWFILE.SPEC.CHUNK) @A CoBgBogoBgo [dgB Kgg HK l_ddIK ll_ldOOld^jHK l_DORO\O\EORO$O(]@HOj hLAINj hM idhdddddh_dKggi h_ _"OO doO  l OOO"dh _OOh__O_OO_SO&_O J_.J _0O.doO. l o NO&hO0dh _,O*O,h_*_(O$_$O&O_&O,&_*(603Q NODECREATE 564Q IMCOMPARE.LENGTHEN.ATOM 553Q PACK* 526Q ASSOC 436Q NODECREATE 420Q IMCOMPARE.LENGTHEN.ATOM 413Q PACK* 354Q SHOWGRAPH 313Q \NCONC2 310Q \NCONC2 305Q \NCONC2 277Q NODECREATE 264Q NODECREATE 177Q STRINGREGION 142Q STRINGWIDTH 126Q STRINGWIDTH 121Q WINDOWADDPROP 107Q PUTWINDOWPROP 76Q CREATEW 73Q CONCAT 70Q SHOULDNT) (347Q IMCOMPARE.MIDDLEBUTTONFN 344Q IMCOMPARE.LEFTBUTTONFN 116Q IMCOMPARE.DISPLAY.FILE.DIFFERENCE.GRAPHA0001 113Q CLOSEFN 103Q IMPARE.HASH.TYPE 56Q WORD 43Q LINE 25Q PARA) ( 561Q "-" 543Q ":" 403Q ":" 64Q "Word" 51Q "Line" 36Q "Paragraph" 21Q "Text File Differences, hashed by ") IMCOMPARE.FIND.TEDIT.TEXT.OBJECT D1 (P 4 POSS.FILENAME P 3 POSS.TOBJ P 2 X P 0 TEDIT.TEXT.OBJECT I 0 FILE) 51IHZg [ HIY, @LKX(51Q FULLNAME 26Q GETWINDOWUSERPROP 5 OPENWINDOWS) (44Q TEXTOBJ 23Q TEXTOBJ) () IMCOMPARE.HASH D1 (P 26Q LAST.CR.POS P 3 C P 2 FILE.PTR P 1 HASHNUM P 0 BEGIN.FILE.PTR I 2 HASH.TYPE I 1 EOF.PTR I 0 STREAM) @ jPHBBdgAJJkغ@ [dl O,@ k@ _,l Kl Kl IKn]nMLLLkn_nONNNkn_n_OOOOk乱vgAJ7Jkغ@ [dl l Kl Kl IKn_n_OOOOkn_n_OOOOkn_n_OOOOk买BgAJJkغ@ [l rKl lKl fKl `IKn_"n_ O"O O O kn_&n_$O&O$O$O$kn_*n_(O*O(O(O(k买AJ+Jkغ@ dl dl dl dl ޿Jkٺ@J IHJH@ h(765Q FULLNAME 753Q SETFILEPTR 675Q SHOULDNT 104Q GETFILEPTR 70Q GETFILEPTR 3 GETFILEPTR) (466Q WORD 254Q LINE 23Q PARA) () IMCOMPARE.LEFTBUTTONFN D1 (P 4 FILE P 3 TEDIT.TEXT.OBJECT P 2 CHUNKLENGTH P 1 FILEPTR P 0 NODEID I 1 WINDOW I 0 GNODE) @dA @kj3H\HYHZL [d;dIlٽkMMkjg K KIJg K K . (oL ` LhgIJhh h(206Q TEDIT 167Q CREATEW 162Q PRINT 154Q CONCAT 143Q CLRPROMPT 136Q TTY.PROCESS 131Q \INSUREWINDOW 117Q TEDIT.NORMALIZECARET 112Q TEDIT.SETSEL 100Q TEDIT.NORMALIZECARET 73Q TEDIT.SETSEL 43Q IMCOMPARE.FIND.TEDIT.TEXT.OBJECT 11Q IMCOMPARE.BOXNODE) (173Q SEL 157Q PROMPTWINDOW 124Q TEXTOBJ 107Q LEFT 70Q LEFT) ( 150Q "Please specify a TEDIT window for ") IMCOMPARE.LENGTHEN.ATOM D1 (P 0 C I 2 EXTENDER I 1 MIN.LENGTH I 0 X) '@ Bl bH AH  BHX(35Q CHCON1 31Q PACKC 21Q LENGTH 3 CHCON) NIL () IMCOMPARE.MERGE.CONNECTED.CHUNKS D1 (L (1 BACKWARDS.FLG 0 NEW.CHUNK.LIST)) r @dX@dII@I @bHH@IIIAH@II@dId(43Q EQP) NIL () IMCOMPARE.MERGE.UNCONNECTED.CHUNKS D1 (L (0 CHUNK.LST)) ;@d@dH@@bHH@@dNIL NIL () IMCOMPARE.MIDDLEBUTTONFN D1 (P 0 INNER.HASH.TYPE I 1 WINDOW I 0 GNODE F 3 IMCOMPARE.HASH.TYPE.MENU F 4 IMCOMPARE.LAST.NODE) @0o` ` S`S:`dolmdIdg dgjdndhdJ c Xd@A hTo` ho` H` ` T@HA  h(245Q IMCOMPARE.CHUNKS 240Q \INSUREWINDOW 227Q TERPRI 220Q PRIN1 210Q PRIN1 174Q PRIN1 161Q CLRPROMPT 152Q IMCOMPARE.BOXNODE 142Q MENU 35Q TERPRI 26Q PRIN1 14Q CLRPROMPT) (224Q PROMPTWINDOW 215Q PROMPTWINDOW 205Q PROMPTWINDOW 171Q PROMPTWINDOW 111Q DEFAULTMENUHELDFN 102Q CLRPROMPT 52Q MENUTYPE# 42Q MENUTYPE# 32Q PROMPTWINDOW 23Q PROMPTWINDOW) ( 202Q "Comparing chunks by " 166Q "You must select another graph node first." 60Q (PARA LINE WORD) 20Q "Please select the type of hashing you wish.") IMCOMPARE.SHOW.DIST D1 (P 4 SAMPLE P 3 MAX.X P 2 X P 1 MAX.Y P 0 WINDOW I 1 MAX I 0 LST) E1hH [hH Y@dKLAZjJIkgH h(74Q DRAWLINE 35Q DSPCLIPPINGREGION 30Q \INSUREWINDOW 17Q DSPCLIPPINGREGION 12Q \INSUREWINDOW 2 CREATEW) (67Q PAINT) () IMCOMPARE.UPDATE.SYMBOL.TABLE D1 (L (2 OLD.CHUNK.FLG 1 CHUNK.SYMBOL.TABLE 0 CHUNK.LIST)) :@1HYhZA JjdhA BKKkKIKdkI(34Q PUTHASH) NIL () (PRETTYCOMPRINT IMCOMPARECOMS) (RPAQQ IMCOMPARECOMS ((FNS IMCOMPARE IMCOMPARE.BOXNODE IMCOMPARE.CHUNKS IMCOMPARE.COLLECT.HASH.CHUNKS IMCOMPARE.DISPLAY.FILE.DIFFERENCE.GRAPH IMCOMPARE.FIND.TEDIT.TEXT.OBJECT IMCOMPARE.HASH IMCOMPARE.LEFTBUTTONFN IMCOMPARE.LENGTHEN.ATOM IMCOMPARE.MERGE.CONNECTED.CHUNKS IMCOMPARE.MERGE.UNCONNECTED.CHUNKS IMCOMPARE.MIDDLEBUTTONFN IMCOMPARE.SHOW.DIST IMCOMPARE.UPDATE.SYMBOL.TABLE) (VARS (IMCOMPARE.LAST.NODE NIL) (IMCOMPARE.LAST.GRAPH.WINDOW NIL) ( IMCOMPARE.HASH.TYPE.MENU NIL)) (RECORDS IMCOMPARE.CHUNK IMCOMPARE.SYMB) (FILES GRAPHER))) (RPAQQ IMCOMPARE.LAST.NODE NIL) (RPAQQ IMCOMPARE.LAST.GRAPH.WINDOW NIL) (RPAQQ IMCOMPARE.HASH.TYPE.MENU NIL) (RECORD IMCOMPARE.CHUNK (HASHVALUE FILEPTR CHUNKLENGTH FILENAME . OTHERCHUNK) FILEPTR _ 1 CHUNKLENGTH _ 0) (RECORD IMCOMPARE.SYMB (NEWCOUNT OLDCOUNT . OLDPTR)) (FILESLOAD GRAPHER) (PUTPROPS IMCOMPARE COPYRIGHT ("Xerox Corporation" 1984)) NIL