‘XCL Compiler output for source file {DSK}export>lispcore>sources>CLTL2>CL-ERROR.;1 Source file created Friday, 22 October 1993, 15:03:29. FASL file created Friday, 29 October 1993, 8:33:09. ÿ˜–#ogg o ˜•ŒFILECREATEDLOC˜Œ*STANDARD-INPUT*˜Œ1 top-level form˜ŒFUNCTION˜“€˜•ŒDEFINE-FILE-INFO˜ŒOPEN ˜ŒOUTPUT˜Œ DIRECTION˜“˜Œ READTABLE˜ŒXCL˜ŒPACKAGE˜ŒXCL˜Œ{Null}˜–o ¿o˜Œ2 top-level forms™˜“€˜•Œ FILECREATED˜•Œ CL-ERRORCOMS ˜“˜“˜•ŒCOMS˜“˜•Œ*˜•Œ;;˜ŒInternal stuff. ˜“˜•Œ FUNCTIONS˜’ŒEXPAND-WITH-COLLECTION-SITES˜‘˜Œ CONDITIONS˜’ŒWITH-COLLECTION-SITES™˜“™˜’ŒDEFAULT-PROCEED-REPORT˜‘˜ŒXEROX-COMMON-LISP˜’ŒDEFAULT-RESTART-REPORT™˜“™˜•Œ WITH-GENSYMS˜•ŒWITH-ERR-LOOP-VARS˜•ŒSTRIP-KEYWORDS˜•ŒMAKE-REPORT-FUNCTION˜’ŒNORMALIZE-SLOT-DESCRIPTION™˜•ŒCHECK-*CASE-SELECTOR˜•ŒCOLLECT-CASE-SELECTORS˜•Œ%SUFFIX-SYMBOL˜•ŒPROCEED-ARG-COLLECTOR˜’ŒEXPAND-CONDITION-CASE˜‘˜ŒSYSTEM˜’ŒPROCESS-PROCEED-KEYWORDS™.˜’ŒSPLIT-PROCEED-CLAUSES™.˜’ŒEXPAND-PROCEED-CASE™.˜’ŒPARSE-RESTART-CASE™˜’ŒCONVERT-RESTART-CASES™˜’ŒEXPAND-RESTART-CASE™˜’Œ EXPAND-WCS™˜“˜’Œ OPTIMIZERS™ ˜’ŒCONDITION-CASE™ ˜’Œ CATCH-ABORT™ ˜’Œ PROCEED-CASE™ ˜’Œ RESTART-CASE™˜’ŒWITH-CONDITION-RESTARTS™ ˜“™˜“™˜’ŒDEFINE-CONDITION™ ˜Œ CHECK-TYPE˜Œ ETYPECASE˜Œ CTYPECASE˜ŒECASE˜ŒCCASE˜ŒASSERT˜’Œ HANDLER-BIND™ ˜’ŒCONDITION-BIND™ ™:˜’Œ HANDLER-CASE™˜’Œ IGNORE-ERRORS™ ™<™=˜’Œ RESTART-BIND™˜’ŒWITH-SIMPLE-RESTART™˜’ŒDEFINE-PROCEED-FUNCTION™ ™;™>˜“™™˜Œ-Conversion functions for translating old code˜“™˜’ŒCONVERT-CONDITION-CASE™˜’ŒCONVERT-OLD-DEFINE-CONDITION™˜“˜•ŒPROP˜“˜•ŒFILETYPE˜•ŒMAKEFILE-ENVIRONMENT˜•ŒCL-ERROR˜“˜•ŒDECLARE:˜•Œ DONTEVAL@LOAD˜•ŒDOEVAL@COMPILE˜•ŒDONTCOPY˜•Œ COMPILERVARS˜“˜•ŒADDVARS˜“˜•ŒNLAMA˜“˜•ŒNLAML˜“˜•ŒLAMA˜“˜Œ13-Oct-93 18:50:03˜Œ2{Pele:mv:envos}Sources>CLTL2>CL-ERROR.;2‚ý_˜•Œprevious˜•Œdate:˜Œ28-Feb-92 11:46:47˜Œ2{Pele:mv:envos}Sources>CLTL2>CL-ERROR.;1œ™˜–‚Ëg@¸h¹hºh»H¢I°FH¼BL'’h°BbgLBbhhh»J”JK¿K¹K‘i€h–K ºH¸°¹ggoggggBhhhgoggggBhohhohhAh™™˜“˜“˜Œ NEW-SITES˜ŒBODY˜Œ OLD-SITESL˜ŒLAST˜•ŒGENSYM ‚ ˜ŒQUOTE‚›˜ŒGETF‚–˜’ŒTAIL™‚‘˜ŒLET‚‡˜’Œ COLLECT-INTO™u™yp˜’ŒBODY™k˜’ŒSITES™f™\™W˜ŒMACROLET'™w™|‚µ˜“˜“˜ŒWHEN˜“˜ŒNULL™{˜“˜ŒERROR˜Œ~S is not a valid site for ~S.˜’ŒSITE™˜“™y™}˜“˜ŒLIST*˜“™y™|˜“˜ŒLIST˜“™‚Œ˜“™y˜’Œ$WITH-COLLECTION-VALUE$™.˜’ŒFORM™˜“™‚Œ˜“™y˜ŒIF™‚†˜“™‚Œ˜“™y˜ŒRPLACD™{˜“™‚Š˜“™y˜ŒSETQ™{˜“™y˜“˜“™‚Œ™‚˜“™‚Œ˜“™y™‚–™‚†˜“™‚Š˜“™y™‚–™{˜“™y˜“˜“™‚Œ™‚˜“™y˜“™‚‚©˜“™‚†‚Œ˜“™‚†™‚a˜“˜“˜Œ&REST™˜Œ&BODY™~œ˜’Œexpand-WITH-COLLECTION-SITES™˜–@X¹HºIJh ™‚°™˜“˜“˜Œ $$MACRO-FORM˜Œ$$MACRO-ENVIRONMENT ™˜–&gg ¿ggo ˜Œ*DEFMACRO CONDITIONS::WITH-COLLECTION-SITES™˜“€ ˜•ŒPUTPROP ˜•ŒSETF-MACRO-FUNCTION˜•ŒARGNAMES™™‚°™˜“˜Œ(&REST CONDITIONS::SITES)™‚­˜ŒCONDITIONS::BODYœ˜’Œexpand-DEFAULT-PROCEED-REPORT™ ˜–@X¹gIo™‚¿™˜“˜“˜Œ $$MACRO-FORM˜Œ$$MACRO-ENVIRONMENT˜ŒGET ˜“˜“™y˜•Œ%DEFAULT-PROCEED-REPORT˜“™y˜•ŒDEFAULT-PROCEED-REPORTER˜–&gg ¿ggo ˜ŒDEFMACRO DEFAULT-PROCEED-REPORT™˜“€ ™‚¸ ™‚¹™‚º™!™‚¿™!˜“˜Œ PROCEED-TYPEœ˜’Œexpand-DEFAULT-RESTART-REPORT™˜–@X¹gIo™‚Й˜“˜“˜Œ $$MACRO-FORM˜Œ$$MACRO-ENVIRONMENT™‚Ä ˜“˜“™y™‚Ř–&gg ¿ggo ˜Œ+DEFMACRO CONDITIONS::DEFAULT-RESTART-REPORT™˜“€ ™‚¸ ™‚¹™‚º™"™‚Й"˜“˜ŒCONDITIONS::RESTART-TYPEœ˜•Œexpand-WITH-GENSYMS˜–R@X¹HZ»J¼gI½h¾h_¿h_¿M¢N°,M_gKhh_¿N˜OO&_¿†Oh_¾M½°ÓL™‚Ý ™˜“˜“˜Œ $$MACRO-FORM˜Œ$$MACRO-ENVIRONMENT(™x™|˜–&gg ¿ggo ˜ŒDEFMACRO IL:WITH-GENSYMS™˜“€ ™‚¸ ™‚¹™‚º™$™‚Ý™$˜“˜ŒIL:VARS˜Œ IL:PREFIX™‚­˜ŒIL:BODYœ˜•Œexpand-WITH-ERR-LOOP-VARS˜–@X¹HºgoIJ™‚Ꙙ“˜“˜Œ $$MACRO-FORM˜Œ$$MACRO-ENVIRONMENT ™$˜“˜•ŒVAL˜•Œ BLOCK-NAME˜•ŒAGAIN˜–&gg ¿ggo ˜ŒDEFMACRO IL:WITH-ERR-LOOP-VARS™˜“€ ™‚¸ ™‚¹™‚º™%™‚ê™%˜“˜Œ IL:PREFIX™‚­˜ŒIL:BODYœ™&˜–Fh¸h¹hº@b¿@‘h€i[‘KŠ@ ‘h€i‘°@@hºI”IJ&¹„JhY¸@b¿°ÍH@$™&™˜“˜“˜ŒARGS˜ŒKEYWORDPœ™'˜–S@¸@ ‘@@‘h€iY‘I…@ò$gAoBgBA@h€@hhgHoh ™'™˜“˜“˜ŒDATUM˜Œ BOUND-VAR˜Œ &OPTIONAL˜Œ TYPE-NAMEM˜•ŒCHECK-TYPE-FAIL˜ŒSTRINGP@˜•ŒDATUM+˜•ŒWITH˜ŒLAMBDA˜•ŒLISTPF˜“˜ŒOR˜ŒSTRING™‚Œ#˜“˜Œ*STANDARD-OUTPUT*œ™(˜–<@¸@¹@Ãœ@@oI×@ohgHoh ™(™˜“˜“˜Œ SLOT-DESC6™‚)˜’Œ SLOT-DESC™˜•ŒLITATOM™‚ /˜“™‚ ˜ŒCONS˜ŒSYMBOL!˜“€˜Œ READ-ONLY˜“™‚œ™)˜–@iðX‘H†@gðœo@A @™)™˜“˜“˜ŒSELECTOR˜ŒNAME™‚„ ˜Œ OTHERWISE˜Œ~A not allowed in the ~A form.œ™*˜–P@¸h¹hºh»H¡IH\‘i€h—Ao€h—L ‰LA h»J”JK¿K¹K‘i€h–K ºH¸°»™*™˜“˜“˜ŒCLAUSES˜ŒNAMEE™w,™)#˜Œ COPY-LIST˜“™D™Eœ™+˜–g@ A B ™+™˜“˜“˜ŒSYMBOL˜ŒSUFFIX˜ŒPACKAGE˜ŒINTERN ˜Œ CONCATENATE˜Œ SYMBOL-NAME™‚ œ˜•Œexpand-PROCEED-ARG-COLLECTOR˜–@X¹gIo™‚4™˜“˜“˜Œ $$MACRO-FORM˜Œ$$MACRO-ENVIRONMENT™‚Ä ˜“˜“™y˜•Œ%PROCEED-ARG-COLLECTOR˜–;gg ¿ggo ¿ggo ˜Œ!DEFMACRO IL:PROCEED-ARG-COLLECTOR™˜“€5™‚¸ ˜•ŒSET-DOCUMENTATION ™‚¹+™‚º&™,˜ŒFUNCTION™,™‚4™,0˜“˜ŒIL:NAME˜ŒgFunction that collects user-specified optional args (excluding the condition) for a named proceed case.œ™/—˜–‚ànX¿A¢±ÕW•„g¹gAdHý¿’h°DžCšCÉkð‚h€hºHÉ–A‘h‚i€h™@koH-gggggh»h¼A½h¾M‘M°&¾Ngð³N_¿K•LO&¼…Oh\»M½°ØK¼L—gLLhhhhIggogogIJ‘@ˆg@hhohhhogoHɲgIhkoH-ŒJ‘IˆgIhhA¼h»h¾h½L£K±‹L__¿O__¿O_¿Ogð’h°IgggOhhO²gOO’O„oohŠO’O„oh½N”NM¿M»M‘i€h–M ¾L¼±ÿuo h@ ˜•Œ*BYTECOMPILER-IS-EXPANDING*™/ ™˜“˜“˜ŒFORM˜ŒCLAUSES˜ŒENV˜ŒCTX˜Œ OPTIMIZE?‚јŒAPPEND‚À™w™x‚ƒ™‚ ‚q™y‚l˜’ŒCONDITION-CASE-SELECTOR™.‚g˜ŒTYPEP‚]˜ŒNO-ERROR‚*˜Œ VALUES-LIST‚™‚Q‚˜ŒCOND‚à˜ŒMULTIPLE-VALUE-LIST‚Ö˜ŒSETF‚Ì™|‚˜ŒCATCH‚½™‚N‚¦™‚ ‚™‚Pj™ye˜’ŒCREATE-CONDITION-CASE-LITERALS™.`˜•ŒLOADTIMECONSTANT[˜’ŒCONDITION-CASE-LITERALS™.V˜ŒLET*1˜’ŒCONTEXT˜‘˜ŒCOMPILER™‚P˜’ŒCONDITION-CASE-VALUES™. ‚̘“˜“˜“˜’ŒCONDITION-CASE-ERROR™.™‚N˜“˜ŒCADR™‚X‚¦˜“€‚—˜“™‚N‚˜“€‚ ˜“˜ŒEQ™‚N˜ŒNORMAL‚˜“˜ŒDECLARE˜“˜•Œ LOCALVARS™‚N‚혓™‚h‚ј“˜“˜•Œ*CONDITION-HANDLER-BINDINGS*˜“™‚˜“˜ŒCDR™‚X™‚o‚ǘ“˜ŒCAR™‚X˜•Œ \PTRHUNK2™‚x‚˜–yHÉYºI»J²_J².@‘i€h˜@gð€hgJ@KgJ@KgJ@‘i€h˜@gð€h›g@h€@hKg@HɘŒCONSTRUCT-NO-ERROR-CODE˜ŒCLOSURE˜“˜“˜Œ VALUE-FORMk˜ŒPROGNW˜ŒFIRSTN™‚Q>™|2˜ŒMULTIPLE-VALUE-BIND$˜’ŒDESTRUCTURING-BIND™ ™‚Q™‚xN™‚‚œ™0˜–‚Th¸h¹A Z»J¼K½M¢±2M^^_¿N_¿Ogð²H›o@ ¿O¸±Ogð² H›o@ ¿ghOh¸±ØOgð²6H›o@ ¿ghgggOhhh¸±šOgð²I›o@ ¿O¹°|Ogð²_I›o@ ¿O_¿O “O°=O‘h€i_’O†OògoOh°hgOoh ¹°ooO@ ¿M½±þÏHIL$™0 ™˜“˜“˜ŒNAME˜ŒARG˜ŒPACKAGE ‚A˜ŒCERROR‚,™‚‚왂‚ß™‚„‚™‚„‚„™‚„\™‚„>™‚„ ˜•Œ\MVLIST™& ‚˜’ŒVALUE™.‚ ™‚ ‚™‚ ‚ϘŒREPORT‚²˜ŒREPORT-FUNCTION‚š™y‚•˜’Œ*CURRENT-CONDITION*™ ‚™‚O‚Š™‚ t˜Œ CONDITIONb™‚ L˜ŒFILTER.˜ŒFILTER-FUNCTION ‚9˜Œ&Illegal keyword ~S in proceed case ~S.‚4˜ŒIgnore key/value pair‚%˜“™‚ ™‚ ™‚Œ‚˜“™‚‚Ù˜Œ4Duplicate report form specified for proceed type ~S.‚¼˜Œ4Duplicate report form specified for proceed type ~S.~˜Œ2Duplicate test form specified for proceed type ~S.V˜Œ/Duplicate filter specified for proceed type ~S.8˜Œ/Duplicate filter specified for proceed type ~S.œ™1—˜–‚Ûh¸h¹@ºh»j¼J]‘M‚±E[½K¾MKW __¿O__¿O_¿M®O«oK ¿B²pO‘h€i_“O°#Od3@ð²A‘h€i_’O‹AO ‘h€i€h²>O‘h€i_“O°0O _“O°"Od3@ð²A‘h€i_’OŠAh ‘h€i€h€h€h²$gMgLgOgO °YgggMhgLgOšgOh€hgO²O ’O‰gOh€hhH¸LNOI¹JºLkÔ¼±þ¸H kð›Hkoh-°hgH ²'H \Lið‘h†L3‘h€i€h™gLh€L°6gH ¼h»hºh½L¢K°Lkoh-½K”JM&º„MhZ»L¼°áI $˜Œ *PACKAGE*™1™˜“˜“˜ŒCLAUSES˜ŒENV˜Œ OPTIMIZE? ‚Ò˜ŒREVERSE‚£˜ŒNREVERSE‚y™‚¢‚q˜•Œ %EVERY-SINGLE‚W˜•ŒLENGTH‚!™‚‚☕ŒMAKE-PROCEED-CASE‚¶˜’Œ ENV-FBOUNDP™‚[‚•™‚y™‚¦M™‚„'™‚‰"™0‚™‚Œ‚™y‚k˜•ŒPROCEED-CASE-P‚*™‚@‚™‚‹‚ ™‚@‚˜ŒTEST‚ü˜ŒSELECTOR‚ó™y‚NAME‚陂¥‚Ú™‚‹‚Ó™‚¨‚Í™‚©‚Ç™‚ªG˜Œ3Unnamed proceed cases must have a report method: ~S™‚¬‚·˜–)@ò @@ið‘hˆ@3‘h‚i€h™g@h@@˜Œ MAYBE-QUOTE™‚z˜“˜“˜ŒX™y™<™‚¬‚b™‚±œ™2—˜–‚dW•„g¸DžCšCÉkð‚h€h¹ABD Z»J¼K¢±)gHggggKohhgggHI‘@ˆg@hhohhhgoI‘HˆgHhnoL ²EgoL½h¾h_¿h_¿M¢N°&Mkoh-_¿N˜OO&_¿†Oh_¾M½°Ù°WgoggL½h¾h_¿h_¿M¢N°&Mkoh-_¿N˜OO&_¿†Oh_¾M½°Ùhohh@ ™‚E™2 ™˜“˜“˜ŒFORM˜ŒCLAUSES˜ŒENV˜ŒCTX˜Œ OPTIMIZE?‚¹™‚£+™‚‰&™1™x‚˜’ŒPROCEED-CASE-SELECTOR™.‚ ˜ŒCASE‚™‚ ‚À™‚º‚¤™‚Q‚–™‚’w™‚Sm™‚Th˜•Œ*PROCEED-CASES*c™‚UQ™‚L™‚»G™|B˜’Œ PROCEED-CASE-SELECTOR-AND-VALUES™.<™‚Y™‚\ ˜’ŒPROCEED-CASE-NORMAL-VALUES™.‚R˜“˜“™‚u™‚¼˜“™‚p™‚¼‚˜“™‚¹˜’ŒPROCEED-CASE-VALUES™.‚Ř“™‚u™‚¼‚±˜– @‘hi˜Œlambda in EXPAND-PROCEED-CASE™‚z˜“˜“˜ŒX‚›˜“™‚g™‚¼™‚h‚„˜“™‚hW˜“™‚»‚­˜•ŒCOMPILED-CLOSURE™‚Í‚+˜–-@¸@YºI»J²HggJgKhHK˜Œ CREATE-A-CASE™‚z˜“˜“˜ŒX™‚Á™‚™‚™‚Í‚Þ™‚Òœ™3˜–‚Óh¸h¹hºA ¢±¼A»Ab¿K»A¼Ab¿L¼Kgð™H’±˜L¸±“Kgð²)H’±…ghggLhoh¸°bKgð²)H³VghgggLhhh¸°2Kgð–I³'L¹°#Kgð–J³Lº°ooK@ ¿±ÿ?HIJA$™3™˜“˜“˜ŒNAME˜ŒCLAUSE‚™‚ˆ ™‚ý ‚¨˜Œ INTERACTIVE‚™™‚‹‚„™y™‚z™‚Ot™‚ i™‚ŽQ™‚@L˜ŒFUNCALLF™‚ 9™‚¨'™‚‚»˜Œ'Illegal keyword ~S in restart named ~S.‚¶˜ŒIgnore key/value pairZ˜“™‚œ™4˜–‚7h¸h¹hºi»H ¼I ½@¾h_¿h_¿j_¿N_’O‚±ê__¿O_¿O_¿O_¿O_¿O_‘iºOO __¿O__¿O_ _"¿O _$¿B¢±¥O‘h€i_&“O&°#Od3@ð²A‘h€i_(’O(AO ‘h‚i€h²rO‘h€i_&“O&°1O _(“O(°#Od3@ð²A‘h€i_*’O*AO ‘h‚i€h²2O"‘h€i_&“O&°*O"d3@ð²A‘h€i_(“O(°AO" ‘hˆi†h„h‚h€h²-gOgOgOgOgO" °sh»gggOhgOgOšgOh€hgO²O ’O‹gOh€hgO"šgO"h€hh_&¿H•LO&&¼…O&h\¸O²OgOgO$h„OO$_&¿I•MO&&½…O&h]¹N¾OkÔ_¿±þH²K™gHh‰gHHIJ$™4™˜“˜“˜ŒCLAUSES˜ŒENV˜Œ OPTIMIZE? ‚“™‚‚P˜’Œ MAKE-RESTART™‚™‚¦‚虂¦‚Æ™‚‚ª™‚¦^™‚‰Y™3™w ™w‚'™‚Œ‚™y‚時Á‚ß™‚‚°™‚@‚¨˜ŒINTERACTIVE-FN‚œ™‚@‚ˆ™‚‹‚|™‚@‚t™‚¨‚m™‚©‚c™y‚^™‚ª‚Y™‚â‚H™‚ã‚A™‚‹‚:™‚¨‚3™‚©‚,™‚ªœ™5˜–‚íA¡@W•„g¸DžCšCÉkð‚h€h¹ABD Z»J\½L¾gHggggKohhgggHI‘@ˆg@hhohhhgoI‘HˆgHhN²$goggMhoŒgoMhh™‚E™5™˜“˜“˜ŒFORM˜ŒCLAUSES˜ŒENV˜ŒCTX˜Œ OPTIMIZE?/™‚‰*™4™x‚Ö™‚º‚Ù‚¹‚¾™‚º‚´™‚ ‚¨™‚Q‚š™‚’{™‚Sq™‚Tl™‚»g™‚UU™‚P™‚»K™|F™‚¼@™‚Y™‚\™‚½‚Û˜“™‚u™‚¼‚Ϙ“˜“™‚u™‚¼˜“™‚p™‚¼‚¹˜“™‚¹™‚Á‚Ÿ˜“™‚g™‚¼™‚h‚ˆ˜“™‚h[˜“™‚»œ™6˜–‚ÖghBb¿A­g@ABhT•„g¸EžDšDÉkð‚h€h¹º»gJ@hhggJhhgKgggogogogogohgogoogoJhhohgohgoogoJhhhhhohhAhhHggggKohhgggHI‘BˆgBhhohhhgoI‘HˆgHhgggoKhhohhh™‚E™6™˜“˜“˜ŒCONDITION-FORM˜Œ RESTARTS-FORM˜ŒBODY˜ŒENV˜ŒCTX˜Œ OPTIMIZE?D˜ŒGENSYM>™‚ý™x"‚®˜ŒNTH‚©˜’ŒRESTART-FUNCTION™‚¤˜ŒAPPLY‚›™‚Q‚™‚’‚m™‚S‚c™‚T‚^™‚»‚Y™‚U‚G™‚‚B™‚»‚=™|‚8™‚¼‚þ™‚Œ‚Œ‚䙂Œ‚Ù‚Œ‚´™‚Œ‚ª™‚Œ‚Ÿ™‚Œ‚•™‚’‚‹™‚T‚™|w™‚ r™‚@m˜ŒMAPCARg™‚Y[˜ŒSPECIALV™‚jJ™|0™‚\%™‚½™‚~™|‚À˜“˜“™‚p™‚¼‚³˜“™‚u™‚¼‚’˜“™‚g™‚¼™‚h‚z˜“™‚h‚M˜“™‚»‚ ˜“˜’ŒNEWRS™‚˜“™y™y‚ù˜“™y™‚‚ô˜“™y™‚g‚阓™y™‚ ‚ט“˜“™‚Œ˜“™y™‚ؘ“™‚Œ˜“™y™y˜“˜’Œ RESTART-TEST™˜’ŒR™‚Ș“™y™y‚¾˜“™y™‚‚¹˜“™y™‚g‚¯˜“™y˜ŒAND‚¤˜“™y™‚ ‚š˜“™‚™‚‚˜“™‚™‚ ‚†˜“˜“™‚ ˜“˜’Œ COPY-RESTART™™‚|˜“™‚œ˜’Œoptimize-CONDITION-CASE™ ˜–@X¹HºIJABi ™‚%™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX™/˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER CONDITION-CASE™˜“€,™‚¸%™‚%™‚%˜’ŒOPTIMIZER-LIST™‚[ ™:™‚.™:œ˜’Œoptimize-CATCH-ABORT™ ˜–F@X¹HZ»BšBÉkð€h²(ggKghgIohg™‚0™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX@˜’ŒPASS™‚[,™‚‹&˜’ŒABORT™ ™‚~™< ™‚\2˜“€˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER CATCH-ABORT™˜“€,™‚¸%™‚0™‚0™‚. ™;™‚.™;œ˜’Œoptimize-PROCEED-CASE™ ˜–@X¹HºIJABi ™‚=™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX™2˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER PROCEED-CASE™˜“€,™‚¸%™‚=™‚=™‚. ™<™‚.™<œ˜’Œoptimize-RESTART-CASE™˜–@X¹HºIJABi ™‚G™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX™5˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER RESTART-CASE™˜“€,™‚¸%™‚G™‚G™‚. ™=™‚.™=œ˜’Œ optimize-WITH-CONDITION-RESTARTS™ ˜–@X¹HZ»J¼IKLABi ™‚Q™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX™6˜–2gggÁÉg'¸gH‘H†gH ˜Œ$DEFOPTIMIZER WITH-CONDITION-RESTARTS™˜“€,™‚¸%™‚Q™‚Q™‚. ™>™‚.™>˜–Gggg ¿gggÁÉg'¸gH‘H†gH ˜ŒDEFDEFINER DEFINE-CONDITION™˜“€A™‚¸™‚¸ :™@0™@)˜Œ DEFINED-BY ˜•Œ STRUCTURES™‚]™‚^ ™‚^˜Œ DEFINER-FOR™@œ˜’Œ$definition-expander-DEFINE-CONDITION™ ˜–‚0@X¹HZ[¼J]’M€h¾M__¿L—Li €h_¿h_¿h_¿h_¿h_¿h_¿h_¿h_ ¿h_"¿N_$¿h_&¿O$’O$°;_& _&¿O&O™O&O_¿°O ˜O"O&&_"¿ˆO&h_"_ ¿O$_$¿°ÁO _¿h_"¿h_ ¿O_&¿h_$¿O&’O&‚±Ø_$¿O$_(gð_*’O*‡O(gð²O"šO O$&_ ¿±¢O$h_ _"¿±–O(gðžO¢±‡O$_¿°}O(gð²,O²ooO$O$g ¿°RO$_¿°IO(gð²,O²ooO$O$g ¿°O$_¿°hoO(o ¿O&_&¿±ÿ%O"_¿ggIL²gLO h€hOogIoI ho OgoO²-gggIhogOhhh€hO‘i€h²HIoI _ ¿gggO hhgOhhh_"¿O _¿O"€hgggIhhO²O ’O‹gOh€hhO‘i€h²HIoI _ ¿gggO hhgOhhh_"¿O _¿O"€hgggIhhOšgOh€hhh  h™‚a™˜“˜“˜Œ $$MACRO-FORM˜Œ$$MACRO-ENVIRONMENT‚$™‚M‚™‚M‚¸™+‚³˜ŒSYMBOL-PACKAGE‚Š™‚‚3™+‚.™‚f‚Ú™‚M‚Õ˜•Œ\NCONC2‚Æ™+‚Á™‚f‚£™‚¢‚y˜•Œ ECASE-FAIL‚[™‚ˆ‚'™‚ˆ^™(!˜ŒSTRUCTURE-SLOT-NAMES ‚ ™‚@‚ý™y‚ø˜’ŒCONDITION-HANDLER™ ‚ó™‚T‚×™‚@‚Ê™y‚ŘŒSYMBOL-FUNCTION‚À™‚T‚“™‚@‚x™y‚s˜’ŒCONDITION-REPORTER™ ‚n™‚T‚R™‚@‚E™y‚@™‚k‚;™‚T‚ ™y‚ü™y‚÷˜Œ DOCUMENTATION‚ò™‚T‚䘌 EVAL-WHEN‚µ˜Œ CONSTRUCTOR‚›˜ŒINCLUDE‚’˜Œ DEFSTRUCT‚™‚~‚U™@‚:˜ŒHANDLE‚!™@‚™‚‹‚ DOCUMENTATION‚ʘŒINLINE‚¼˜Œ CONC-NAME ‚­˜Œ default handler‚(˜Œ report method‚˜“˜“™y˜ŒTYPE‚阓˜ŒLOAD˜ŒEVAL‚Θ“˜“˜ŒCOPIER€˜“˜Œ PREDICATE€‚»˜Œ constructor‚°˜“˜ŒPRINT-FUNCTION˜•Œ%PRINT-CONDITION‚t˜“™‚u™‚t™‚s™‚‹™‚r‚m˜“™‚˜’ŒOPTION™‚K˜Œ#~S is a duplicate ~S option for ~S.‚F˜ŒIgnore the later ~*~S option‚™‚Š‚™‚‹˜–Cggg ¿ggg ¿oPgg c˜•ŒPRETTYPRINTMACROS™‚[™˜“€;˜ŒADJOIN%™‚¸™‚¸6˜ŒEQUAL1™‚¨ ˜ŒSECOND˜ŒDEFINITION-NAME™@ ™‚a˜ŒDEFINITION-EXPANDER™@+˜”™@’ŒPPRINT-DEFINER™ œ˜’Œexpand-DEFINE-CONDITION™ ˜–ggg@Ah™‚–™˜“˜“˜Œ $$MACRO-FORM˜Œ$$MACRO-ENVIRONMENT ™@™‚^˜’ŒDEFINER™ ˜–&gg ¿ggo ™‚[™˜“€ ™‚¸ ™‚¹™‚º™@™‚–™@˜“˜Œ&WHOLE˜Œ DEFINITION˜Œ &ENVIRONMENT˜ŒENVœ˜Œexpand-CHECK-TYPE˜–‚½@X¹HZ»J\’L€h½o ¾o _¿o _¿gOgOgNIhhggNgKhhgOhhgIgigIhNgKhMhhgOhhhh™‚¤ ™˜“˜“˜Œ $$MACRO-FORM˜Œ$$MACRO-ENVIRONMENT1™x$™x™x ‚¤˜ŒGO‚™y‚…™y™‚y™‚Tk˜Œ RETURN-FROM^™yX™‚OS™‚G™|@˜ŒTAGBODY9˜ŒBLOCK,˜Œ CHECK-TYPE™‚­™‚­˜–&gg ¿ggo ˜ŒDEFMACRO CHECK-TYPE™˜“€ ™‚¸ ™‚¹™‚º™A™‚¤™A˜“˜Œ CL::PLACE˜Œ CL::TYPESPEC™‚˜ŒSTRINGœ˜Œexpand-ETYPECASE˜–o@X¹HZ»o ¼gKg ½gLIhhgLKighgIhLgMhohh h™‚¶™˜“˜“˜Œ $$MACRO-FORM˜Œ$$MACRO-ENVIRONMENTc™‚M ™*™xK™yA™y;™‚3˜ŒTYPECASE'™|™B™‚ T˜“€ ˜Œ ETYPECASE˜–&gg ¿ggo ˜ŒDEFMACRO ETYPECASE™˜“€ ™‚¸ ™‚¹™‚º™B™‚¶™B˜“˜Œ CL::KEYFORM™‚­˜Œ CL::CLAUSESœ˜Œexpand-CTYPECASE˜–‚»@X¹HZ»gJg ¼o ½o ¾o _¿gNgOgMIhhgNgMKigIgigIhMgLhohgOhhh hhhh™‚Å™˜“˜“˜Œ $$MACRO-FORM˜Œ$$MACRO-ENVIRONMENT‚£™‚M7™x,™x!™x™* ‚“™‚©|™yr™yl™‚f™‚T^™‚»X™‚ªL™|E™‚«?™‚¬™C ™‚ ‚…˜“€2˜Œ CTYPECASE'™‚Ë™‚˘–&gg ¿ggo ˜ŒDEFMACRO CTYPECASE™˜“€ ™‚¸ ™‚¹™‚º™C™‚Å™C˜“˜Œ CL::KEYPLACE™‚­˜Œ CL::CLAUSESœ˜Œ expand-ECASE˜–r@X¹HZ»o ¼Kg ]²FgLIhhgLKighgIhLgMhhhh ho ™‚Ó™˜“˜“˜Œ $$MACRO-FORM˜Œ$$MACRO-ENVIRONMENTl™‚„[™‚M™*™xG™y=™y7™‚h/™‚º#™|™Dg˜ŒEmpty case statement. ˜ŒECASE˜–&gg ¿ggo ˜ŒDEFMACRO ECASE™˜“€ ™‚¸ ™‚¹™‚º™D™‚Ó™D˜“˜Œ CL::KEYFORM™‚«˜Œ CL::CLAUSESœ˜Œ expand-CCASE˜–‚½@X¹HZ»Jg \ªo ¿o ½o ¾o _¿gNgOgMIhhgNgMKigIgigIhMgLhhhgOhhh hhhh™‚ᙘ“˜“˜Œ $$MACRO-FORM˜Œ$$MACRO-ENVIRONMENT‚¥™‚M=™x2™x'™x™‚„™* ‚•™‚©‚‚™yx™yr™‚hl™‚Td™‚º^™‚ªR™|K™‚«E™‚¬ ™E8˜ŒCCASE-™‚æ"™‚昌 Empty CCASE.˜–&gg ¿ggo ˜ŒDEFMACRO CCASE™˜“€ ™‚¸ ™‚¹™‚º™E™‚á™E˜“˜Œ CL::KEYFORM™‚­˜Œ CL::CLAUSESœ˜Œ expand-ASSERT˜–‚¦@X¹HZ’J€h»J\’L€h½L^_¿K‘h€i_’O…K‘i€h«oK ¿o ¿o _¿o _¿gOgOgIgOohgMOgOhhh™‚ï ™˜“˜“˜Œ $$MACRO-FORM˜Œ$$MACRO-ENVIRONMENTY™xL™xA™x6™‚„‚‘™‚©‚‡˜•Œ ASSERT-FAILu™‚ªo™‚h™‚«a™‚¬|˜“€T˜ŒASSERTG™‚ö<™‚ö0˜Œ~S should be a list of places.˜–&gg ¿ggo ˜ŒDEFMACRO ASSERT™˜“€ ™‚¸ ™‚¹™‚º™F™‚ï™F˜“˜Œ CL::TEST-FORM™‚˜Œ CL::PLACES˜Œ CL::DATUM™‚«˜ŒCL::ARGSœ˜’Œexpand-HANDLER-BIND™ ˜–‚¨@X¹HºI¢±•gggI²Uggh»h¼I½h¾M‘M°8¾gNh_¿K•LO&¼…Oh\»N_¿K•LO&¼…Oh\»M½°ÆK°ggI¼LhI¼LhohhJgJ™‚™˜“˜“˜Œ $$MACRO-FORM˜Œ$$MACRO-ENVIRONMENT ‚ ™‚~y™yt™‚;™y&˜ŒMULTIPLE-HANDLER-BINDINGS!™‚Œ™‚™‚o™|‚˜“™‚o˜–;gg ¿ggo ¿ggo ˜ŒDEFMACRO HANDLER-BIND™˜“€5™‚¸ ™‚? ™‚¹+™‚º&™G™‚@™G™‚™G0˜“˜ŒBINDINGS™‚«˜ŒFORMS˜Œ2Eval forms under temporary new condition handlers.œ˜’Œexpand-CONDITION-BIND™ ˜–@X¹HºgIJ™‚™˜“˜“˜Œ $$MACRO-FORM˜Œ$$MACRO-ENVIRONMENT ™G˜–;gg ¿ggo ¿ggo ˜ŒDEFMACRO CONDITION-BIND™˜“€5™‚¸ ™‚? ™‚¹+™‚º&™H™‚@™H™‚™H0˜“˜ŒBINDINGS™‚«˜ŒFORMS˜ŒKEval forms under temporary new condition handlers; synonym for HANDLER-BINDœ˜’Œexpand-CONDITION-CASE™ ˜–@X¹HºIJhhh ™‚™˜“˜“˜Œ $$MACRO-FORM˜Œ$$MACRO-ENVIRONMENT™/˜–;gg ¿ggo ¿ggo ˜ŒDEFMACRO CONDITION-CASE™˜“€5™‚¸ ™‚? ™‚¹+™‚º&™:™‚@™:™‚™:0˜“˜ŒFORM™‚«˜ŒCLAUSES˜ŒHEval form under condition handlers that provide alternate continuations.œ˜’Œexpand-HANDLER-CASE™˜– @X¹HZ»IJhhh ¿gIK™‚*™˜“˜“˜Œ $$MACRO-FORM˜Œ$$MACRO-ENVIRONMENT™/™:˜–;gg ¿ggo ¿ggo ˜ŒDEFMACRO HANDLER-CASE™˜“€5™‚¸ ™‚? ™‚¹+™‚º&™I™‚@™I™‚*™I0˜“˜ŒCONDITIONS::FORM™‚«˜ŒCONDITIONS::CLAUSES˜ŒHEval form under condition handlers that provide alternate continuations.œ˜’Œexpand-IGNORE-ERRORS™ ˜–@¸ggHo™‚7™˜“˜“˜Œ $$MACRO-FORM˜Œ$$MACRO-ENVIRONMENT ™‚~™:˜“˜“™‚„˜“˜’Œ CONDITION™ ˜“˜ŒVALUES€™‚<˜–;gg ¿ggo ¿ggo ˜ŒDEFMACRO IGNORE-ERRORS™˜“€5™‚¸ ™‚? ™‚¹+™‚º&™J™‚@™J™‚7™J0˜“™‚­˜ŒIL:FORMS˜Œ8Eval forms with handler for any condition of type ERROR.œ˜’Œexpand-PROCEED-CASE™ ˜–@X¹HºIJAhh ™‚I™˜“˜“˜Œ $$MACRO-FORM˜Œ$$MACRO-ENVIRONMENT™2˜–;gg ¿ggo ¿ggo ˜ŒDEFMACRO PROCEED-CASE™˜“€5™‚¸ ™‚? ™‚¹+™‚º&™<™‚@™<™‚I™<0˜“˜ŒFORM™‚«˜ŒCLAUSES™‚ ˜ŒENV˜Œ8Eval forms, establishing a place to proceed from errors.œ˜’Œexpand-RESTART-CASE™˜–@X¹HºIJAhh ™‚W™˜“˜“˜Œ $$MACRO-FORM˜Œ$$MACRO-ENVIRONMENT™5˜–&gg ¿ggo ˜ŒDEFMACRO RESTART-CASE™˜“€ ™‚¸ ™‚¹™‚º™=™‚W™=˜“˜ŒCONDITIONS::FORM™‚«˜ŒCONDITIONS::CLAUSES™‚ ˜ŒCONDITIONS::ENVœ˜’Œexpand-RESTART-BIND™˜–‚"@X¹HZ»I¢±I¼h½h¾h_¿L£M±ÑL__¿O__¿O__¿h_¿gO _“O€h_¿gO _“O€h_ ¿gO _“O€h_"¿Oo ¿gggOhgogOgOgO gO"h_¿M•NO&¾…Oh^½L¼±ÿ/¼gggL—gLLohhKgJ™‚d™˜“˜“˜Œ $$MACRO-FORM˜Œ$$MACRO-ENVIRONMENT‚ˆ˜•Œ KEYWORD-TESTq˜•Œ FIND-KEYWORDZ™‚jC™‚j‚™‚~‚™‚Œ‚ø™‚‚ó™‚»‚î™|‚Á™‚¨‚º™‚‹‚³™‚ガ™‚¢™‚©‚˜™y‚“™‚ª‚Ž™‚âj™‚S™‚Œ<˜ŒINTERACTIVE-FUNCTION‚ ˜“™‚»‚§˜“™y˜’ŒCOMPLEX-RESTART-MARKER™.‚ƒ˜“™‚™‚Œ™‚k˜–&gg ¿ggo ˜ŒDEFMACRO RESTART-BIND™˜“€ ™‚¸ ™‚¹™‚º™K™‚d™K˜“˜ŒCONDITIONS::BINDINGS™‚­˜ŒCONDITIONS::BODYœ˜’Œexpand-WITH-SIMPLE-RESTART™˜–Q@XYºI[¼K½H¾ggNJhggoggLMhoh™‚w™˜“˜“˜Œ $$MACRO-FORM˜Œ$$MACRO-ENVIRONMENT5˜ŒSTREAM0˜ŒFORMAT&™‚ !™‚‹™‚~™=C˜“˜“™‚>€+˜“™‚|˜–&gg ¿ggo ˜ŒDEFMACRO WITH-SIMPLE-RESTART™˜“€ ™‚¸ ™‚¹™‚º™L™‚w™L˜“˜ŒF(RESTART-NAME CONDITIONS::FORMAT-STRING &REST CONDITIONS::FORMAT-ARGS)™‚­˜ŒCONDITIONS::BODY˜–Gggg ¿gggÁÉg'¸gH‘H†gH ˜Œ"DEFDEFINER DEFINE-PROCEED-FUNCTION™˜“€A™‚¸™‚¸ :™M0™M)™‚] ™™‚]™ ™™‚_™Mœ˜’Œ+definition-expander-DEFINE-PROCEED-FUNCTION™ ˜–‚Ñ@X¹HºIJI [¼K]¾M_¿O_¿h_¿h_¿h_¿O£O°4O__d3@ð’O‚O_¿O˜OO&_¿ˆOh__¿O_¿°É_¿N¥g¾gL‘i€h²EIoI _¿gggOhhgLhhh_¿O¼O€hgggIhhL™gLh€hhN‘i€h²EIoI _¿gggOhhgNhhh_¿O¾O€hgggIhhN ‘NˆgNhhgIgOggggIhhhhggggOhhhh  ™‚‹ ™˜“˜“˜Œ $$MACRO-FORM˜Œ$$MACRO-ENVIRONMENT ‚Ê™‚M‚Ä™‚M‚Y™‚‚ ™+‚™‚f‚—™+‚’™‚f™‚‰™0 ™‚f‚«˜’ŒRESTART™‚¦˜’ŒINVOKE-RESTART™‚¡™‚‚œ™‚‚‹™y‚†˜’Œ FIND-RESTART™‚™‚‚|™|‚t™‚‚n˜ŒDEFUN‚a™‚@‚L™y‚G™!‚B™‚T‚)™‚@‚™y‚™‚k‚™‚T‚療@‚Ù™y‚Ô˜’ŒDEFAULT-PROCEED-TEST™ ‚Ï™‚T‚¶™‚@‚©™y‚¤™‚k‚Ÿ™‚T~™‚~x™‚Ç‚ÿ˜Œ# proceed case default report method‚Œ˜Œ proceed case default test˜–Cggg ¿ggg ¿oPgg c™‚™‚ˆ™˜“€;™‚%™‚¸™‚¸6™‚1™‚¨ ™‚‘™‚’™M ™‚‹™‚“™M+˜”™M’ŒPPRINT-DEFINER™ œ˜’Œexpand-DEFINE-PROCEED-FUNCTION™ ˜–ggg@Ah™‚›™˜“˜“˜Œ $$MACRO-FORM˜Œ$$MACRO-ENVIRONMENT ™M™™‚›˜–&gg ¿ggo ™‚ˆ™˜“€ ™‚¸ ™‚¹™‚º™M™‚›™M˜“™‚ž˜Œ DEFINITION™‚ ˜ŒENVœ˜’Œexpand-CATCH-ABORT™ ˜–3@X¹HºggJgogIoh™‚¦™˜“˜“˜Œ $$MACRO-FORM˜Œ$$MACRO-ENVIRONMENT™‚‹™‚7™‚~ ™<%˜“˜“™‚>€™‚<˜“™‚<˜–&gg ¿ggo ˜ŒDEFMACRO CATCH-ABORT™˜“€ ™‚¸ ™‚¹™‚º™;™‚¦™;˜“˜Œ PRINT-FORM™‚­˜ŒFORMSœ˜’Œexpand-WITH-CONDITION-RESTARTS™ ˜–@X¹HZ»J¼IKLAhh ™‚µ™˜“˜“˜Œ $$MACRO-FORM˜Œ$$MACRO-ENVIRONMENT™6˜–&gg ¿ggo ˜Œ DEFMACRO WITH-CONDITION-RESTARTS™˜“€ ™‚¸ ™‚¹™‚º™>™‚µ™>˜“˜ŒCONDITIONS::CONDITION-FORM˜ŒCONDITIONS::RESTARTS-FORM™‚«˜ŒCONDITIONS::BODY™‚ ˜ŒCONDITIONS::ENVœ™R˜–]@X¹HºgIJ»h¼h½h¾K¢L°@K_¿O_‘h€i_’O†O‘i€hgOOO¾L”MN&½„Nh]¼K»°¿™R ™˜“˜“˜ŒWHOLE8™‚ ™Iœ™S—˜–‚cnX¿@ YºI[Hý¿K\½L^_¿Jgð®W4o ¿@Okoh- __¿O_¿h_¿h_¿O_¿h_¿O’O‚±Ü__¿O_ ¿Ogð_"’O"‡Ogð²!O_"¿OšOO&_¿±šOh__¿±ŽOgð²)gO h_"¿OšOO"&_¿±iO"h__¿±]Ogð¢±&nH_$¿O _"¿O œgO h±åO ‘h€i_&’O&†O ⱺgoW2 O$ý¿Mi O_&¿h_(¿h_*¿h_,¿O&£O(°3O&_.‘i€h“O.O._,¿O(˜O*O,&_*¿ˆO,h_*_(¿O&_&¿°Ê O$ý¿gO$ÉoO gnoO$gigO$Éh hh°hgO"oh _"¿OšOO"&_¿±:O"h__¿±.Ogð²)gO h_"¿OšOO"&_¿± O"h__¿±ýOgð¢±ÙgnH_0¿oW2 O0ý¿Mi O_"¿h_&¿h_(¿h_*¿O"£O&°3O"_,‘i€h“O,O,_*¿O&˜O(O*&_(¿ˆO*h_(_&¿O"_"¿°Ê O0ý¿gO0ÉhO gnoO0gigO0Éh hh_"¿O™OO"&_¿°%O"h__¿°igOo _¿±ýAO_¿±ý!O_¿gHÉMhOO™‚›˜Œ*ERROR-OUTPUT*™S™˜“˜“˜ŒFORM‚6™‚h‚˜’Œ WALK-FORM™ ‚Ä™‚M‚v™‚i‚i™‚0‚ô™‚‚×™‚Ë‚•™‚M‚G™‚i‚:™‚0‚™‚E™‚‰3˜ŒPRINT˜’ŒREMOVE-COMMENTS™ ‚O™@‚*˜’ŒKEY™‚ö˜ŒLEXICAL-VARIABLES‚ð˜ŒCOPY‚ܘŒ WALK-FUNCTION‚Ï™‚ ‚S™‚r‚I™‚r‚ ™‚r‚˜ŒHANDLER-FUNCTION‚昒ŒVALUE™‚Ë™‚Ï‚Å™‚Ђ±™‚Ñ‚ ™‚ ‚.™‚‹‚%™‚ ‚ ™‚‹‚陂‹‚À™‚‹‚¸™‚Œ‚™‚u‚™‚t%™@‚1˜“™‚t™‚u™‚Œ™‚‹™‚Ò™‚r‚嘖=@d3@ð•@HÉ€h²-HÉÉgo@ Q HÉhi$@™‚›˜Œ&lambda in CONVERT-OLD-DEFINE-CONDITION™‚z˜“˜“˜ŒFORM˜ŒCONTEXT+™+%™‚1 ™‚2™‚ ˜Œ-‚b˜Œ CONDITION‚혓™‚ ™‚ ™‚Œ‚º˜–=@d3@ð•@HÉ€h²-HÉÉgo@ Q HÉhi$@™‚›˜Œ&lambda in CONVERT-OLD-DEFINE-CONDITION™‚z˜“˜“˜ŒFORM˜ŒCONTEXT+™+%™‚1 ™‚2™‚ ˜Œ-‚©˜“™‚‚3˜Œ CONDITION.˜ŒNot a define-condition form‚ᙂÌ‚X˜•Œ \PTRHUNK4‚¶™‚Ì‚ó™‚虂w™‚é>˜–Fh¸h¹hº@b¿@‘h€i[‘KŠ@ ‘h€i‘°@@hºI”IJ&¹„JhY¸@b¿°ÍH@$˜ŒSTRIP-KEYWORDS™‚z˜“˜“˜ŒARGS™‚ý˜–"o ¿o ¿o ˜Œ3 top-level forms™˜“€˜•ŒPUTPROPS™‚ñ™‚ñ˜“™Y˜•Œ COPYRIGHT˜“˜ŒVenue & Xerox Corporation‚‚ÂÄ‚Æ‚Ç‚È‚É ˜“™Y™W˜“™ ˜ŒXCL™ ˜ŒXCL˜“™Y™V˜Œ COMPILE-FILEš‚ýÿÿ