‘XCL Compiler output for source file {DSK}export>lispcore>sources>CLTL2>XCLC-OPTIMIZERS.;1 Source file created Friday, 22 October 1993, 15:36:39. FASL file created Friday, 12 November 1993, 14:58:43. ÿ˜–#ogg o ˜•ŒFILECREATEDLOC˜Œ*STANDARD-INPUT*˜Œ1 top-level form˜ŒFUNCTION˜“€˜•ŒDEFINE-FILE-INFO˜ŒOPEN ˜ŒOUTPUT˜Œ DIRECTION˜“˜Œ READTABLE˜ŒXCL˜ŒPACKAGE˜“˜’Œ DEFPACKAGE˜‘˜ŒXEROX-COMMON-LISP˜ŒCOMPILER˜“˜ŒUSE˜ŒLISP˜ŒXCL˜Œ{Null}˜–o ¿o˜Œ2 top-level forms™˜“€˜•Œ FILECREATED˜•ŒXCLC-OPTIMIZERSCOMS ˜“˜“˜•Œ*˜•Œ;;;˜ŒCompiler optimizers˜“˜•Œ DEFINE-TYPES˜’Œ OPTIMIZERS™ ˜“˜•Œ FUNCTIONS˜’ŒOPTIMIZER-LIST˜‘˜ŒCOMPILER˜“˜•ŒPROP˜•ŒPROPTYPE™&˜“™#˜’Œ DEFOPTIMIZER™ ˜“™˜•Œ;;˜Œ.Random optimizers defined within the compiler.˜“™!˜ŒCAAAAR˜ŒCAAADR˜ŒCAAAR˜ŒCAADAR˜ŒCAADDR˜ŒCAADR˜ŒCAAR˜ŒCADAAR˜ŒCADADR˜ŒCADAR˜ŒCADDAR˜ŒCADDDR˜ŒCADDR˜ŒCADR˜ŒCDAAAR˜ŒCDAADR˜ŒCDAAR˜ŒCDADAR˜ŒCDADDR˜ŒCDADR˜ŒCDAR˜ŒCDDAAR˜ŒCDDADR˜ŒCDDAR˜ŒCDDDAR˜ŒCDDDDR˜ŒCDDDR˜ŒCDDR˜“™!˜“˜•ŒARG˜Œ OPTIMIZED-BY˜’ŒCONVERT-ARG-TO-\ARG™%˜“˜•ŒSETARG™N˜’ŒCONVERT-SETARG-TO-\SETARG™%˜“™!˜ŒVALUES˜Œ VALUES-LIST˜“™!˜•ŒLOADTIMECONSTANT˜•ŒGETD˜•ŒFGETD˜•ŒEVQ˜“™!˜’ŒLOAD-TIME-VALUE™%˜“˜•Œ SPECIAL-FORMS™]˜“™!˜ŒEQ˜ŒEQL˜•ŒEQP˜ŒEQUAL˜•ŒEQUAL˜ŒEQUALP˜“™#˜’ŒOPTIMIZE-EQUALITY™%˜’Œ OPTIMIZE-EQL™%˜“™!˜“˜ŒMULTIPLE-VALUE-CALL™N˜’ŒSCREEN-MV-CALL™%˜“˜ŒNOT™N˜’Œ NOT-TO-IF™%˜“˜ŒNULL™N˜’Œ NULL-TO-IF™%˜“™!˜•Œ\CALLME˜“™™-˜Œ!Optimizers for File Manager forms˜“˜•Œ VARIABLES˜’Œ*INPUT-FILECOMS-VARIABLE*™%˜“™!˜•ŒRPAQ˜•ŒRPAQ?˜•ŒRPAQQ˜•ŒPRETTYCOMPRINT™˜“™™-˜ŒOther Otimization˜“™!˜•Œ \PILOTBITBLT˜“™™-˜Œ#Use the proper makefile-environment˜“™(˜•ŒMAKEFILE-ENVIRONMENT˜•ŒXCLC-OPTIMIZERS˜“™™-˜ŒUse the proper compiler.˜“™(˜•ŒFILETYPE™‚ˆ˜“˜Œ18-Oct-93 17:19:21˜Œ9{Pele:mv:envos}Sources>CLTL2>XCLC-OPTIMIZERS.;2‚I‰˜•Œprevious˜•Œdate:˜Œ 4-Feb-92 10:31:17˜Œ9{Pele:mv:envos}Sources>CLTL2>XCLC-OPTIMIZERS.;1˜–‚"ggo ¿oRgg c¿oSgg c¿o ¿g X¦h¿g` ³0g`gggl2gl2  ¿Q¸gQ‘H†gHc¿ggg ¿ggg ¿ggg ¿ggg ¿ggg ˜•Œ FILEPKGTYPES˜•ŒPRETTYDEFMACROS˜•Œ PRETTYTYPELST˜ŒDEF-DEFINE-TYPE OPTIMIZERS™˜“€ ‚˜•ŒPUTPROP‚™‚œ‚ò™‚œ‚Ý™‚œ‚È™‚œ‚˜ŒPUTHASH‚˜˜ŒMAKE-HASH-TABLEn˜•ŒGETHASHV˜ŒBOUNDPK˜ŒPROCLAIM>˜ŒADJOIN&™‚¢˜•ŒSET-DOCUMENTATION!‚˜•ŒNILL‚˜•ŒFILEPKGCONTENTS‚ ™!‚˜’Œ%DEFINE-TYPE-FILEGETDEF™ ‚ý˜•Œ FILEGETDEF‚ø™!‚혒Œ%DEFINE-TYPE-PUTDEF™ ‚蘕ŒPUTDEF‚ã™!‚ؘ’Œ%DEFINE-TYPE-DELDEF™ ‚Ó˜•ŒDELDEF‚Ι!‚Ø’Œ%DEFINE-TYPE-GETDEF™ ‚¾˜•ŒGETDEF‚¹™!‚¯™!‚¥™!‚˜Œ REHASH-SIZE‚‰˜ŒSIZE‚„™d˜ŒTESTz˜’Œ*DEFINITION-HASH-TABLE*™ u™!i™‚±d™!^˜’ŒCHANGEDOPTIMIZERSLST™ Q™‚²9™d4™‚°!™d™‚°™ ™!F˜“˜’ŒGLOBAL™ ™‚².˜“™‚²™!˜ŒCompiler optimizers˜“™!˜’ŒX™ ˜“˜•ŒP™˜“˜’Œ%DEFINE-TYPE-FILE-DEFINITIONS™ ˜“˜ŒQUOTE™!˜“™‚º™‚· ™‚µœ˜’Œexpand-OPTIMIZER-LIST™%˜–@X¹gIo™‚Á™˜“˜“˜Œ $$MACRO-FORM˜Œ$$MACRO-ENVIRONMENT˜ŒGET ˜“˜“™‚º™&˜–&gg ¿ggo ˜ŒDEFMACRO OPTIMIZER-LIST™˜“€ ™‚œ ˜•ŒSETF-MACRO-FUNCTION˜•ŒARGNAMES™&™‚Á™&˜“˜ŒFN˜– o ˜Œ1 top-level form™˜“€˜•ŒPUTPROPS˜“™&™)˜ŒIGNORE˜–Gggg ¿gggÁÉg'¸gH‘H†gH ˜ŒDEFDEFINER DEFOPTIMIZER™˜“€A™‚œ™‚œ :™+0™+)˜Œ DEFINED-BY ™!™‚Ù™! ™!˜Œ DEFINER-FOR™+œ˜’Œ definition-expander-DEFOPTIMIZER™ ˜–‚6@X¹HZ»J\½A¾M¢±ñK_¿K‘h€i_’O…K‘i€h²oIhI M_¿M½O_¿K_¿OgMINgggg __¿O__¿gogggOhhggoOgOOhh hhggOhggIhhhhgoggKhggIhhhh™‚Ü ™˜“˜“˜Œ $$MACRO-FORM˜Œ$$MACRO-ENVIRONMENT‚̘ŒAPPENDw˜•Œ\MVLISTr˜•ŒPARSE-DEFMACRO<˜’ŒPACK™ 7˜ŒSYMBOL-PACKAGE‚!™‚º‚™&‚™‚º‚˜ŒPUSHNEW‚˜Œ EVAL-WHEN‚º‚é™&‚ß™‚º‚Ú™‚悽˜ŒBLOCK‚±˜ŒLAMBDA‚¬˜ŒFUNCTION‚Ÿ™‚º‚š˜ŒSYMBOL-FUNCTION‚•˜ŒSETF‚‹™‚çl˜•Œ$$CTXg˜ŒCONTEXTb˜•Œ$$ENV]˜Œ ENVIRONMENTU˜•Œ$$WHOLE‚ ˜“˜ŒEVAL˜ŒCOMPILE˜ŒLOAD‚¶˜“™‚ñ™‚킘“™‚ò™‚ó™‚ô-˜Œ optimize-˜–ggg ™‚×™˜“€™‚œ ™‚ܘŒDEFINITION-EXPANDER™+œ˜’Œname-fn-DEFOPTIMIZER™ ˜–'@¸@Y‘h€iZ‘J…I‘i€h‘HHgIh™‚ý™˜“˜“˜ŒWHOLE™N˜–ggg ™‚×™˜“€™‚œ ™‚ý˜ŒDEFINITION-NAME™+œ˜’Œprototype-fn-DEFOPTIMIZER™ ˜–D@d3@ðg@o@¸@YºI»gJð²K‘i€hŸgHKohh™‚™˜“˜“˜ŒNAME0™+!™N™+7˜“˜“˜ŒArg list˜ŒBody ˜“˜“˜ŒArg list˜ŒBody˜–.ggg ¿oPgg c˜•ŒPRETTYPRINTMACROS™‚×™˜“€&™‚¢˜’ŒADD-PROTOTYPE-FN™ !™d™‚° ™‚™+™!˜”™+’ŒPPRINT-DEFINER™ œ˜’Œexpand-DEFOPTIMIZER™ ˜–ggg@Ah™‚™˜“˜“˜Œ $$MACRO-FORM˜Œ$$MACRO-ENVIRONMENT ™+™!˜’ŒDEFINER™ ˜–&gg ¿ggo ™‚×™˜“€ ™‚œ ™‚Ì™‚Í™+™‚™+˜“˜Œ&WHOLE˜ŒXCL::DEFINITION˜Œ &ENVIRONMENT˜ŒXCL::ENVœ˜Œoptimize-CAAAAR˜–(@X¹ggggIhhhh™‚%™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX˜ŒCAR™‚+ ™‚+™‚+˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER CAAAAR™˜“€,™‚œ%™‚%™‚%™& ™0™&™0œ˜Œoptimize-CAAADR˜–(@X¹ggggIhhhh™‚0™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX˜ŒCDR™‚+ ™‚+™‚+˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER CAAADR™˜“€,™‚œ%™‚0™‚0™& ™1™&™1œ˜Œoptimize-CAAAR˜– @X¹gggIhhh™‚;™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX™‚+ ™‚+™‚+˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER CAAAR™˜“€,™‚œ%™‚;™‚;™& ™2™&™2œ˜Œoptimize-CAADAR˜–(@X¹ggggIhhhh™‚E™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX™‚+™‚6 ™‚+™‚+˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER CAADAR™˜“€,™‚œ%™‚E™‚E™& ™3™&™3œ˜Œoptimize-CAADDR˜–(@X¹ggggIhhhh™‚O™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX™‚6™‚6 ™‚+™‚+˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER CAADDR™˜“€,™‚œ%™‚O™‚O™& ™4™&™4œ˜Œoptimize-CAADR˜– @X¹gggIhhh™‚Y™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX™‚6 ™‚+™‚+˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER CAADR™˜“€,™‚œ%™‚Y™‚Y™& ™5™&™5œ˜Œ optimize-CAAR˜–@X¹ggIhh™‚c™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX ™‚+™‚+˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER CAAR™˜“€,™‚œ%™‚c™‚c™& ™6™&™6œ˜Œoptimize-CADAAR˜–(@X¹ggggIhhhh™‚m™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX™‚+™‚+ ™‚6™‚+˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER CADAAR™˜“€,™‚œ%™‚m™‚m™& ™7™&™7œ˜Œoptimize-CADADR˜–(@X¹ggggIhhhh™‚w™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX™‚6™‚+ ™‚6™‚+˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER CADADR™˜“€,™‚œ%™‚w™‚w™& ™8™&™8œ˜Œoptimize-CADAR˜– @X¹gggIhhh™‚™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX™‚+ ™‚6™‚+˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER CADAR™˜“€,™‚œ%™‚™‚™& ™9™&™9œ˜Œoptimize-CADDAR˜–(@X¹ggggIhhhh™‚‹™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX™‚+™‚6 ™‚6™‚+˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER CADDAR™˜“€,™‚œ%™‚‹™‚‹™& ™:™&™:œ˜Œoptimize-CADDDR˜–(@X¹ggggIhhhh™‚•™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX™‚6™‚6 ™‚6™‚+˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER CADDDR™˜“€,™‚œ%™‚•™‚•™& ™;™&™;œ˜Œoptimize-CADDR˜– @X¹gggIhhh™‚Ÿ™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX™‚6 ™‚6™‚+˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER CADDR™˜“€,™‚œ%™‚Ÿ™‚Ÿ™& ™<™&™<œ˜Œ optimize-CADR˜–@X¹ggIhh™‚©™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX ™‚6™‚+˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER CADR™˜“€,™‚œ%™‚©™‚©™& ™=™&™=œ˜Œoptimize-CDAAAR˜–(@X¹ggggIhhhh™‚³™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX™‚+™‚+ ™‚+™‚6˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER CDAAAR™˜“€,™‚œ%™‚³™‚³™& ™>™&™>œ˜Œoptimize-CDAADR˜–(@X¹ggggIhhhh™‚½™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX™‚6™‚+ ™‚+™‚6˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER CDAADR™˜“€,™‚œ%™‚½™‚½™& ™?™&™?œ˜Œoptimize-CDAAR˜– @X¹gggIhhh™‚Ç™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX™‚+ ™‚+™‚6˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER CDAAR™˜“€,™‚œ%™‚Ç™‚Ç™& ™@™&™@œ˜Œoptimize-CDADAR˜–(@X¹ggggIhhhh™‚Ñ™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX™‚+™‚6 ™‚+™‚6˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER CDADAR™˜“€,™‚œ%™‚Ñ™‚Ñ™& ™A™&™Aœ˜Œoptimize-CDADDR˜–(@X¹ggggIhhhh™‚Û™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX™‚6™‚6 ™‚+™‚6˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER CDADDR™˜“€,™‚œ%™‚Û™‚Û™& ™B™&™Bœ˜Œoptimize-CDADR˜– @X¹gggIhhh™‚噘“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX™‚6 ™‚+™‚6˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER CDADR™˜“€,™‚œ%™‚噂å™& ™C™&™Cœ˜Œ optimize-CDAR˜–@X¹ggIhh™‚“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX ™‚+™‚6˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER CDAR™˜“€,™‚œ%™‚ï™& ™D™&™Dœ˜Œoptimize-CDDAAR˜–(@X¹ggggIhhhh™‚ù™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX™‚+™‚+ ™‚6™‚6˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER CDDAAR™˜“€,™‚œ%™‚ù™‚ù™& ™E™&™Eœ˜Œoptimize-CDDADR˜–(@X¹ggggIhhhh™‚™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX™‚6™‚+ ™‚6™‚6˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER CDDADR™˜“€,™‚œ%™‚™‚™& ™F™&™Fœ˜Œoptimize-CDDAR˜– @X¹gggIhhh™‚ ™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX™‚+ ™‚6™‚6˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER CDDAR™˜“€,™‚œ%™‚ ™‚ ™& ™G™&™Gœ˜Œoptimize-CDDDAR˜–(@X¹ggggIhhhh™‚™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX™‚+™‚6 ™‚6™‚6˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER CDDDAR™˜“€,™‚œ%™‚™‚™& ™H™&™Hœ˜Œoptimize-CDDDDR˜–(@X¹ggggIhhhh™‚!™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX™‚6™‚6 ™‚6™‚6˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER CDDDDR™˜“€,™‚œ%™‚!™‚!™& ™I™&™Iœ˜Œoptimize-CDDDR˜– @X¹gggIhhh™‚+™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX™‚6 ™‚6™‚6˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER CDDDR™˜“€,™‚œ%™‚+™‚+™& ™J™&™Jœ˜Œ optimize-CDDR˜–@X¹ggIhh™‚5™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX ™‚6™‚6˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER CDDR™˜“€,™‚œ%™‚5™‚5™& ™K™&™Kœ™O˜–'@X¹HºS²ggIhJhg˜’Œ*NEW-COMPILER-IS-EXPANDING*™%™O™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX!˜’ŒPASS™%™‚º ˜•Œ\ARG˜–2gggÁÉg'¸gH‘H†gH ˜Œ8DEFOPTIMIZER (IL:ARG :OPTIMIZED-BY CONVERT-ARG-TO-\\ARG)™˜“€,™‚œ%™O™O™& ™M™&™Mœ™R˜–.@X¹HZ»J¼U²ggIhKLhg™‚?™R™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX(™‚E™‚º˜•Œ\SETARG˜–2gggÁÉg'¸gH‘H†gH ˜ŒADEFOPTIMIZER (IL:SETARG :OPTIMIZED-BY CONVERT-SETARG-TO-\\SETARG)™˜“€,™‚œ%™R™R™& ™Q™&™Qœ˜Œoptimize-VALUES˜–Z@X¹H–H‘h‚i€hšoHhS²0BÉZjð—gIJkð—gIggIggH™‚?™‚U™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTXQ™UL˜•ŒMISCNC™U>™‚[6˜ŒPROG1*˜ŒPROGN˜’ŒCONTEXT™%˜“˜•ŒOPCODES˜•ŒNOP˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER VALUES™˜“€,™‚œ%™‚U™‚U™& ™U™&™Uœ˜Œoptimize-VALUES-LIST˜–E@X¹S².BÉZjð‘IJkð™gIhggIhggIh™‚?™‚f™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX:™V5™‚[*™V%™‚[™‚+ ™‚^˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER VALUES-LIST™˜“€,™‚œ%™‚f™‚f™& ™V™&™Vœ˜•Œoptimize-LOADTIMECONSTANT˜– @X¹R›gI gSIh™‚?˜•ŒLOADTIMECONSTANTMARKER™‚p™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX˜’ŒMAKE-EVAL-WHEN-LOAD™%™‚º˜ŒFORM˜–2gggÁÉg'¸gH‘H†gH ˜Œ DEFOPTIMIZER IL:LOADTIMECONSTANT™˜“€,™‚œ%™‚p™‚p™& ™X™&™Xœ˜•Œ optimize-GETD˜–@X¹BÉ™gIhg™‚}™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX™‚E˜•Œ \DEFINEDP™‚^˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER IL:GETD™˜“€,™‚œ%™‚}™‚}™& ™Y™&™Yœ˜•Œoptimize-FGETD˜–@X¹gIh™‚ˆ™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX™Y˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER IL:FGETD™˜“€,™‚œ%™‚ˆ™‚ˆ™& ™Z™&™Zœ˜•Œ optimize-EVQ˜–@XY™‚’™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER IL:EVQ™˜“€,™‚œ%™‚’™‚’™& ™[™&™[œ˜’Œoptimize-LOAD-TIME-VALUE™%˜– @X¹R›gI gSIh™‚?™‚q™‚œ™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX™‚w™‚º™‚x˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER LOAD-TIME-VALUE™˜“€,™‚œ%™‚œ™‚œ™& ™]™&™]œ˜’Œinterpret-LOAD-TIME-VALUE™%˜– @Xh ™‚¦™˜“˜“˜Œ$$TAIL˜Œ$$ENV™‚ò˜–ggg ˜Œ#DEFINE-SPECIAL-FORM LOAD-TIME-VALUE™˜“€™‚œ ™‚¦˜•Œ SPECIAL-FORM™]œ˜Œ optimize-EQ˜–L@X¹HºI šI ‘h‚i€h™gJhJ šJ ‘h‚i€h™gIhg™‚°™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX0™‚ò)˜Œ CONSTANTP™‚ò ™‚¶F™‚E<™q™q˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER EQ™˜“€,™‚œ%™‚°™‚°™& ™a™&™aœ˜Œ optimize-EQL˜–@ ™‚»™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX™i˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER EQL™˜“€,™‚œ%™‚»™‚»™& ™b™&™bœ˜•Œ optimize-EQP˜–@ ™‚Å™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX™h˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER IL:EQP™˜“€,™‚œ%™‚Å™‚Å™& ™c™&™cœ˜Œoptimize-EQUAL˜–@ ™‚Ï™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX™h˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER EQUAL™˜“€,™‚œ%™‚Ï™‚Ï™& ™d™&™dœ˜•Œoptimize-EQUAL˜–@ ™‚Ù™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX™h˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER IL:EQUAL™˜“€,™‚œ%™‚Ù™‚Ù™& ™e™&™eœ˜Œoptimize-EQUALP˜–@ ™‚㙘“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX™h˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER EQUALP™˜“€,™‚œ%™‚㙂ã™& ™f™&™fœ™h˜–l@X¹HºI šI d3@ð€h²gJgI hhJ šJ d3@ð€h²gIgJ hhg™h™˜“˜“˜ŒFORMY™‚ò@™‚ò9™‚¶+™‚ò™‚ò ™‚¶f™‚ES™‚ºM™a%™‚º™aœ™i˜–x@X¹Hºh»h¼I ²I [d3@ð]‘M„K€h²ggKhJhJ ²J \d3@ð]‘M„L€h²gIgLhhg™i™˜“˜“˜ŒFORMI™‚òA™‚¶™‚ò™‚¶r™‚Ed™‚º^™a1™‚º,™aœ™l˜–c@X¹HºIoÌ–J‘h‚i€h—gJgIgJ»h¼h½h¾K¢L°%K__¿gOh¾L”MN&½„Nh]¼K»°Úh™l™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTXA˜ŒMULTIPLE-VALUE-LIST(˜ŒNCONC"˜•ŒAPPLY™‚â ˜“˜•ŒFUNCTION˜ŒLIST˜–2gggÁÉg'¸gH‘H†gH ˜Œ?DEFOPTIMIZER (MULTIPLE-VALUE-CALL :OPTIMIZED-BY SCREEN-MV-CALL)™˜“€,™‚œ%™l™l™& ™k™&™kœ™o˜–@X¹RgIog™‚?™o™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX™‚E˜ŒIF˜“€˜–2gggÁÉg'¸gH‘H†gH ˜Œ*DEFOPTIMIZER (NOT :OPTIMIZED-BY NOT-TO-IF)™˜“€,™‚œ%™o™o™& ™n™&™nœ™r˜–@X¹RgIog™‚?™r™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX™‚E™‚ ˜“€˜–2gggÁÉg'¸gH‘H†gH ˜Œ,DEFOPTIMIZER (NULL :OPTIMIZED-BY NULL-TO-IF)™˜“€,™‚œ%™r™r™& ™q™&™qœ˜•Œoptimize-\CALLME˜–‚‚@X¹BÉjð²LI ’h°I‘h€iZ‘J‹Igð‘h€i²$og ¿ggIhhgog ¿ggIho™‚™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTXf˜ŒWARN>™‚™‚¶ q™ul™‚]a™uV™‚EI™‚ºD™u9™u(™‚º™‚^z˜“€\˜Œ3The ~S special form appeared in non-effect context.4˜Œ3The ~S special form was given an unquoted argument.˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER IL:\\CALLME™˜“€,™‚œ%™‚™‚™& ™u™&™u˜– o ˜Œ DEFVAR *INPUT-FILECOMS-VARIABLE*™˜“€™‚¡˜“˜ŒSPECIAL™zœ˜•Œ optimize-RPAQ˜–A@X¹HZ»Bɲ(gggIhhgIKhhg™‚,™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX;™‚E+˜ŒSETQ™‚³˜ŒDECLARE˜ŒLOCALLY ™‚^˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER IL:RPAQ™˜“€,™‚œ%™‚,™‚,™& ™|™&™|œ˜•Œoptimize-RPAQ?˜–W@X¹HZ»Bɲ>gggIhhggIogIKhhhg™‚9™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTXQ™‚E=™‚20™a+˜ŒAND™‚³™‚3™‚4 ™‚^6˜“˜“™‚º˜•ŒNOBIND˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER IL:RPAQ?™˜“€,™‚œ%™‚9™‚9™& ™}™&™}œ˜•Œoptimize-RPAQQ˜–I@X¹HZ»Bɲ0gggIhhgIgKhhhg™‚G™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTXC™‚E1™‚º+™‚2™‚³™‚3™‚4 ™‚^˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER IL:RPAQQ™˜“€,™‚œ%™‚G™‚G™& ™~™&™~œ˜•Œoptimize-PRETTYCOMPRINT˜–BÉ‘hg™‚Q™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX ™‚E™‚^˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER IL:PRETTYCOMPRINT™˜“€,™‚œ%™‚Q™‚Q™& ™™&™œ˜•Œoptimize-FILECREATED˜–R@X¹HZ»BÉ™K•Kd3@ð‚h€h²-ggK hogIKhhhg™‚[™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX,˜•Œ ROOTFILENAMEL™‚E9™‚º&™‚º!™‚œ ™‚^4˜“™‚º˜•Œ FILEDATES˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER IL:FILECREATED™˜“€,™‚œ%™‚[™‚[™& ™™&™œ˜•Œoptimize-\PILOTBITBLT˜–'@X–H‘h‚i€h²gHo g™‚h™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX™‚á!™‚E™‚ƒ˜“€˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER IL:\\PILOTBITBLT™˜“€,™‚œ%™‚h™‚h™& ™‚ƒ™&™‚ƒ˜–"o ¿o ¿o ˜Œ3 top-level forms™˜“€™‚Ó™‚Ó™‚Ó˜“™‚ˆ˜•Œ COPYRIGHT˜“ ˜ŒVenue & Xerox Corporation‚‚ÂÄ‚Å‚Æ‚Ç‚È‚É ˜“™‚ˆ™‚Œ˜Œ COMPILE-FILE˜“™‚ˆ™‚‡˜“™ ˜ŒXCL™ ˜“™˜ŒCOMPILER˜“™˜ŒLISP˜ŒXCLš‚„ÿÿ