‘XCL Compiler output for source file {DSK}kaplan>Local>medley3.5>my-medley>sources>SEDIT-ACCESS.;2 Source file created 2-Dec-2021 23:29:30 FASL file created Thursday, 2 December 2021, 23:30:22 ÿ˜–#ogg o ˜•ŒFILECREATEDLOC˜Œ*STANDARD-INPUT*˜Œ1 top-level form˜ŒFUNCTION˜“€˜•ŒDEFINE-FILE-INFO˜ŒOPEN ˜ŒOUTPUT˜Œ DIRECTION˜“˜ŒPACKAGE˜“˜’Œ DEFPACKAGE˜‘˜ŒXEROX-COMMON-LISP˜ŒSEDIT˜“˜ŒUSE˜ŒLISP˜ŒXCL˜Œ READTABLE˜ŒXCL˜ŒBASE ˜Œ{Null}˜–‚xggo ¿o¿o ¿o ¿gool ¿goolx ¿gool0 ¿gool ¿gool$ ¿gool ¿gool ¿gool ¿gool ¿gool ¿gool ¿gool ¿gool ¿o ¿o ˜Œ19 top-level forms™˜“€‚r˜•ŒPUTPROPS‚g˜•ŒADDTOVAR‚\˜•Œ/DECLAREDATATYPE‚E™‚.™‚™‚™‚陂ҙ‚»™‚¤™‚™v™_™H™1™&™˜•ŒPUTPROP‚K˜’Œ WEAK-LINK˜‘˜ŒSEDIT‚4˜’Œ STRING-ITEM™ ‚˜’Œ LIST-FORMAT™ ‚˜’Œ LINE-START™ ‚Œ LINE-BLOCK™ ‚ؘ’ŒGAP™ ‚Á˜’ŒEDIT-SELECTION™ ‚ª˜’Œ EDIT-POINT™ ‚“˜’ŒEDIT-NODE-TYPE™ |˜’Œ EDIT-NODE™ e˜’ŒEDIT-ENV™ N˜’Œ EDIT-CONTEXT™ 7˜’Œ BROKEN-ATOM™ ˜•ŒSEDIT-ACCESSCOMS˜•Œ FILEDATES˜•Œ SEDIT-ACCESS ‚m˜“™0˜•Œ COPYRIGHT˜“˜ŒVenue & Xerox Corporation‚ÂÄ‚Æ‚É‚b˜“˜•Œ SYSTEMRECLST˜“˜•ŒDATATYPE™-˜“˜’Œ ATOM-CHARS™ ˜“™6™,˜“=˜’Œ ENVIRONMENT™ ˜’ŒPROFILE™ ˜’ŒEVAL-FN™ ˜’ŒEVAL-IN-PROCESS™ ˜’Œ CONTEXT-LOCK™ ˜’ŒCOMPLETION-EVENT™ ˜’Œ EDIT-TYPE™ ˜’Œ ICON-TITLE™ ˜’Œ EDIT-OPTIONS™ ˜’Œ COMMENT-WIDTH™ ˜’ŒCOMMENT-SEPARATION™ ˜’ŒFIND-CANDIDATE™ ˜’ŒSUBSTITUTE-CANDIDATE™ ˜’ŒDISPLAY-WINDOW™ ˜’Œ WINDOW-LEFT™ ˜’Œ WINDOW-BOTTOM™ ˜’Œ WINDOW-RIGHT™ ˜’Œ WINDOW-TOP™ ˜’ŒROOT™ ˜’ŒROOT-CHANGED-FN™ ˜’Œ COMPLETION-FN™ ˜’ŒCHANGED-STRUCTURE?™ ˜“˜’ŒDONT-COLLECT-CHANGES?™ ˜•ŒFLAG˜’Œ CHANGED-NODES™ ˜’ŒOPEN-NODE-CHANGED?™ ˜’Œ OPEN-NODE™ ˜’ŒOPEN-NODE-INFO™ ˜’Œ ATOM-STARTED™ ˜’ŒATOM-STARTED-UNDO-POINTER™ ˜’Œ UNDO-LIST™ ˜’ŒUNDO-UNDO-LIST™ ˜’ŒCARET™ ˜’Œ CARET-POINT™ ˜’Œ SELECTION™ ˜’ŒSELECTION-DISPLAYED?™ ˜“˜’Œ CURRENT-NODE™ ˜•Œ FULLXPOINTER˜’Œ CURRENT-X™ ˜“˜’Œ CURRENT-LINE™ ™`˜“˜’ŒLAST-LINEARIZED-SUB-NODE-INDEX™ ˜•ŒWORD˜“˜’ŒLINEAR-POINTER™ ™`˜“˜’Œ LINEAR-PREV™ ™`˜’Œ LAST-MOUSE-X™ ˜’Œ LAST-MOUSE-Y™ ˜’ŒLAST-MOUSE-TYPE™ ˜’Œ\X™ ˜’Œ\Y™ ˜’Œ\Z™ ˜’Œ\T™ ˜’Œ FIRST-BLOCK™ ˜’Œ CURRENT-BLOCK™ ˜’Œ MATCHING?™ ˜’ŒBELOW?™ ˜’ŒVISIBLE?™ ˜“˜’Œ REPAINT-START™ ™`˜“˜’Œ REPAINT-LINE™ ™`˜’Œ REPAINT-X™ ˜’ŒRELINEARIZATION-TIME-STAMP™ ˜’ŒSHIFT-Y™ ˜’Œ SHIFT-DOWN™ ˜’Œ SHIFT-RIGHT™ ˜’ŒPROPS™ ˜“™6™+˜“˜’Œ PARSE-INFO™ ˜’ŒPARSE-INFO-UNKNOWN™ ˜’Œ USER-DATA™ ˜’Œ DEFAULT-FONT™ ˜’Œ ITALIC-FONT™ ˜’Œ KEYWORD-FONT™ ˜’Œ COMMENT-FONT™ ˜’ŒBROKEN-ATOM-FONT™ ˜’Œ SPACE-WIDTH™ ˜’ŒDEFAULT-LINE-SKIP™ ˜’ŒEM-WIDTH™ ˜’Œ INDENT-BASE™ ˜’Œ INDENT-STEP™ ˜’Œ MAX-WIDTH™ ˜’ŒCOMMENT-WIDTH-PERCENT™ ˜’ŒINIT-COMMENT-SEPARATION™ ˜’Œ LPAREN-STRING™ ˜’Œ RPAREN-STRING™ ˜’Œ DOT-STRING™ ˜’Œ QUOTE-STRING™ ˜’ŒCOMMENT-STRING™ ˜’Œ COMMAND-TABLE™ ˜’ŒDEFAULT-CHAR-HANDLER™ ˜’Œ HELP-MENU™ ˜“™6™*˜“˜“˜’Œ NODE-TYPE™ ™`˜ŒFORMAT˜’Œ UNASSIGNED™ ˜“˜’Œ SUPER-NODE™ ™`˜“˜’ŒDEPTH™ ™f˜“˜’ŒSUB-NODE-INDEX™ ™f˜Œ STRUCTURE˜’Œ SUB-NODES™ ˜“˜’Œ LINEAR-THREAD™ ™`˜’Œ LINEAR-FORM™ ˜“˜’ŒSTART-X™ ™f˜“˜’Œ RIGHT-MARGIN™ ™f˜“˜’ŒPREFERRED-WIDTH™ ™f˜“˜’Œ ACTUAL-WIDTH™ ™f˜“˜’ŒCHANGED?™ ™Q˜’Œ INLINE-WIDTH™ ˜’ŒACTUAL-LLENGTH™ ˜’Œ FIRST-LINE™ ˜’Œ LAST-LINE™ ˜“™6™)˜“˜’ŒNAME™ ˜’Œ ASSIGN-FORMAT™ ˜’ŒCOMPUTE-FORMAT-VALUES™ ˜’Œ LINEARIZE™ ˜’ŒSUB-NODE-CHANGED™ ˜’Œ SET-POINT™ ˜’ŒCOMPUTE-POINT-POSITION™ ˜’ŒCOMPUTE-SELECTION-POSITION™ ˜’Œ SET-SELECTION™ ˜’ŒGROW-SELECTION™ ˜’ŒSELECT-SEGMENT™ ˜’ŒINSERT™ ˜ŒDELETE˜’ŒCOPY-STRUCTURE™ ˜’ŒCOPY-SELECTION™ ˜’Œ STRINGIFY™ ˜’Œ BACK-SPACE™ ˜’Œ CLOSE-NODE™ ˜“™6™(˜“˜“˜’Œ POINT-NODE™ ™`˜’Œ POINT-INDEX™ ˜’Œ POINT-TYPE™ ˜’ŒPOINT-X™ ˜“˜’Œ POINT-LINE™ ™`˜’Œ POINT-STRING™ ˜’Œ POINT-OFFSET™ ˜“™6™'˜“ ˜“˜’Œ SELECT-NODE™ ™`˜’Œ SELECT-START™ ˜’Œ SELECT-END™ ˜’Œ SELECT-TYPE™ ˜’Œ DELETE-OK?™ ˜’ŒPENDING-DELETE?™ ˜’ŒSELECT-START-X™ ˜“˜’ŒSELECT-START-LINE™ ™`˜’Œ SELECT-END-X™ ˜“˜’ŒSELECT-END-LINE™ ™`˜’Œ SELECT-STRING™ ˜’ŒSELECT-START-OFFSET™ ˜’ŒSELECT-END-OFFSET™ ˜“™6™&˜“˜’Œ LINEAR-ITEM™ ˜“™6™%˜“ ˜“˜’Œ BLOCK-START™ ™`˜’Œ BLOCK-NEW-X™ ˜’Œ BLOCK-WIDTH™ ˜’Œ NEXT-BLOCK™ ˜’ŒBITS?™ ˜’ŒBLOCK-X™ ˜’ŒBLOCK-BASE-LINE™ ˜’Œ BLOCK-ASCENT™ ˜’Œ BLOCK-DESCENT™ ˜“™6™$˜“ ˜“˜’Œ NEXT-LINE™ ™`˜“˜’Œ PREV-LINE™ ™`˜“˜’ŒNODE™ ™`˜“˜’Œ LINE-ASCENT™ ™f˜“˜’Œ LINE-DESCENT™ ™f˜“˜’Œ LINE-SKIP™ ™f˜“˜’Œ LINE-LENGTH™ ™f˜“˜’ŒINDENT™ ™f˜’ŒYCOORD™ ˜“˜’Œ CACHE-TIME™ ™f˜’ŒCACHED-Y™ ˜“˜’Œ CACHED-ASCENT™ ™f˜“˜’ŒCACHED-DESCENT™ ™f˜“™6™#˜“˜’Œ LIST-FORMATS™ ˜’Œ LIST-INLINE?™ ˜’Œ LIST-PFORMAT™ ˜’Œ LIST-MFORMAT™ ˜’Œ LIST-SUBLISTS™ ˜“˜•ŒRECORD˜’Œ OPEN-STRING™ ˜”˜’Œ REAL-LENGTH™ ˜’Œ SUBSTRING™ ’Œ BUFFER-STRING™ ˜“™6™"˜“˜ŒSTRING˜“˜’ŒWIDTH™ ™f˜“˜’ŒFONT™ ™`˜“˜’ŒPRIN-2?™ ™Q˜“™6™!˜“˜“˜’Œ DESTINATION™ ™`‚U˜“˜“™!™`‚P˜“™`‚>˜“˜“™"˜•ŒPOINTER˜“™"˜”˜•ŒBITS˜“™"™`˜“™"˜”˜•ŒFLAGBITS‚9˜“™‚5™f™`™Q‚'˜“˜“™#™‚5˜“™#™‚5˜“™#™‚5˜“™#™‚5˜“™#™‚5‚"˜“™‚5™‚5™‚5™‚5™‚5‚˜“ ˜“™$™`˜“™$™`˜“™$™`˜“™$˜”™‚7˜“™$˜”™‚7˜“™$˜”™‚7˜“™$ ˜”™‚7˜“™$ ˜”™‚7˜“™$ ™‚5˜“™$ ˜”™‚7˜“™$™‚5˜“™$˜”™‚7˜“™$˜”™‚7‚ ˜“ ™`™`™`™f™f™f™f™f™‚5™f™‚5™f™f‚ù˜“ ˜“™%™`˜“™%™‚5˜“™%™‚5˜“™%™‚5˜“™%™‚5˜“™% ™‚5˜“™% ™‚5˜“™%™‚5˜“™%™‚5‚ô˜“ ™`™‚5™‚5™‚5™‚5™‚5™‚5™‚5™‚5‚☓˜“™&™‚5‚ݘ“™‚5‚˘“ ˜“™'™`˜“™'™‚5˜“™'™‚5˜“™'™‚5˜“™'™‚5˜“™' ™‚5˜“™' ™‚5˜“™'™`˜“™'™‚5˜“™'™`˜“™'™‚5˜“™'™‚5˜“™'™‚5‚Ƙ“ ™`™‚5™‚5™‚5™‚5™‚5™‚5™`™‚5™`™‚5™‚5™‚5‚´˜“˜“™(™`˜“™(™‚5˜“™(™‚5˜“™(™‚5˜“™(™`˜“™( ™‚5˜“™( ™‚5‚¯˜“™`™‚5™‚5™‚5™`™‚5™‚5‚˜“˜“™)™‚5˜“™)™‚5˜“™)™‚5˜“™)™‚5˜“™)™‚5˜“™) ™‚5˜“™) ™‚5˜“™)™‚5˜“™)™‚5˜“™)™‚5˜“™)™‚5˜“™)™‚5˜“™)™‚5˜“™)™‚5˜“™)™‚5˜“™)™‚5˜“™) ™‚5˜“™)"™‚5‚˜˜“™‚5™‚5™‚5™‚5™‚5™‚5™‚5™‚5™‚5™‚5™‚5™‚5™‚5™‚5™‚5™‚5™‚5™‚5‚†˜“˜“™*™`˜“™*™‚5˜“™*™‚5˜“™*™`˜“™*˜”™‚7˜“™* ˜”™‚7˜“™* ™‚5˜“™* ™‚5˜“™*™`˜“™*™‚5˜“™*˜”™‚7˜“™*˜”™‚7˜“™*˜”™‚7˜“™*˜”™‚7˜“™*˜”™‚;˜“™*™‚5˜“™*™‚5˜“™*™‚5˜“™*™‚5‚˜“™`™‚5™‚5™`™f™f™‚5™‚5™`™‚5™f™f™f™f™Q™‚5™‚5™‚5™‚5o˜“˜“™+™‚5˜“™+™‚5˜“™+™‚5˜“™+™‚5˜“™+™‚5˜“™+ ™‚5˜“™+ ™‚5˜“™+™‚5˜“™+™‚5˜“™+™‚5˜“™+™‚5˜“™+™‚5˜“™+™‚5˜“™+™‚5˜“™+™‚5˜“™+™‚5˜“™+ ™‚5˜“™+"™‚5˜“™+$™‚5˜“™+&™‚5˜“™+(™‚5˜“™+*™‚5˜“™+,™‚5˜“™+.™‚5j˜“™‚5™‚5™‚5™‚5™‚5™‚5™‚5™‚5™‚5™‚5™‚5™‚5™‚5™‚5™‚5™‚5™‚5™‚5™‚5™‚5™‚5™‚5™‚5™‚5X˜“=˜“™,™‚5˜“™,™‚5˜“™,™‚5˜“™,™‚5˜“™,™‚5˜“™, ™‚5˜“™, ™‚5˜“™,™‚5˜“™,™‚5˜“™,™‚5˜“™,™‚5˜“™,™‚5˜“™,™‚5˜“™,™‚5˜“™,™‚5˜“™,™‚5˜“™, ™‚5˜“™,"™‚5˜“™,$™‚5˜“™,&™‚5˜“™,(™‚5˜“™,*™‚5˜“™,*˜”™‚;˜“™,,™‚5˜“™,.™‚5˜“™,0™‚5˜“™,2™‚5˜“™,4™‚5˜“™,6™‚5˜“™,8™‚5˜“™,:™‚5˜“™,<™‚5˜“™,>™‚5˜“™,@™‚5˜“™,B™‚5˜“™,D™`˜“™,F™‚5˜“™,H™`˜“™,J˜”™‚7˜“™,L™`˜“™,N™`˜“™,P™‚5˜“™,R™‚5˜“™,T™‚5˜“™,V™‚5˜“™,X™‚5˜“™,Z™‚5˜“™,\™‚5˜“™,^™‚5˜“™,`™‚5˜“™,b™‚5˜“™,d™‚5˜“™,f™‚5˜“™,h™`˜“™,j™`˜“™,l™‚5˜“™,n™‚5˜“™,p™‚5˜“™,r™‚5˜“™,t™‚5˜“™,v™‚5S˜“=™‚5™‚5™‚5™‚5™‚5™‚5™‚5™‚5™‚5™‚5™‚5™‚5™‚5™‚5™‚5™‚5™‚5™‚5™‚5™‚5™‚5™‚5™Q™‚5™‚5™‚5™‚5™‚5™‚5™‚5™‚5™‚5™‚5™‚5™‚5™`™‚5™`™f™`™`™‚5™‚5™‚5™‚5™‚5™‚5™‚5™‚5™‚5™‚5™‚5™‚5™`™`™‚5™‚5™‚5™‚5™‚5™‚5A˜“˜“™-™‚5<˜“™‚5,˜“™0˜•ŒMAKEFILE-ENVIRONMENT˜“™˜ŒXCL™ ˜“™ ˜ŒSEDIT˜“™˜ŒLISP˜ŒXCL!˜“™0˜•ŒFILETYPE˜Œ COMPILE-FILE˜“˜“˜•ŒPROP™‚™0˜“™‚™‚™0˜”˜•Œ LOCALVARS˜“˜•ŒDECLARE:˜•ŒDONTCOPY˜•ŒDOEVAL@COMPILE˜“˜•ŒFILES˜•Œ SEDIT-DECLS˜“˜•Œ INITRECORDS™-™,™+™*™)™(™'™&™%™$™#™‚™"™!˜“˜•Œ SYSRECORDS™-™,™+™*™)™(™'™&™%™$™#™‚™"™! ˜“˜”˜Œ 2-Dec-2021 23:29:30•ŒD{DSK}kaplan>Local>medley3.5>my-medley>sources>SEDIT-ACCESS.;2š‚3ÿÿ