‘XCL Compiler output for source file {DSK}larry>ilisp>medley>SEDIT-COMMONLISP.;1 Source file created 4-Jan-2021 22:52:01 FASL file created Wednesday, 5 May 2021, 10:37:50 ÿ˜–#ogg o ˜•ŒFILECREATEDLOC˜Œ*STANDARD-INPUT*˜Œ1 top-level form˜ŒFUNCTION˜“€˜•ŒDEFINE-FILE-INFO˜ŒOPEN ˜ŒOUTPUT˜Œ DIRECTION˜“˜Œ READTABLE˜ŒXCL˜ŒPACKAGE˜ŒSEDIT˜ŒBASE ˜Œ{Null}˜–,ggo ¿o¿o ˜Œ3 top-level forms™˜“€&˜•Œ FILESLOAD˜•ŒPUTPROP˜•ŒSEDIT-COMMONLISPCOMS˜•Œ FILEDATES˜•ŒSEDIT-COMMONLISP!˜“˜“˜•ŒSYSLOAD˜•Œ TEXTMODULES˜“˜”˜•Œ LOCALVARS˜“˜•ŒDECLARE:˜•ŒDONTCOPY˜•ŒDOEVAL@COMPILE˜“˜•ŒFILES˜•Œ SEDIT-DECLS˜“™˜•ŒDOCOPY™ ˜“™!˜“™™˜“˜•Œ GLOBALVARS˜’ŒTYPE-NEW-QUOTE˜‘˜ŒSEDIT˜’Œ#TYPE-READABLE-READ-TIME-CONDITIONAL™+˜’Œ%TYPE-UNREADABLE-READ-TIME-CONDITIONAL™+˜“˜•Œ*˜•Œ;;;˜ŒqYou must also have EXPORTS.ALL loaded to compile this file, but it shouldn't be neccessary to set DFNFLG to PROP.˜“™0˜•Œ;;˜Œ-Support for NEW-QUOTE, the type for #, and #.˜“˜•ŒFNS˜’ŒCOPY-STRUCTURE-NEW-QUOTE™+˜’ŒINPUT-NEW-QUOTE™+˜’ŒPARSE--NEW-QUOTE™+˜’ŒREPLACE-NEW-QUOTE™+˜’ŒSUBNODE-CHANGED-NEW-QUOTE™+˜“™0™4˜ŒhSupport for READABLE-READ-TIME-CONDITIONAL and UNREADABLE-READ-TIME-CONDITIONAL, the types for #+ and #-˜“™7˜’Œ#ASSIGN-FORMAT-READ-TIME-CONDITIONAL™+˜’ŒBACKSPACE-READ-TIME-CONDITIONAL™+˜’ŒCFV-READ-TIME-CONDITIONAL™+˜’Œ,COMPUTE-POINT-POSITION-READ-TIME-CONDITIONAL™+˜’Œ$COPY-STRUCTURE-READ-TIME-CONDITIONAL™+˜’Œ CREATE-NEW-READ-TIME-CONDITIONAL™+˜’ŒDELETE-READ-TIME-CONDITIONAL™+˜’ŒINPUT-CONDITIONAL-READ™+˜’ŒINSERT-READ-TIME-CONDITIONAL™+˜’Œ$INSERT-FLIPPED-READ-TIME-CONDITIONAL™+˜’ŒLINEARIZE-READ-TIME-CONDITIONAL™+˜’ŒPARSE--CONDITIONAL-READ™+˜’ŒREPLACE-READ-TIME-CONDITIONAL™+˜’ŒSET-POINT-READ-TIME-CONDITIONAL™+˜’Œ#SET-SELECTION-READ-TIME-CONDITIONAL™+˜’ŒSTRINGIFY-READ-TIME-CONDITIONAL™+˜’ŒSUBNODE-CHANGED-READABLE-RTC™+˜’ŒSUBNODE-CHANGED-UNREADABLE-RTC™+˜’Œ"UNDO-REPLACE-READ-TIME-CONDITIONAL™+˜“™0™4˜ŒzOther junk including INITIALIZE-COMMONLISP, the installation function and STRING-FLIP, the convenient string/unstring key ˜“™7˜’Œ CONDITIONALIZE-CURRENT-SELECTION™+˜’ŒCREATE-NEW-QUOTED-GAP™+˜’ŒINITIALIZE-COMMONLISP™+˜’ŒINSERT-NEW-QUOTED-GAP™+˜’Œ$INSERT-NEW-READ-TIME-CONDITIONAL-GAP™+˜’ŒINPUT-PLUS-OR-MINUS™+˜’Œ STRING-FLIP™+˜“™0™4˜Œ"Advice implementing readtable hack˜“˜•Œ FUNCTIONS˜’ŒADD-NEW-QUOTE-LIKE™+˜’ŒICL™+˜’ŒMUNG-SEDIT-READ-TABLE˜‘˜Œ TEXTMODULES˜“˜•ŒADVISE˜’Œ SETUP-PROFILE™+˜“˜•Œ VARIABLES˜’Œ*SEDIT-READ-TABLES*™d˜“™0™4˜Œ;Temporarily commenting this out for playing-around purposes˜“˜•ŒP˜“™X˜“˜•ŒPROP˜“˜•ŒFILETYPE˜•ŒMAKEFILE-ENVIRONMENT™ ˜“˜”˜Œ 4-Jan-2021 22:52:01•Œ1{DSK}larry>ilisp>medley>SEDIT-COMMONLISP.;1œ™8˜–8@¸@É Y@É É ¿I¹HI ¿I™8™˜“˜“˜Œ &OPTIONAL˜ŒNODE˜Œ INTERLISP˜’ŒCOPY-PREFIX-QUOTE™d%˜’Œ EDIT-NODE™+™‚‚˜’Œ PREFIX-QUOTE™d ™‚‚™‚‚œ™9˜–K@ Xgð²@É.–@ ¿@AB Hgð²@ÉÉ,@A h™9™˜“˜“™|˜ŒCONTEXT˜ŒCHARCODE˜Œ QUOTE-TYPE™C˜•ŒAPPLY*#™Y˜’Œ CLOSE-NODE™+˜’Œ TYPE-OF-INPUT™+:˜’ŒEDIT-ENV™+3˜’Œ EDIT-CONTEXT™+*˜ŒATOM™‚Ž˜Œ STRUCTUREœ™:˜–gB‘h€iX‘H†Bgð˜@É€h²I@A` ¿AÉDAÉÉ&@É'¿@ÉAh ¿ih™:™˜“˜“™|˜Œ STRUCTURE˜ŒCONTEXT˜ŒMODE™]˜’ŒPARSE™+%˜’Œ BUILD-NODE™+ T™‚ƒH™‚ƒ@™‚9™‚Ž3™‚‚,™‚Ž ™,™‚ƒ ˜’ŒDATA™+œ™;˜–‚âC¸BÑh€iY’I°"BÉkð‘h€iZ‘JBÉkð‘h€išBÑh‚i€hšo ¿Ag@@É hAÉ88¿@É  ¿@É H¿H@οHkÍ ¿@É HÉ ¿H@ÈkØ ¿@A ¿D™DA@i ¿C™;™˜“˜“™|˜ŒNODE˜ŒCONTEXT˜ŒWHERE˜ŒSUBNODES˜ŒPOINT™‚Ù˜’ŒPUNT-SET-POINT™+‚͘’Œ NOTE-CHANGE™+‚Ř’Œ SET-DEPTH™+|˜’Œ KILL-NODE™+F˜•ŒSHOULDNT‚¼™‚‚‚°™‚‚‚ª™‚ƒ‚£™‚‚‚™™‚‚‚™‚‚‚ƒ™‚‚s™‚‚g™‚ŽY™‚‚R˜’ŒUNDO-REPLACE-QUOTE™+M™‚Ž5™‚‚&˜’ŒEDIT-SELECTION™+™‚¨™‚¨A˜Œweird bounds for replace.quoteœ™<˜–@É ¸AÉ ¹HI¿I™<™˜“˜“™|˜ŒNODE˜ŒSUBNODE™™‚‚ ™‚ƒ™‚‚œ™@˜–S@É ¸H¸SHÉð²8H¹BÃ’B°HÉ T Z‘J‰g ºIJ¿Jh˜’Œ TYPE-LIST™+˜’ŒLIST-FORMATS-TABLE™+™@™˜“˜“™|˜ŒNODE˜ŒCONTEXT˜ŒFORMAT™D˜’ŒGET-LIST-FORMAT™+6˜•ŒGETHASH?˜ŒDEFAULT-™‚‚#˜’Œ LIST-FORMAT™+™‚‚™‚‚™‚‚œ™A˜–‚—B²UjBð²(@É ‘h@ÉA@hAÉ> @É B bÉÉ @A AÉ>X@οH@É ¿Hg¿AÉ@ ™A™˜“˜“™|˜ŒNODE˜ŒCONTEXT˜ŒINDEX™‚‘˜’ŒSET-SELECTION-NOWHERE™+Q™‚Š8˜•ŒNTH)˜’Œ DELETE-NODES™+ ‚Š™‚Ž‚™‚|˜’Œ EDIT-POINT™+p™‚‚j™‚Ä`™‚ÄX™‚ŽH˜’ŒEDIT-NODE-TYPE™+A™‚‚0™‚‚!™‚Ž™‚‚ ™‚‚œ™B˜–‚–AÉ&@É ÉXo:–g°"Ho:–g°hoHo 'ȸ@É ¹I¹@É ºJºHIÉØJÈØ»@K¿@\KÍ¿K™B™˜“˜“™|˜ŒNODE˜Œ ENVIRONMENT˜ŒCONTEXT™B˜•Œ ECASE-FAIL ‚Š™‚‚‚€™‚‚v™‚‚m™‚‚^™‚‚Q™‚‚H˜’Œ STRING-ITEM™+/˜Œ HASH-MINUS ˜Œ HASH-PLUS˜’ŒREAD-TIME-CONDITIONAL™d ™‚‚™‚=˜“Ž+Ž-7˜“˜’ŒREAD-TIME-CONDITIONAL-SIGN™d˜“˜•Œfetch™‚˜•Œof˜’ŒNODE™+(Ž-Ž+œ™C˜–‚¹@ɸh¹hºj@Éð²;@HÈHÉÈØ¿@»HɼKLοLHÉ @É ¹@IÉοIɺ@¼IÈIÉØJ›Jâ[lñ’l‚K€jØ»LK¿K™C™˜“˜“™|˜ŒPOINT˜ŒCONTEXT™c™‚‚—™‚‚‚™‚‚‚ˆ™‚Ä}™‚‚r™‚‚l™‚Ä\™‚ÄT™‚‚D™‚‚=™‚Ä1™‚Í)™‚‚!™‚‚™‚Ä™‚Ä™‚Äœ™D˜–‚‘@¸@É YºIÖg°#JÖg°hoIoh »@É kK[@É É ¿K@É l É ¿K»HK ¿K™D™˜“˜“™|˜ŒNODE™w™‚Â<˜•ŒCHECK-TYPE-FAIL ~™‚‚n™‚‚h™‚Ð]™‚‚T™‚‚N™‚ÐC™‚‚'˜’ŒCOPY-HASH-IL-UNREADABLE™d!˜’ŒHASH-IL-UNREADABLE™d˜’ŒCOPY-HASH-IL-READABLE™d˜’ŒHASH-IL-READABLE™d ™‚‚™‚‚5˜“˜ŒOR™‚噂ã/˜“™‚Ó™‚™‚Ô™‚Õœ™E˜–‚¬@ ¸@ ¹`Z»J`οKºg@gBg@ »J¼JK ¿L»lHIhºK¼KJ ¿LZ»Jg¿KºHJοIJοHkÍ ¿IlÍ ¿J`[¼KJοL¿JA ¿J™E™˜“˜“™|˜ŒGAP˜ŒCONTEXT˜ŒTYPE™‚¤™‚£5˜’ŒMAKE-HASH-IL-READABLE™d ˜’ŒCREATE-GAP-NODE™+™‚ð ‚‘˜’ŒWEAK-LINKTYPE#™+‚Œ™‚‚‚™‚‚w™‚‚m™‚‚c™‚‚X˜’ŒNOT-YET-ASSIGNED™+.˜ŒFORM(˜ŒSIGN"˜ŒFEATURE™-˜’ŒEDIT-NODETYPE#™+œ™F˜–zB¬BÈ bb¿@ABCC¸h¹hºh»B¼LHó‘°U »J”JK&º„KhZ¹LkÔ¼°ãI ¿D²0AÉ@A@É C  ¿DAÉ@ ¿i˜’Œ BASIC-GAP™+™F™˜“˜“™|˜ŒNODE˜ŒCONTEXT˜ŒSTART˜ŒEND˜Œ SET.POINT?™r˜’ŒPENDING-DELETE™+c˜’ŒSET-SELECTION-ME™+\™‚ÂA™L'™‚ðk™‚ŽT™‚‚K™‚Ž™‚‚œ™G˜–K@ Xgð²@É.–@ ¿@AB Hgð²@ÉÉ,@A h™G™˜“˜“™|˜ŒCONTEXT˜ŒCHARCODE˜ŒTYPE™C™‚Š#™Z™‚‹™‚Œ:™‚3™‚Ž*™‚™‚Ž™‚œ™H˜–Qh¸h¹BòBɸBÉZ‘J€H¹° BÃœBÉYkظ‰BÈ X¹@AHICD ™H™˜“˜“™|˜ŒNODE˜ŒCONTEXT˜ŒWHERE˜ŒSUBNODES˜ŒPOINT™K™L;™‚‚.™‚Ä'™‚Ä™‚¨™‚¨™‚¨œ™I˜–‚ªnXB¿@É`ð¹HÉÉ@¿HÉÉ>¿I¹@É l º@É l Hý¿@É »hHý¿JÉUð²HÉÉ Hý¿°tI²,hoHÉÉ dHý¿HÉ Hý¿°GHÉÉ ²6HÉÉ \jh Hý¿iHý¿noHkoH-¿@I•`„`ο@Išg ‰g ¼gAÉ gKÉgKÉlL ¿JHÉð³"HÉJHÉ ¿JHÉÉ  ¿@HÉ ¿@HÉ ¿@HÉ ¿@HÉ ¿i˜’ŒTYPE-GAP™+™I™˜“˜“™|˜ŒNODE˜Œ FEATURE-NODE˜ŒCONTEXT™ ‚¢˜’Œ RELINEARIZE™+‚˜˜’Œ!COMPUTE-FORMATS-AND-FORMAT-VALUES™+‚Ž™‚£‚„˜’ŒSUBNODE-CHANGED™+‚g˜’Œ REPLACE-NODE™+‚%˜ŒSYMBOL-FUNCTION‚™‚‚ИŒMAKE-STRING-INPUT-STREAM‚¼˜ŒSTRINGP‚¦˜’Œ PARSE-NEW™+‚˜˜ŒFORMATM™‚Â;™‚‚v™‚‚‚n™‚‚‚K™‚ЂE™‚ó‚>™‚Ђ8™‚ô‚1™‚‚‚+™‚õ‚ ™‚’ŒMAKE-HASH-IL-UNREADABLE™d‚™‚‚‚™-‚ÿ™.‚ø™‚‚‚Æ™‚‚‚µ™‚‚‚‘™‚‚w™‚‚i™‚‚Z™‚‚D™‚‚2™‚‚'™‚Ž™‚Ž™- ™‚‚‚‚hº`WioWK¹n¾HÉ hºg‚ h¹gð‘J€hZ²JHý¿JHÉ dHý¿°6HÉÉ _ ¿oO ¿HÉÉ dHý¿ºhHý¿Jºj@¿J˜’Œ*CATCH-RETURN-PC*˜‘˜ŒSYSTEM˜•Œ*CONDITION-HANDLER-BINDINGS*˜’Œ *NLSETQFLAG*™‚"˜•Œ*PROCEED-CASES*˜’Œ*CATCH-RETURN-TO*™‚"™‚& ™‚$˜’Œ*UNWIND-PROTECT*™‚"˜ŒCLOSURE˜“˜“˜ŒG132x˜•ŒPRIN1k˜•ŒTERPRId˜•ŒGETPROMPTWINDOWM™‚ ˜ŒREAD‚™‚‚]™‚Ž4˜ŒNORMAL(™‚1˜’ŒNLSETQ-PROCEED-CASE™‚"q˜ŒBWarning: Problem trying to read conditional expression. Not read. ˜”˜ŒERROR’Œ NLSETQHANDLER™‚"‚䘖HÉgHÉ ˜ŒClean-up forms™‚)˜“€ ˜ŒCLOSE˜ŒABORT‚‰˜Œ~s‚à˜•ŒCOMPILED-CLOSURE˜•Œ \PTRHUNK5œ™J˜–‚…AÉÉ&@É ÉXo:–g°"Ho:–g°hoHo '¸@É ¹I¹@É ºJºAH ¿IAB ¿JAB ™J™˜“˜“™|˜ŒNODE˜ŒCONTEXT˜Œ RIGHT-MARGIN™˜’Œ LINEARIZE™+v™‚Em˜’ŒOUTPUT-CONSTANT-STRING™+I™‚Ì^™‚‚Q™‚‚6™‚Î'™‚Ï™‚Й‚‚ ™‚™‚ŽD˜“Ž+Ž->˜“™‚Ò˜“™‚Ó™‚™‚Ô™‚Õ/Ž- Ž+œ™K˜–q@ò1@A` ¿@ÉAh ¿@ÉAh ¿i@ò1@A` ¿@ÉAh ¿@ÉAh ¿ih™K™˜“˜“™|˜Œ STRUCTURE˜ŒCONTEXT˜ŒMODE™g™‚—W™‚—G™‚˜0™‚— ™‚—™‚˜^™‚ÐN™‚ÐB™.9™‚ã'™‚Й‚Ð ™-™‚圙L˜–‚ðAg@C¸h¹hºh»B¼LHó‘°%@É L »J”JK&º„KhZ¹LkÔ¼°ÙIhAÉ88¿@É B ¼D»CºB¹h¸h½L½K^‘N°g¸M‘h€i^‘N‚IJó‘°U@É I  ¿MH¿H@οHIÍ ¿H@ÈkØ ¿HA ¿IkÔ¹K»M½°•@A ¿E™EA@i ¿h™L™˜“˜“™|˜ŒNODE˜ŒCONTEXT˜ŒSTART˜ŒEND˜ŒSUBNODES˜ŒPOINT™‚虂¢‚Ü™‚£‚È™‚‚À™‚¤‚—™‚¥‚™‚Â[™‚Â&™‚ ‚·™‚‚‚¬™‚‚‚¢™‚‚‚ˆ™‚‚R™‚‚F™‚Ž™‚‚™R™‚Žœ™M˜–‚¹EßDEÈâýñb¿ŽEÿgb ¿C¢±ƒFgðžCjð‘h‰Clñ‘h‚i€h²%@ABÉ C hDhgG Clð–@ @Bο@D‘C„CkÙb¿@g¿G—@A h@ABDG ™M™˜“˜“ ™|˜ŒPOINT˜ŒCONTEXT˜ŒNODE˜ŒINDEX˜ŒOFFSET˜ŒITEM˜ŒTYPE˜ŒCOMPUTE-LOCATION?™‚³™‚¢‚¤™Co˜’ŒSET-POINT-NOWHERE™+c˜’Œ SET-POINT™+Q™‚ ‚—™‚‚’™‚Ä‚€™‚Äv™‚Ä[™‚I™‚‚-™‚™‚™‚‚ ™‚Í™‚Íœ™N˜– @AB ™N™˜“˜“™|˜Œ SELECTION˜ŒCONTEXT˜ŒNODE˜ŒINDEX˜ŒOFFSET˜ŒITEM˜ŒTYPE™™‚œ™O˜–ho@É ™O™˜“˜“™|˜ŒNODE˜Œ ENVIRONMENT™™‚™‚‚˜Œ~sœ™P˜–‚™AÉ ¸@É ¹AÈ Zkð²XIÉ[o:œH ’h°&i°#Ko:—H °hoKo š@AB ¿°)IH¿°JlðšIH¿Šo ¿@B ™P™˜“˜“™|˜ŒNODE˜ŒSUBNODE˜ŒCONTEXT™‚“™‚£‚‹™‚¦b™IY™‚ÌF˜•ŒCMLREAD.FEATURE.PARSER1™‚||™‚Ðk™‚Ð!™‚Й‚‚ ™‚‚™‚‚‚†˜ŒBad subnode indexT˜“Ž+Ž-N˜“™‚Ò˜’ŒNODE-STRUCTURE™+>Ž-)Ž+œ™Q˜–‚™AÉ ¸@É ¹AÈ Zkð²XIÉ[o:—H °(Ko:œH ’h°i°hoKo š@AB ¿°)IH¿°JlðšIH¿Šo ¿@B ™Q™˜“˜“™|˜ŒNODE˜ŒSUBNODE˜ŒCONTEXT™‚“™‚£‚‹™‚¦b™IY™‚ÌA™‚|1™‚||™‚Ðk™‚Ð!™‚Й‚‚ ™‚‚™‚‚‚†˜ŒBad subnode indexT˜“Ž+Ž-N˜“™‚Ò™‚9Ž-)Ž+œ™R˜–#A@BÈ B È Bh ™R™˜“˜“™|˜ŒCONTEXT˜ŒNODE˜Œ OLD-SUBNODES™™L ˜ŒLAST™‚‚™‚‚œ™V˜–‚«@É.–@ ¿@É@¸@É>¹Hɺh»JžHÉgð€h²iT@B »@h@É88¿@JK ¿@KÉ J ¿K@ ¿H@KÉ l  ¿IH ¿@ ¿i™‚ø™V™˜“˜“™|˜ŒCONTEXT˜ŒCHARCODE˜Œ QUOTE-TYPE™ ‚£˜’ŒCOLLECT-UNDO-BLOCK™+‚œ™‚‚”™‚‚™‚Â{™‚£s™‚a™‚E™E ™‚‹ ‚„™‚‚i™‚‚S™‚ŽL™‚Ž8™‚1™‚¨$™‚¨™‚Ž™‚Ž™‚Žœ™W˜–‚ @ ¸`YºI`οJ¹Bgð›g °\Bgð›g °HBgð›g °4Bgð›g ° Bgðšg ŠoB ºg@lJºI»IJ ¿KºkHh¹J»JI ¿K¹AÉÉ&B'ºI»IJ¿KZ¹Jg¿IºHJοHkÍ ¿J`Y»IJοK¿JA ¿J™W™˜“˜“™|˜ŒGAP˜ŒCONTEXT˜Œ QUOTE-TYPE™‚™‚£‚„™‚¦x™‚d™‚P™‚<™‚(™‚™‚ð‚ñ‚陂‚‚ß™‚‚‚Õ™‚‚‚Ê™‚ò‚µ™‚‚®™‚Ž‚Š˜ŒCONTENTSs˜’Œ MAKE-HASH-B™dl˜ŒHASH-B_˜’Œ MAKE-HASH-X™dX˜ŒHASH-XK˜’Œ MAKE-HASH-O™dD˜ŒHASH-O7˜’ŒMAKE-HASH-COMMA™d0˜Œ HASH-COMMA#˜’Œ MAKE-HASH-DOT™d˜ŒHASH-DOT™,™‚ö~˜ŒBad quote type œ™X˜–‚o¸h¹H‘H°¹TÉIg ¿H¸°á`U Y¸Ig¿HY¸Ig¿HY¸Ig¿HY¸Ig¿HY¸Ig¿HY¸Ig ¿HY¸Ig¿HY¸Ig¿HY¸Ig¿HY¸Ig¿HY¸Ig¿HY¸Ig¿HY¸Ig¿HY¸Ig ¿Hoo ¿`U Y¸Ig¿HY¸Ig¿HY¸Ig¿HY¸Ig¿HY¸Ig¿HY¸Ig ¿HY¸Ig¿HY¸Ig ¿HY¸Ig¿HY¸Ig¿HY¸Ig¿HY¸Ig¿HY¸Ig¿HY¸Ig¿HY¸Ig¿HY¸Ig ¿Hoo ¿`U Y¸Ig¿HY¸Ig¿HY¸Ig¿HY¸Ig¿HY¸Ig¿HY¸Ig ¿HY¸Ig¿HY¸Ig ¿HY¸Ig¿HY¸Ig¿HY¸Ig¿HY¸Ig¿HY¸Ig¿HY¸Ig¿HY¸Ig¿HY¸Ig ¿Hhh ¿o TÉ*o ¿o¹h¸TÉ*ºI[‘K°"¸HÓJHhHh ¿I¹°Úi˜’ŒLISP-EDIT-ENVIRONMENT™+˜’Œ TYPE-ROOT™+™X™˜“€™ ‚õ˜ŒPUTHASH‚Á™‚®‚¯˜’ŒCHARCODE™+‚¤™a‚ؘ•ŒNCREATE2‚Ì™a‚ø™‚°‚ì™a0™‚°˜•ŒLISTPUT9‚䘕Œ CHARACTER‚Й‚‚µ™‚‚™.‚”™A‚ˆ™O‚|˜’ŒCOPY-SELECTION-DEFAULT™+‚p™D‚d™F‚X™H‚L˜’ŒGROW-SELECTION-DEFAULT™+‚@™N‚4™M‚(˜’Œ"COMPUTE-SELECTION-POSITION-DEFAULT™+‚™C‚™Q‚™J‚ø™B‚ì™@‚à˜’Œ UNREADABLE-READ-TIME-CONDITIONAL™+‚Ò˜’ŒEDIT-NODE-TYPETYPE#™+‚½™-‚´™A‚¨™O‚œ™‚³‚™D‚„™F‚x™H‚l™‚´‚`™N‚T™M‚H™‚µ‚<™C‚0™P‚$™J‚™B‚ ™@‚˜’ŒREADABLE-READ-TIME-CONDITIONAL™+‚ò™‚·‚Ý™,‚Ô˜’ŒBACKSPACE-QUOTE™+‚Ș’ŒSTRINGIFY-QUOTE™+‚¼™‚³‚°™8‚¤˜’Œ DELETE-QUOTE™+‚˜™;‚Œ™‚´‚€˜’ŒSET-SELECTION-QUOTE™+t˜’ŒSET-POINT-QUOTE™+h™<\˜’ŒLINEARIZE-QUOTE™+P˜’Œ CFV-QUOTE™+D˜’ŒASSIGN-FORMAT-QUOTE™+8˜’Œ NEW-QUOTE™+*™‚·˜’ŒPARSE--LITATOM™+™‚‚ǘ“˜“Ž+™[˜“Ž-™[‚¼˜“™\€‚ª˜Œ^S‚ǘ“˜“˜Œ#+™‚Ϙ“˜Œ#-™‚΂˜“˜“™‚倀™K˜“™‚　™K‚瘓˜“˜Œ#.™‚¨˜“˜Œ#,™‚¦‚☓˜“˜’ŒHASH-DOT™d™‚¨˜Œ^Q™:™9˜“˜’Œ HASH-COMMA™d™‚¦˜Œ^F™:™9˜“˜’ŒHASH-BASED-NUMBER™d˜’Œ HASH-STAR™dœ™Y˜–k@ gð²\@É@¸@É>¹hºh»T@B ZÉ »@É>@Jh ¿jJÈð³H@K ¿IH ¿ih™‚ø™Y™˜“˜“™|˜ŒCONTEXT˜ŒCHARCODE˜Œ QUOTE-TYPE™a™‚Y™‚D˜’ŒINSERT™+(™W™‚ŒL™‚‚9™‚Ž.™‚‚™‚Ž™‚Ž™‚œ™Z˜–k@ gð²\@É@¸@É>¹hºh»T@B ZÉ »@É>@Jh ¿jJÈð³H@K ¿IH ¿ih™‚ø™Z™˜“˜“™|˜ŒCONTEXT˜ŒCHARCODE˜ŒTYPE™a™‚Y™‚D™‚å(™E™‚ŒL™‚‚9™‚Ž.™‚‚™‚Ž™‚Ž™‚œ™[˜–‚A¸AÒlð”lHÑ€hb¿@ XgðY‘IHgð¢±ë@É>ZÉ[ØKÉ€h\²!kJÉð²l#JÉ ð‚h€h¢±¡kJÉ ð²<@É.–@ ¿@É@@K ¿J@É@ ¿@AA ¿i@h@É88¿K@kkoJJÉ g ¿@É@@K ¿@AA ¿@ ¿ihh™[™˜“˜“™|˜ŒCONTEXT˜ŒCHARCODE˜Œ QUOTE-TYPE™ ‚ ™‚—‚™V‚ü™‚‚옒ŒREPLACE-STRING™+‚¹™Z‚°™‚‚¡™‚‚‘™‚‹˜•ŒNCHARSh˜•ŒCHCON1™‚Œ‚ó™‚Ž‚時‚ß™‚Ä‚É™‚Ž‚™‚Ž‚©™‚Ž‚˜™‚Ž‚ˆ™‚Žx™‚Äa™‚ÄT™‚ÄF™‚‚?™‚‚7™‚Ä/™‚Ž$™‚™‚‚ؘŒœ™\˜–‚"nX@¿HÉ Ygð¢±ÛHÉÉ.˜HÉ ¿HÉÉ@ZÉHý¿JÉ»JɼK’h°L‘hŽHÉÉ ²6HÉÉ ]jh Hý¿iHý¿noHkoH-K‘h„L‘h€i² HÉHÉHÉ HÉ ¿°$HÉÉ ] ¿oM ¿iIgð²$HÉÉ Z ¿oJ h™\™˜“˜“™|˜ŒCONTEXT˜ŒCHARCODE˜ŒTYPE™ ‚™‚-‚™‚.‚™‚/‚홂-‚ᙂ.‚Û™‚/‚É™‚‚Ä™‚‚¼˜’Œ STRINGIFY™+‚™‚m™‚+™‚‹ ™‚Œ ‚™‚Ž‚ö™‚‚Ô™‚Žw™‚‚f™‚‚R™‚¨I™‚¨<™‚¨4™‚Ž ™‚Ž™‚‚˜Œ+Select a structure to stringify/unstringify‚瘌)Select one thing to stringify/unstringify‚ ˜–‚hº`WioWK¹n¾HÉ hºg‚ h¹gð‘J€hZ²HÉHÉJHÉ ¿°&HÉÉ _ ¿oO ¿ihhHý¿j@¿ ™‚#™‚$™‚%™‚&™‚'™‚& ™‚$™‚(™‚)˜“˜“˜ŒG144‚Š˜Œ VALUES-LISTw™‚-j™‚.c™‚/Q™‚L™‚ ™‚0\™‚Ž4™‚1(™‚1™‚2p˜Œ.Problem trying to read from string. Not read. ™‚5‚•˜–HÉgHÉ ™‚7™‚)˜“€ ™‚9™‚:‚‘™‚=˜•Œ \PTRHUNK4œ™a˜–‚Ìh¸W¸H™@ÉHÉð¡…‰H@¿‹H¸°ê@Wc¿WɸWÉ*¹Aºh»J‘J°N[¼K]¾M__¿O__¿O_¿HLO ¿O _²OIOhNh ¿Jº°°B¹h¸h»WÉ&ºWɼI]‘M°»JKKL ¿I¹°áH ™‚« ˜’ŒTYPES™+™a ™˜“˜“˜ŒEDIT-NODE-TYPE˜Œ SUB-TYPE-LIST˜ŒNEW-QUOTE-STRING-LIST‚¿™‚±‚º˜’ŒCREATE-STRING-ITEM™+‚„™‚®p™‚¯h™‚±‚¡™‚‚—™‚1™‚'™‚œ™b˜–‚ço¸h¹H‘H°¹VÉIg ¿H¸°á`U Y¸Ig¿HY¸Ig¿HY¸Ig¿HY¸Ig¿HY¸Ig¿HY¸Ig ¿HY¸Ig¿HY¸Ig¿HY¸Ig¿HY¸Ig¿HY¸Ig¿HY¸Ig¿HY¸Ig¿HY¸Ig ¿Hoo ¿`U Y¸Ig¿HY¸Ig¿HY¸Ig¿HY¸Ig¿HY¸Ig¿HY¸Ig ¿HY¸Ig¿HY¸Ig ¿HY¸Ig¿HY¸Ig¿HY¸Ig¿HY¸Ig¿HY¸Ig¿HY¸Ig¿HY¸Ig¿HY¸Ig ¿Hoo ¿`U Y¸Ig¿HY¸Ig¿HY¸Ig¿HY¸Ig¿HY¸Ig¿HY¸Ig ¿HY¸Ig¿HY¸Ig ¿HY¸Ig¿HY¸Ig¿HY¸Ig¿HY¸Ig¿HY¸Ig¿HY¸Ig¿HY¸Ig¿HY¸Ig ¿Hhh ¿o¹h¸hºVÉ*»I\‘L°"ºJÓKJhJh ¿I¹°ÚH™‚¬™‚«™b™˜“€‚Ú™‚®‚¤™a‚Ø™‚°‚Ì™a‚ø™‚°‚ì™a0™‚°™‚±8‚É™‚²‚µ™‚‚™.‚”™A‚ˆ™O‚|™‚³‚p™D‚d™F‚X™H‚L™‚´‚@™N‚4™M‚(™‚µ‚™C‚™Q‚™J‚ø™B‚ì™@‚à™‚¶‚Ò™‚·‚½™-‚´™A‚¨™O‚œ™‚³‚™D‚„™F‚x™H‚l™‚´‚`™N‚T™M‚H™‚µ‚<™C‚0™P‚$™J‚™B‚ ™@‚™‚¸‚ò™‚·‚Ý™,‚Ô™‚¹‚È™‚º‚¼™‚³‚°™8‚¤™‚»‚˜™;‚Œ™‚´‚€™‚¼t™‚½h™<\™‚¾P™‚¿D™‚À8™‚Á*™‚·™‚™‚‚ª˜“˜“Ž+™[˜“Ž-™[‚ǘ“˜“˜Œ#+™‚Ϙ“˜Œ#-™‚΂˜“˜“™‚倀™K˜“™‚　™K‚瘓˜“˜Œ#.™‚¨˜“˜Œ#,™‚¦‚☓˜“™‚Õ™‚¨˜Œ^Q™:™9˜“™‚Ø™‚¦˜Œ^F™:™9˜“™‚Ü™‚Ýœ™e˜–‚ŽnX¿jQÊ ð’h°@É ÁÉg'²dhHý¿QR dHý¿³IQ Hý¿QÉ ²HÉQÉ o  ¿noHS ¿HÉch˜Œ *READTABLE*™k˜’Œ*SEDIT-READ-MACROS*™d™e™˜“˜“˜ŒCONTEXT‚€˜ŒMAPHASHi˜•ŒCONCAT@˜ŒCOPY-READTABLE2™‚¸]˜Œ READTABLEPW™‚1K™‚1"˜Œ DEFINED-BY™‚Ž ™‚1u˜–/@‘i€h²@iHÉ ¿@@AHÉ @iAHÉ ˜Œlambda in MUNG-SEDIT-READ-TABLE™‚)˜“˜“˜ŒKEY˜ŒVAL)˜ŒSET-MACRO-CHARACTER˜ŒSET-DISPATCH-MACRO-CHARACTER˜ŒMAKE-DISPATCH-MACRO-CHARACTERd˜Œ-SEDITq™‚=˜•Œ \PTRHUNK2˜–!ggo ¿o ˜Œ2 top-level forms™˜“€˜•ŒREADVISE˜’ŒREINSTALL-ADVICE˜‘˜ŒXEROX-COMMON-LISP˜ŒBEFORE™h˜“™h ˜“˜“˜ŒLAST˜“™e˜•ŒCONTEXT˜–5o ¿g X§c¿ggo ™k˜ŒDEFVAR TM::*SEDIT-READ-TABLES*™˜“€/˜•ŒSET-DOCUMENTATION˜ŒMAKE-HASH-TABLE˜ŒBOUNDP˜ŒPROCLAIM%˜ŒVARIABLE ™k ™k*˜Œ7Cache for readtables modified in support of TEXTMODULES˜“˜ŒSPECIAL™k˜–(¿o ¿o ¿o ˜Œ4 top-level forms™˜“€"˜•ŒPUTPROPS™‚Z ™‚Z™X˜“™˜•Œ COPYRIGHT˜“˜ŒVenue & Xerox Corporation‚ÂĂłƂǂ嘓™™t˜“™ ˜ŒXCL™ ˜ŒSEDIT™ ˜“™™s˜Œ COMPILE-FILEš‚fÿÿ