‘XCL Compiler output for source file {DSK}disk2>jdstools>lc3>lispcore3.0>sources>SEDIT-COMMENTS.;1 Source file created Wednesday, 16 May 1990, 21:35:01. FASL file created Monday, 26 January 1998, 13:32:56. ÿ˜–#ogg o ˜•ŒFILECREATEDLOC˜Œ*STANDARD-INPUT*˜Œ1 top-level form˜ŒFUNCTION˜“€˜•ŒDEFINE-FILE-INFO˜ŒOPEN ˜ŒOUTPUT˜Œ DIRECTION˜“˜Œ READTABLE˜ŒXCL˜ŒPACKAGE˜“˜’Œ DEFPACKAGE˜‘˜ŒXEROX-COMMON-LISP˜•ŒSEDIT˜“˜ŒUSE˜•ŒLISP˜•ŒXCL˜Œ{Null}˜–‚Ñggo ¿o¿o ¿o ¿g¿g¿g¿g¿g¿gkglglglglh¿gggggh¿o ˜Œ12 top-level forms™˜“€‚˘•Œ CONSTANTS1˜•ŒPUTPROPS&™˜•ŒPUTPROP‚À˜’ŒCOMMENT-MARKERS˜‘˜ŒSEDIT‚µ˜•Œ|‚°˜•Œ;;;;‚«˜•Œ;;;‚¦˜•Œ;;‚¡˜•Œ;‚›˜’ŒCOMMENT-LEVEL-TABLE™‚‰™ ‚‚™!{™"t™#n™$h˜’ŒLEVEL-5-COMMENT™c™ ]˜’ŒLEVEL-4-COMMENT™X™!R˜’ŒLEVEL-3-COMMENT™M™"G˜’ŒLEVEL-2-COMMENT™B™#<˜’ŒLEVEL-1-COMMENT™7™$˜•ŒSEDIT-COMMENTSCOMS˜•Œ FILEDATES˜•ŒSEDIT-COMMENTS‚Ƙ“˜“™*˜“˜ŒQUOTE™$˜“™)˜“™.™#˜“™(˜“™.™"˜“™'˜“™.™!˜“™&˜“™.™ ˜“™%˜“ ˜ŒLIST™*™)™(™'™&˜“™˜“™9™*™)™(™'™&,˜“™-˜•ŒMAKEFILE-ENVIRONMENT˜“™ ˜ŒXCL™ ˜“™™˜“™™™!˜“™-˜•ŒFILETYPE˜Œ COMPILE-FILE˜“˜“˜•ŒPROP™E™-˜“™H™?™-˜”˜•Œ LOCALVARS˜“˜•ŒDECLARE:˜•ŒDONTCOPY˜•ŒDOEVAL@COMPILE˜“˜•ŒFILES˜•Œ SEDIT-DECLS˜“™˜“™*˜“™.™$˜“™)˜“™.™#˜“™(˜“™.™"˜“™'˜“™.™!˜“™&˜“™.™ ˜“™%˜“ ™9™*™)™(™'™&˜“™˜“™9™*™)™(™'™&˜“$˜•ŒFNS˜’ŒBACKSPACE-COMMENT™˜’Œ CFV-COMMENT™˜’ŒCLOSE-NODE-COMMENT™˜’ŒCOMMENT-LENGTH™˜’ŒCOMPUTE-COMMENT-COLUMN™˜’ŒCOMPUTE-POINT-POSITION-COMMENT™˜’Œ"COMPUTE-SELECTION-POSITION-COMMENT™˜’ŒCOPY-SELECTION-COMMENT™˜’ŒCOPY-STRUCTURE-COMMENT™˜’ŒCOPY-STRUCTURE-COMMENT-WORD™˜’ŒCREATE-NEW-COMMENT™˜’ŒDEGRADE-COMMENT™˜’ŒDELETE-COMMENT™˜’ŒINITIALIZE-COMMENTS™˜’ŒINSERT-COMMENT™˜’Œ SPLIT-COMMENT™˜’ŒINSERT-COMMENT-CHARS™˜’ŒLINEARIZE-COMMENT™˜’ŒMAP-COMMENT-INDEX™˜’ŒPARSE--COMMENT™˜’ŒPARSE--COMMENT-WORD™˜’ŒPARSE-STRING-INTO-WORDS™˜’ŒSELECT-SEGMENT-COMMENT™˜’ŒSET-POINT-COMMENT™˜’ŒSET-POINT-COMMENT-WORD™˜’ŒSET-SELECTION-COMMENT™˜’ŒSET-SELECTION-COMMENT-WORD™˜’ŒSIMPLE-STRING-OFFSET™˜’ŒSIMPLE-STRING-SCAN™˜’Œ START-COMMENT™˜’ŒSTRINGIFY-COMMENT™˜’ŒCREATE-COMMENT-WORD-NODE™˜’ŒCREATE-COMMENT-WORD-NODES™˜’ŒUNDO-COMMENT-CHANGE™˜’ŒUPGRADE-COMMENT™˜“˜•Œ FUNCTIONS˜’ŒMAKE-COMMENT-STRING™˜’ŒVERIFY-COMMENT™ ˜“˜”˜Œ16-May-90 21:47:02•Œ6{DSK}local>lde>lispcore>sources>SEDIT-COMMENTS.;2œ™d˜–‚³B²YjBð²?@ÉkñšA@ ¿±‰@É ³}@ÉA@hAÉ> ¿°a@ABhAÉ> ¿°LAÉ>¸AÉ.–A ¿H@οH@É  ¿Hg¿AÉ@ ™d™˜“˜“˜Œ &OPTIONAL˜ŒNODE˜ŒCONTEXT˜ŒINDEX˜Œ INTERLISP‚­˜’ŒSET-SELECTION-NOWHERE™‚˜•ŒNCHARSn˜’Œ CLOSE-NODE™S™p>˜’Œ DELETE-NODES™™o ‚¦˜’Œ EDIT-CONTEXT™‚˜ŒSTRING‚˜˜’Œ EDIT-POINT™‚…˜’Œ EDIT-NODE™™‚žu™‚že™‚œ\™‚œK™‚œ6™‚œ+™‚Ÿ ™‚Ÿ ™‚Ÿœ™e˜–p@h¿Bɸ@ÉYkðœ@ZHÍ¿HIlðž@ZlÍ¿lIlðZ‘J‹Ilð[‘KƒIlðž@ZlÍ¿lo ™e™˜“˜“™‚‘˜ŒNODE˜Œ ENVIRONMENT˜ŒCONTEXT˜ŒFORMAT™‚–j˜•ŒSHOULDNTW™‚Ÿ3™‚Ÿ!™‚Ÿ™‚Ÿ ™‚œ™‚Ÿe˜Œ"unexpected value for comment levelœ™f˜–G@gAAÉ h@É88¿AÉ A ¿@Xh0¿h™f™˜“˜“™‚‘˜ŒCONTEXT˜ŒNODE™‚–3™‚‰;™‚œ)™‚Ÿ™‚œ™‚Ÿ™‚…™‚œœ™g˜–>@É ¸A¹kºh»j¼H]‘M°#»JIó‘°LKÉ Ô¼JkÔºH¸°ÙL™g™˜“˜“™‚‘˜ŒNODE˜ŒNUMBER-OF-SUBNODES™‚–,™‚™%™‚Ÿ™‚Ÿœ™h˜–A@ɸ@Ag HÉÚldÛ¿@¹HɺIJ¿J™h™˜“˜“™‚‘˜ŒCONTEXT˜ŒWINDOW™‚–˜•Œ GETWINDOWPROP2˜’ŒEDIT-ENV™+™‚œ™‚¹˜•ŒWIDTH ™‚œ™‚œœ™i˜–‚ @ɸh¹AH@É ¿AÉXY²A@IÉο@ºIÈIÉAÉV Ø»JK¿K@HÈHÉÈØ¿@»HɺKJοJ™i™˜“˜“™‚‘˜ŒPOINT˜ŒCONTEXT™‚–Y™™v‚‘™‚Ÿ‚Š™‚ž~˜’Œ STRING-ITEM™v™‚Ÿn™‚Ÿh™‚žR™‚œI™‚ŸA™‚Ÿ:™‚ž/™‚Ÿ)™‚ž™‚œ™‚ž™‚žœ™j˜–‚·@ɸ@ɹAHI@ÉZ‘J€I ¿AÉXºAÉ\»@JÉο@JÈJÉAÉVkÙ Ø ¿@KÉο@¼KÈKÉAÉZ ؽLM¿M™j™˜“˜“™‚‘˜Œ SELECTION˜ŒCONTEXT™‚–‚©™o™#™v‚¢™‚œ‚™™‚Ÿ‚‘™‚Ÿ‚Š˜’ŒEDIT-SELECTION™™‚Ÿy™‚Æf™‚œ]™‚ŸU™‚ŸO™‚ÆD™‚Ÿ>™‚Æ4™‚œ*™‚œ™‚Æ ™‚Æ™‚Æœ™k˜–‚š@ɺ@ÉÉ »@ɼ@ɽB‘B€AÉ ¾h_¿L²#M‘ML]K kÙð‘h€i_’OˆLjð‘h‚i€h™KLM »ŽJAÉ »D™JALM ¿B¢±îCÉgð˜CBK CÉgð˜CBh ¿L¢±ªh_¿h_¿h_¿K _¿h_¿h_¿`W$ioW&O¹ny_"¿O h_¿g‚h¹gð’O€h_¡°%OB _¿O˜OO&_¿ˆOh__¿°–O_™CBO N ¿oN CBJB KJÉW(ð•L‘h‚i€h ˜’Œ*CATCH-RETURN-PC*˜‘˜ŒSYSTEM˜•Œ*CONDITION-HANDLER-BINDINGS*˜’Œ *NLSETQFLAG*™‚ɘ•Œ*PROCEED-CASES*˜’Œ*CATCH-RETURN-TO*™‚É™‚Í™‚˘’Œ TYPE-STRING™™k™˜“˜“™‚‘˜Œ SELECTION˜ŒCONTEXT˜Œ DESTINATION˜ŒPOINT˜ŒDELETE?™‚–‚”˜•ŒBKSYSBUF‚z˜’ŒINSERT™‚u˜’Œ COPY-NODE™‚k˜•ŒPRIN1‚_˜•ŒTERPRI‚X™‚Ø‚0˜’Œ PARSE-NEW™‚˜•ŒREAD‚ט•ŒOPENSTRINGSTREAM‚¿™‚Ø‚§™‚Ø‚Š™‚›~™‚‚n˜•Œ SUBSTRINGO™‚™;˜•ŒGETPROMPTWINDOW‚‚™‚Ÿ‚˜ŒNORMAL‚™‚á‚瘒ŒNLSETQ-PROCEED-CASE™‚É‚µ˜ŒATOM‚®™‚ž‚™‚‚–™‚žw™‚œ4™‚œ'™‚Æ™‚Æ™‚Ÿ ™‚Æ™‚Æ‚e˜Œ Selection not a valid structure.‚𘔘ŒERROR’Œ NLSETQHANDLER™‚Éœ™l˜–)@¸g@É @ h¹HI ¿I™l™˜“˜“™‚‘˜ŒNODE™‚–™‚‰™‚Ÿ˜•Œ*™‚Ÿœ™m˜–@@É ¸@H ¿@É@ɹ`I Z»JH¿K™m™˜“˜“™‚‘˜ŒNODE™‚–1˜•ŒNCREATE2 ˜ŒCOPY-SEQ+˜’ŒSTRING-ITEMTYPE#™"™‚Ÿ™‚Ÿ™‚Ÿ™‚Ÿœ™n˜–‚‡@ɸ`YºITοJ¹ggohºI»IJ ¿KZ¹JjÍ¿IZ¹Jh¿IZ¹JHÍ¿IZ¹Jk¿Iºjh¹J»JI ¿KYºIg¿JY`Z»JIοK¿I˜’Œ TYPE-COMMENT™™n™˜“˜“™‚‘˜ŒCONTEXT™‚–t˜’ŒWEAK-LINKTYPE#™o™‚Ÿe˜’ŒNOT-YET-ASSIGNED™™$™‚ë ˜’ŒEDIT-NODETYPE#™™‚œ#˜Œœ™o˜–xAÉ oA¸AÉmÿÔ¹HI¿I ¿A@ ¿AÉÉžAÉ@ ¿@¹gAh@É8¸IH8¿H™o™˜“˜“™‚‘˜ŒCONTEXT˜ŒNODE™‚–Q˜’Œ NOTE-CHANGE™2™‚(˜•ŒNTH h™‚œ^™‚†X™‚œI™‚Ÿ@™‚Ÿ9™‚Ÿ™‚Ÿ™‚Ÿ™‚Ÿ ˜“™$™#™"™!™ œ™p˜–‚nAÉ0@ð³AÉ.–A ¿A@0¿Ai.¿D²&D@οDBkÙ¿Dg¿A@BC‘C€B ¿AÉV¸AÉX¹AÉZºAÉ\»@É ¼h½h¾h_¿h_¿IK𢱕IÉÉ^ _¿IÈ ½Hkð² Mkð’h°JOð_’ONJkØ l ð€h_“O°+JOð²$MLð’h°Hkð_“O°NHkÙ l ð‘h‚i€h’±Hkð”JOð€h²CAh0¿Ah.¿@É o ¿@jh ¿@A ¿±IÉNHJ IÉÉ Ù_¿NkHkÙ _’O„oNJkØ _’O„o ¾IÉN¿IN ¿IAO ¿AÉ>_Dð’h°!OÉ@ð²OÉBýñ‘h‚i€h²OOÉJkØHÙÙ¿±4@É  _¿IÉ kHkÙ _’O„oKÉ JkØ _’O„o ¾IÈ _¿h_¿h_¿@É O _¿AÉ\_¿OO¿O³6@É OkÙ¿N jñ²A@IÈ kð‘hOhN ¿°OOÍ ¿O_¿OkÔ_¿°®@A ¿AÉ>_Dð’h°!OÉ@ð²OÉBýñ‘h‚i€h²OOÉC‘C€BkØBÙÙ¿i™p ™˜“˜“™‚‘˜ŒNODE˜ŒCONTEXT˜ŒSTART˜ŒEND˜Œ SET-POINT?™‚–‚™‚‚ò™t‚Õ™‚™‚¨™‚‚…˜•ŒCONCAT‚u™‚ß‚Z™‚ß‚F™‚™‚蘒Œ ADJUST-WIDTH™‚™‚ ‚²™‚ß‚ž™‚ß‚˜’Œ STRINGWIDTH™‚{™‚ß‚g™‚‚R™‚ ‚˜•Œ NTHCHARCODE‚噂‚º™‚™`™v™‚š-‚X™‚ž‚Q™‚ž‚=™‚ž‚0™‚ž‚™‚œ‚ý™‚Ÿ‚ᙂŸ‚Ç™‚Ÿ‚±™‚œ‚Ÿ™‚Ÿ‚Œ™‚Ÿ‚k™‚Ÿ‚O™‚Ÿ‚<™‚Ÿ‚(™‚ž‚!™‚ž‚ ™‚ž‚™‚ž‚œ‚Û™‚Ÿ‚Ñ™‚À‚É™‚Ÿ‚‰™‚À‚™‚Ÿ‚q™‚Ÿ‚Z™‚Ÿ‚D™‚Ÿ‚:™‚œ‚0™‚œ‚Ù‚Ÿ‚²™‚À‚ª™‚Ÿ‚™‚Ÿ‚ƒ™‚œz™‚œp™‚œg™‚œP™‚K™‚ž?™‚ž5™‚ž(™‚œ™‚œ™‚œ™‚œ‚€˜Œ‚e˜Œ‚½˜Œ‚©˜Œ‚M˜Œœ™q˜–‚+`X¹Hg¿IX¹Hg¿IX¹Hg¿IX¹Hg¿IX¹Hg ¿IX¹Hg¿IX¹Hg¿IX¹Hg¿IX¹Hg ¿IX¹Hg¿IX¹Hg¿IX¹Hg¿IX¹Hg¿IX¹Hg¿IX¹Hg¿IX¹Hg ¿IX¹Hg"¿Ic`X¹Hg¿IX¹Hg¿IX¹Hg¿IX¹Hg ¿IX¹Hg¿IX¹Hg¿IcRc˜’ŒTYPES™™‚ô˜’ŒTYPE-COMMENT-WORD™™q™˜“€™‚–‚™m‚™~‚™|‚ö˜•ŒNILL‚Ꙃ‚Þ˜’Œ COMMENT-WORD™‚Õ˜’ŒEDIT-NODE-TYPETYPE#™‚Ê™f‚¾™d‚²™‚‚‚¦™k‚š™l‚Ž™p‚‚™rv™jj™i^™zR˜’ŒGROW-SELECTION-LITATOM™F™}:™{.™u"™e™‚ ˜’ŒCOMMENT™™‚œ™r˜–‚Êh¸Bò(BÉkÙ¸@AHkØBÉY‘I‚HkØ ¿ˆBɸC¢±„A@H ¿AÉ0@ð³AÉ.–A ¿A@0¿Ai.¿A@AÉXAÉVC ¿@A ¿D²#D@οD¹HC غIJ¿Jh@DAH ™r™˜“˜“™‚‘˜ŒNODE˜ŒCONTEXT˜ŒWHERE˜ŒCHARS˜ŒPOINT™‚–‚Ä™s‚°™‚™‚”™‚‚Œ™t^™‚šB™v*™p ‚¨™‚ž‚ž™‚ž‚ƒ™‚œ{™‚œo™‚œe™‚œU™‚œI™‚œ2™‚ž™‚Æ ™‚Æ™‚Æœ™s˜–‚®BÉ.–B ¿@É X ¹HCkØI ºAB@É@È i@g ¿CIð‘h@BCkØIhH ¿ABgo@É JhB ¿AB@É@È i@g ™s™˜“˜“™‚‘˜ŒNODE˜ŒPOINT˜ŒCONTEXT˜ŒSTART™‚– ‚¨˜’Œ SET-POINT™‚ˆ™‚Ø‚ƒ™‚Üw™‚]™‚›H™‚-(™‚ß™‚™ ™‚š ‚¢˜Œ STRUCTURE‚™™‚Ÿ‚‘™‚Ÿp™‚Ÿe™‚ëB™‚.9™‚Ÿ1™‚Ÿ™‚Ÿ™‚œj™‚œ™t˜–‚½D ¸B¹@ÉÉ ºh»h¼I²IÉ [ ¼CLð“hb¿Hkð²EI²@D l ð²C‘h€i]’M°.KCkØ l ð° Cjð]’M°KC‘C€L l ð‘h„i‚h€h²mD b¿KkC ]‘M„oDC™KCkØ €h]‘M„o »IÉK¿IK ¿I@IÉDJ Ø Cjð²+IÈ kð’h°AÉ IÈ b¹°hC²eKCkØ ]@ÉWMhJ ¾I@IÉNÉÙ ¿BNB¿KkC ½IÉM¿IM ¿DB’BˆAÉ @É ½B”BM¿ŠAÉ M¿AÉ ½h¾j_¿h_¿h_¿AÈkØ_¿Mb¿B¢±ÑOkØ_¿BYOÍ ¿IAοIOÍ¿IÉ _¿B_‘h€i_“O°-OO l ð²OÉ  l ð‘h‚i€h‘°VOOÉ _¿IO ¿IÉO¿I@IÉOÉØ ¿BB¿±ÿqBb¿±ÿ/AÉ O¿N ™‚™t ™˜“˜“™‚‘˜ŒCONTEXT˜ŒNODE˜ŒSUBNODES˜ŒINDEX˜ŒCHARS™‚–‚˜™‚ ‚^™‚ ‚B˜•ŒCHCON1‚.™‚‚)™‚™‚š™‚„‚a™‚ß‚Q™‚ ‚8˜’ŒCREATE-SIMPLE-NODE™‚$™‚ß‚™‚‚陂 ‚㙂‚µ™‚ ‚¥™‚ß‚™‚ß‚…˜•ŒMKSTRINGr™‚Z™‚B™‚7+™‚™™‚™!‚°™‚Ÿ‚™‚Ÿ‚‡™‚Ÿ‚z™‚À‚r™‚Ÿ‚g™‚Ÿ‚W™‚Ÿ‚:™‚Ÿ‚ ™‚Ÿ‚™‚Ÿ‚ö™‚Ÿ‚뙂Ÿ‚Ë™‚Ÿ‚³™‚Ÿ‚¨™‚Ÿ‚“™‚œ‚Š™‚Ÿ‚z™‚Ÿ‚p™‚À‚h™‚Ÿ‚I™‚Ÿ‚A™‚Ÿ‚+™‚œ‚ ™‚Ÿ‚™‚Ÿ‚õ™‚Ÿ‚Ú™‚Ÿ‚Ι‚Ÿ‚Ä™‚À‚¼™‚Ÿ#™‚Ÿ™‚¹ ™‚œ‚°˜Œ‚™˜Œœ™u˜–‚Å@ɸAÉYÉ(H'ºB²@É B °AJ ¿@É »h¼i½K^‘N°]¼M’M° AÉFLÉØ@Èñ‘h€i™LA ¿°&A@È ¿lHð§AJ ¿LA ¿h½K»°ŸlHð²AIÉ(l' h™u™˜“˜“™‚‘˜ŒNODE˜ŒCONTEXT˜ŒINDEX™‚–‚½˜’ŒOUTPUT-CONSTANT-STRING™‚ž˜’Œ LINEARIZE™‚–™‚B‚‰˜’Œ OUTPUT-CR™x™‚C4™‚B)™‚ ‚³™‚¹‚‚™‚Ÿi™‚Ÿ`™‚ŸX™‚œ;™‚Ÿ!™‚Ÿ™‚¹ ™‚œ™‚Ÿœ™v˜–‚ÏAÉ ¸h¹hºh»h¼B½@É0¾HºJ¢±‚J\Nð²LÉÉŒLÉ »MKñ•MKÙ½°JB²1@MV¿@JX¿C¡hMCBÙØ]KñMKÙ½hb¿hb¿°@MZ¿@J\¿hJº±ÿ~@hV¿@hX¿@hZ¿@h\¿I™v™˜“˜“™‚‘˜ŒCONTEXT˜ŒNODE˜ŒSTART˜ŒEND™‚–G™‚™ ‚Ä™‚œ‚º™‚œ‚°™‚œ‚¦™‚œ‚”™‚œ‚Š™‚œe™‚œ[™‚œ@™‚Ÿ6™‚À.™‚Ÿ™‚œ™‚Ÿœ™w˜–‚¹h¸@™o@'€hY²L@²E@’h°@@ ²0AÉD‘h€iZ’J°$AÉDÉÉo„h‚h€h²X@ATi ¿AÉV›AhV¿°7@ ¸HºJ¡°J[Ag ¿Jº°êAÉDI¿ih™‚ô™w™˜“˜“™‚‘˜Œ STRUCTURE˜ŒCONTEXT™‚–‚™˜’ŒPARSE™‚„™ye˜’Œ BUILD-NODE™%˜•ŒSTRINGP ‚¬™‚Ÿ‚¥™‚œ‚”™xu™‚œl™‚œL˜’ŒEDIT-NODE-TYPE™E™‚Ÿ>™‚œ-™‚œS˜“˜’ŒFORM™˜’ŒCLISP™˜ŒLAMBDA™9˜“ ™$™#™"™!™ œ™x˜–@AP@hAÉÉ ™‚™x™˜“˜“™‚‘˜Œ STRUCTURE˜ŒCONTEXT™‚–˜’ŒBUILD-PRELINEARIZED-NODE™™‚¹™‚œœ™y˜–P@ ¸h¹hºh»H»Kjð‘°+@K l ð²I²@KkØH JºK¸h¹i¹KkÙ»°ÓHjð‘h@kH J™y™˜“˜“™‚‘˜ŒCHARS™‚–H™‚ß*™‚ß™‚™‚™œ™z˜–e@ɸh¹H‘C€h²RBCÈ kÙ FE ع@Iº@É[‘K€H»JKñ‘J€K¿IHýñ™@I¿@A h™z™˜“˜“™‚‘˜Œ SELECTION˜ŒCONTEXT˜ŒNODE˜ŒSUBNODE˜ŒINDEX˜Œ SUB-OFFSET˜ŒSUB-ITEM™‚–]™j%™‚€™gR™‚Æ5™‚Æ-™‚Æ™‚Ÿ™‚Æœ™{˜–‚§C²TBÉCkØ b ²9EÃœEÉb ¿ŒEÉb ¿BEÈ kÙ b¿° jb¿°D²BÉ  €hb¿C²1@Bο@C¿@g¿G—@A h@ ™{™˜“˜“ ™‚‘˜ŒPOINT˜ŒCONTEXT˜ŒNODE˜ŒINDEX˜ŒOFFSET˜ŒITEM˜ŒTYPE˜ŒCOMPUTE-LOCATION?™‚–‚¡˜’ŒSET-POINT-NOWHERE™‚˜™id™‚™F™g™‚ ‚‹™‚‚†™‚ž|™‚žr™‚žZ™‚Ÿ=™‚Ÿ1˜’Œ WEAK-LINK™#™‚z™‚z™‚Ÿœ™|˜–^@BÉο@BÉBÈ kÙ BÉDi Ø¿@g¿G—@A h™|™˜“˜“ ™‚‘˜ŒPOINT˜ŒCONTEXT˜ŒNODE˜ŒINDEX˜ŒOFFSET˜ŒITEM˜ŒTYPE˜ŒCOMPUTE-LOCATION?™‚–V™i:™‚€*™gI™‚D™‚ž0™‚Ÿ!™‚Ÿ™‚Ÿ™‚ž™‚Ÿ™‚žœ™}˜–EØ@AB @ ™}™˜“˜“™‚‘˜Œ SELECTION˜ŒCONTEXT˜ŒNODE˜ŒINDEX˜ŒOFFSET˜ŒITEM˜ŒTYPE™‚–™‚˜ ˜’ŒSET-SELECTION-ME™™‚Àœ™~˜–b@BÉο@BÉBÈ kÙ BÉD Ø¿@h¿@g¿@A ™~™˜“˜“™‚‘˜Œ SELECTION˜ŒCONTEXT˜ŒNODE˜ŒINDEX˜ŒOFFSET˜ŒITEM˜ŒTYPE™‚–\™j9™‚€*™g R™‚M™‚ÆC™‚Æ0™‚Ÿ!™‚Ÿ™‚Ÿ™‚Æ™‚Ÿ™‚Æœ™˜–%Ajñ²@ÉkA @É j™™˜“˜“™‚‘˜Œ STRINGITEM˜ŒINDEX™‚–™‚™‚ß™‚À™‚Àœ™‚€˜–p@ɸ@ɹjºh»h¼H »JkØZKñ‘°EHJ \l ýñ²l^I l@LØI ؆LI ¼B˜ALâñ©JkÙALñ¡JALÙb¿°¶JkÙ™‚€™˜“˜“™‚‘˜Œ STRINGITEM˜ŒOFFSET˜ŒPOINT?™‚–M˜•Œ CHARWIDTHD™‚¦:™‚¦+™‚™‚™ ™‚À™‚Àœ™‚˜–‚ë@É>XɹHɺh»I¢±ÊJgð²0IòIÉTðšjHÉð‚h€h™@I ¿ihJgð‘hIò$IɘIÉŽIÉɹIÉUð‘iH@@ [h ¿jKÈð³2HKοHj¿Hg¿@É@ ¿ih™‚ô˜’Œ TYPE-QUOTE™™‚™˜“˜“™‚‘˜ŒCONTEXT˜ŒCHARCODE™‚–‚ᙂ˜‚¥™‚Ø‚™nO™‚†‚Ú™‚œ‚Ñ™‚‚Ì™‚ž‚™‚ž‚¸™‚ž‚­™‚Ÿ‚Ž™‚Ÿ‚…™‚Ÿ~™‚Æu™‚Æl™‚Æd™‚ÆZ˜’ŒESC-ATOM™@™‚ž4™‚Ÿ,™‚Ÿ#™‚™‚ž ™‚ž™‚œœ™‚‚˜–‚œ@ÉXjðY’I°HkðZ’J°Hlð[‘K‹Hlð\‘LƒHlð²"@É o@É  Hlð²7AÉ(l'É@É AÉ(l'É hgHo ™‚‚™˜“˜“™‚‘˜ŒNODE˜Œ ENVIRONMENT™‚–‚–˜•Œ ECASE-FAIL‚„™‚ I™‚ ‚‹˜’ŒLEVEL™}™‚Às™‚¹h™‚Ÿ`™‚ÀV™‚¹?™‚Ÿ0™‚Ÿ™‚Ÿ‚‘˜“9˜Œ œ™‚ƒ˜–@AP@hAÉ ™‚™‚ƒ™˜“˜“™‚‘˜ŒCHARS˜Œ ENVIRONMENT™‚–™‚8™‚¹œ™‚„˜–V@ ¸h¹hºH¹Ijð‘°3@I l ð²J²@IkØH B Ab¿I¸hºiºIkÙ¹°Ë@kH B A™‚„™˜“˜“™‚‘˜ŒCHARS˜ŒSUBNODES˜Œ ENVIRONMENT™‚–N™‚ƒH™‚ß.™‚ƒ(™‚ß™‚™‚™œ™‚…˜–‚á@gAAÉ h@É88¿B ¸AÉ ¹AÉ B¿Hºh»k¼J]‘M°q»I²IK ¿I@ ¿°GIK@ÉVKh@ÉÉ  ¿IAοILÍ ¿I¹JºLkÔ¼°‹I ¿AÉ H ¿A@ ™‚™‚…™˜“˜“™‚‘˜ŒCONTEXT˜ŒNODE˜Œ OLD-VALUE™‚–‚Û™‚‚Ò˜•ŒFLENGTH‚ØŒRPLACD‚˜˜•Œ\NCONC2‚“˜ŒCONS‚Ž™‚8i˜’ŒNOTE-CHANGE-IN-SIMPLE™)™y ‚Ê™‚Ÿ‚­™‚Ÿ‚¡™‚Ÿ‚†™‚¹™‚œt™‚œ\™‚Ÿ9™‚Ÿ0™‚Ÿ™‚œ™‚Ÿ™‚…™‚œœ™‚†˜–‚‡AÉlýñ²xAÉ oA¸AÉkÔ¹HI¿I ¿A@ ¿AÉÉžAÉ@ ¿@¹gAh@É8¸IH8¿Hh™‚†™˜“˜“™‚‘˜ŒCONTEXT˜ŒNODE™‚–^™‚?™‚5™‚ u™‚œk™oe™‚œV™‚ŸM™‚ŸF™‚Ÿ%™‚Ÿ™‚Ÿ™‚Ÿ™‚Ÿ™‚œ™‚‰˜–w@É ¸j¹Hºh»J‘Jˆh[\‘L‚I°»IKÉ Ô\¹Jº°ÝY »jºH¼h½L‘L‡h]^‘NK]É ¾KNgJ ¿JN Ô_ºL¼°Î™‚‰™˜“˜“˜ŒNODEi˜ŒLENGTHa˜ŒREPLACE7˜Œ MAKE-STRING)™‚Ö[˜ŒSTART1Q™‚Ÿ"™‚Ÿ™‚Ÿœ™‚Š˜–fj¸@É ¹IY º@É »h¼K‘K‡h\]‘Mi\É ½IMgHgHM Ô^X^Jýó‘N€J ‘hK»°¿™‚Š™˜“˜“˜ŒNODEY˜ŒMISMATCHH™‚Ö™‚ÖA˜ŒEND1;™‚Ù1™‚Ÿ™‚Ÿ™‚Ÿ˜– o ˜Œ1 top-level form™˜“€™˜“™-˜•Œ COPYRIGHT˜“˜ŒVenue & Xerox Corporation‚‚ÂÄ‚Æš‚èÿÿ