(DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "INTERLISP" BASE 10)(FILECREATED " 9-Sep-94 11:47:21" ("compiled on " {DSK}<lispcore>lispusers>HASHDATUM.;1) "28-Jul-94 17:28:46" bcompl'd in "Medley 25-Aug-94 ..." dated "25-Aug-94 10:02:49")(FILECREATED "12-Jul-88 14:35:59" |{MCS:MCS:STANFORD}<LANE>HASHDATUM.;4| 3829 changes to%: (VARS HASHDATUMCOMS) (FNS GETHASHTEDIT) previous date%: "15-Sep-87 11:25:28" |{MCS:MCS:STANFORD}<LANE>HASHDATUM.;3|)GETHASHDATUM :D8(P 0 HASHTEXTPTR I 2 READFN I 1 HASHFILE I 0 KEY)  4  @A
     Hg    ð´Al
    H
    ¿Al
    kB (45 ELT 36 SETFILEPTR 28 ELT 6 GETHASHFILE)(17 HashTextPtr)()PUTHASHDATUM :D8(P 1 HASHTEXTPTR I 3 PRINTFN I 2 HASHFILE I 1 DATA I 0 KEY)  \  Bi
    b Hl
    mÿ
    g    Hl
    	    hAHl
    lC¿IHl
    	    @IB     (89 PUTHASHFILE 80 GETEOFPTR 75 ELT 59 ELT 44 GETEOFPTR 39 ELT 26 SETFILEPTR 19 ELT 6 GTHASHFILE)(31 HashTextPtr)()GETHASHTEDIT :D8(I 3 PROPS I 2 WINDOW I 1 HASHFILE I 0 KEY)  +  @A
     Ak
    g    
    BHHC     (40 OPENTEXTSTREAM 26 OPENSTREAM 16 ELT 6 GETHASHFILE)(21 INPUT)()\WRITEBM :D8(I 1 STREAM I 0 BITMAP)  	   A@
     (6 WRITEBM)NIL()(PRETTYCOMPRINT HASHDATUMCOMS)(RPAQQ HASHDATUMCOMS ((FNS GETHASHDATUM PUTHASHDATUM) (MACROS GETHASHBITMAP PUTHASHBITMAP GETHASHBINARYBITMAP PUTHASHBINARYBITMAP GETHASHGRAPH PUTHASHGRAPH GETHASHUGLY PUTHASHUGLY PUTHASHTEDIT) (FNS GETHASHTEDIT \WRITEBM) (DECLARE%: DONTCOPY DOEVAL@COMPILE (FILES (LOADCOMP) HASH)) (FILES HASH)))(PUTPROPS GETHASHBITMAP MACRO ((KEY HASHFILE) (GETHASHDATUM KEY HASHFILE (FUNCTION READBITMAP))))(PUTPROPS PUTHASHBITMAP MACRO ((KEY BITMAP HASHFILE) (PUTHASHDATUM KEY BITMAP HASHFILE (FUNCTION PRINTBITMAP))))(PUTPROPS GETHASHBINARYBITMAP MACRO ((KEY HASHFILE) (GETHASHDATUM KEY HASHFILE (FUNCTION READBM))))(PUTPROPS PUTHASHBINARYBITMAP MACRO ((KEY BITMAP HASHFILE) (PUTHASHDATUM KEY BITMAP HASHFILE (FUNCTION \WRITEBM))))(PUTPROPS GETHASHGRAPH MACRO ((KEY HASHFILE) (GETHASHDATUM KEY HASHFILE (FUNCTION READGRAPH))))(PUTPROPS PUTHASHGRAPH MACRO ((KEY GRAPH HASHFILE) (PUTHASHDATUM KEY GRAPH HASHFILE (FUNCTION DUMPGRAPH))))(PUTPROPS GETHASHUGLY MACRO ((KEY HASHFILE) (GETHASHDATUM KEY HASHFILE (FUNCTION HREAD))))(PUTPROPS PUTHASHUGLY MACRO ((KEY UGLYVAR HASHFILE) (PUTHASHDATUM KEY UGLYVAR HASHFILE (FUNCTION HPRINT))))(PUTPROPS PUTHASHTEDIT MACRO ((KEY TEXTOBJ HASHFILE) (PUTHASHDATUM KEY TEXTOBJ HASHFILE (FUNCTION TEDIT.PUT.PCTB))))(FILESLOAD HASH)(PUTPROPS HASHDATUM COPYRIGHT ("Stanford University" 1985 1986 1987 1988))NIL