‘XCL Compiler output for source file {DSK}disk2>jdstools>lc3>lispcore3.0>sources>XCLC-OPTIMIZERS.;1 Source file created Sunday, 3 June 1990, 22:30:55. FASL file created Monday, 26 January 1998, 14:00:16. ÿ˜–#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}˜–!ggo ¿o˜Œ2 top-level forms™˜“€˜•ŒPUTPROP˜•ŒXCLC-OPTIMIZERSCOMS˜•Œ FILEDATES˜•ŒXCLC-OPTIMIZERS˜“˜“˜•Œ*˜•Œ;;;˜Œ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™P˜’ŒCONVERT-SETARG-TO-\SETARG™'˜“™#˜ŒVALUES˜Œ VALUES-LIST˜“™#˜•ŒLOADTIMECONSTANT˜•ŒGETD˜•ŒFGETD˜•ŒEVQ˜“™#˜ŒEQ˜ŒEQL˜•ŒEQP˜ŒEQUAL˜•ŒEQUAL˜ŒEQUALP˜“™%˜’ŒOPTIMIZE-EQUALITY™'˜’Œ OPTIMIZE-EQL™'˜“™#˜“˜ŒMULTIPLE-VALUE-CALL™P˜’ŒSCREEN-MV-CALL™'˜“˜ŒNOT™P˜’Œ NOT-TO-IF™'˜“˜ŒNULL™P˜’Œ NULL-TO-IF™'˜“™#˜•Œ\CALLME˜“™™/˜Œ!Optimizers for File Manager forms˜“˜•Œ VARIABLES˜’Œ*INPUT-FILECOMS-VARIABLE*™'˜“™#˜•ŒRPAQ˜•ŒRPAQ?˜•ŒRPAQQ˜•ŒPRETTYCOMPRINT˜•Œ FILECREATED˜“™™/˜ŒOther Otimization˜“™#˜•Œ \PILOTBITBLT˜“™™/˜Œ#Use the proper makefile-environment˜“™*˜•ŒMAKEFILE-ENVIRONMENT™˜“™™/˜ŒUse the proper compiler.˜“™*˜•ŒFILETYPE™ ˜“˜”˜Œ 4-Jun-90 14:31:10•Œ3{PELE:MV:ENVOS}SOURCES>XCLC-OPTIMIZERS.;3˜–‚"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™˜“€ ‚™‚™‚ò™‚Ý™‚È™‚˜Œ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‚„™b˜ŒTESTz˜’Œ*DEFINITION-HASH-TABLE*™ u™#i™‚ªd™#^˜’ŒCHANGEDOPTIMIZERSLST™ Q™‚«9™b4™‚©!™b™‚©™"™#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™P˜–ggg ™‚Й˜“€™ ™‚ö˜ŒDEFINITION-NAME™-œ˜’Œprototype-fn-DEFOPTIMIZER™ ˜–D@d3@ðg@o@¸@YºI»gJð²K‘i€hŸgHKohh™‚þ™˜“˜“˜ŒNAME0™-!™P™-7˜“˜“˜ŒArg list˜ŒBody ˜“˜“˜ŒArg list˜ŒBody˜–.ggg ¿oPgg c˜•ŒPRETTYPRINTMACROS™‚Й˜“€&™‚›˜’ŒADD-PROTOTYPE-FN™ !™b™‚© ™‚þ™-™#˜”™-’Œ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™˜“€,™%™‚™‚™( ™2™(™2œ˜Œoptimize-CAAADR˜–(@X¹ggggIhhhh™‚)™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX˜ŒCDR™‚$ ™‚$™‚$˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER CAAADR™˜“€,™%™‚)™‚)™( ™3™(™3œ˜Œoptimize-CAAAR˜– @X¹gggIhhh™‚4™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX™‚$ ™‚$™‚$˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER CAAAR™˜“€,™%™‚4™‚4™( ™4™(™4œ˜Œoptimize-CAADAR˜–(@X¹ggggIhhhh™‚>™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX™‚$™‚/ ™‚$™‚$˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER CAADAR™˜“€,™%™‚>™‚>™( ™5™(™5œ˜Œoptimize-CAADDR˜–(@X¹ggggIhhhh™‚H™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX™‚/™‚/ ™‚$™‚$˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER CAADDR™˜“€,™%™‚H™‚H™( ™6™(™6œ˜Œoptimize-CAADR˜– @X¹gggIhhh™‚R™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX™‚/ ™‚$™‚$˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER CAADR™˜“€,™%™‚R™‚R™( ™7™(™7œ˜Œ optimize-CAAR˜–@X¹ggIhh™‚\™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX ™‚$™‚$˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER CAAR™˜“€,™%™‚\™‚\™( ™8™(™8œ˜Œoptimize-CADAAR˜–(@X¹ggggIhhhh™‚f™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX™‚$™‚$ ™‚/™‚$˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER CADAAR™˜“€,™%™‚f™‚f™( ™9™(™9œ˜Œoptimize-CADADR˜–(@X¹ggggIhhhh™‚p™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX™‚/™‚$ ™‚/™‚$˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER CADADR™˜“€,™%™‚p™‚p™( ™:™(™:œ˜Œoptimize-CADAR˜– @X¹gggIhhh™‚z™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX™‚$ ™‚/™‚$˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER CADAR™˜“€,™%™‚z™‚z™( ™;™(™;œ˜Œoptimize-CADDAR˜–(@X¹ggggIhhhh™‚„™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX™‚$™‚/ ™‚/™‚$˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER CADDAR™˜“€,™%™‚„™‚„™( ™<™(™<œ˜Œoptimize-CADDDR˜–(@X¹ggggIhhhh™‚Ž™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX™‚/™‚/ ™‚/™‚$˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER CADDDR™˜“€,™%™‚Ž™‚Ž™( ™=™(™=œ˜Œoptimize-CADDR˜– @X¹gggIhhh™‚˜™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX™‚/ ™‚/™‚$˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER CADDR™˜“€,™%™‚˜™‚˜™( ™>™(™>œ˜Œ optimize-CADR˜–@X¹ggIhh™‚¢™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX ™‚/™‚$˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER CADR™˜“€,™%™‚¢™‚¢™( ™?™(™?œ˜Œoptimize-CDAAAR˜–(@X¹ggggIhhhh™‚¬™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX™‚$™‚$ ™‚$™‚/˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER CDAAAR™˜“€,™%™‚¬™‚¬™( ™@™(™@œ˜Œoptimize-CDAADR˜–(@X¹ggggIhhhh™‚¶™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX™‚/™‚$ ™‚$™‚/˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER CDAADR™˜“€,™%™‚¶™‚¶™( ™A™(™Aœ˜Œoptimize-CDAAR˜– @X¹gggIhhh™‚À™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX™‚$ ™‚$™‚/˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER CDAAR™˜“€,™%™‚À™‚À™( ™B™(™Bœ˜Œoptimize-CDADAR˜–(@X¹ggggIhhhh™‚Ê™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX™‚$™‚/ ™‚$™‚/˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER CDADAR™˜“€,™%™‚Ê™‚Ê™( ™C™(™Cœ˜Œoptimize-CDADDR˜–(@X¹ggggIhhhh™‚Ô™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX™‚/™‚/ ™‚$™‚/˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER CDADDR™˜“€,™%™‚Ô™‚Ô™( ™D™(™Dœ˜Œoptimize-CDADR˜– @X¹gggIhhh™‚Þ™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX™‚/ ™‚$™‚/˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER CDADR™˜“€,™%™‚Þ™‚Þ™( ™E™(™Eœ˜Œ optimize-CDAR˜–@X¹ggIhh™‚虘“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX ™‚$™‚/˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER CDAR™˜“€,™%™‚虂è™( ™F™(™Fœ˜Œoptimize-CDDAAR˜–(@X¹ggggIhhhh™‚ò™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX™‚$™‚$ ™‚/™‚/˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER CDDAAR™˜“€,™%™‚ò™‚ò™( ™G™(™Gœ˜Œoptimize-CDDADR˜–(@X¹ggggIhhhh™‚ü™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX™‚/™‚$ ™‚/™‚/˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER CDDADR™˜“€,™%™‚ü™‚ü™( ™H™(™Hœ˜Œoptimize-CDDAR˜– @X¹gggIhhh™‚™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX™‚$ ™‚/™‚/˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER CDDAR™˜“€,™%™‚™‚™( ™I™(™Iœ˜Œoptimize-CDDDAR˜–(@X¹ggggIhhhh™‚™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX™‚$™‚/ ™‚/™‚/˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER CDDDAR™˜“€,™%™‚™‚™( ™J™(™Jœ˜Œoptimize-CDDDDR˜–(@X¹ggggIhhhh™‚™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX™‚/™‚/ ™‚/™‚/˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER CDDDDR™˜“€,™%™‚™‚™( ™K™(™Kœ˜Œoptimize-CDDDR˜– @X¹gggIhhh™‚$™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX™‚/ ™‚/™‚/˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER CDDDR™˜“€,™%™‚$™‚$™( ™L™(™Lœ˜Œ optimize-CDDR˜–@X¹ggIhh™‚.™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX ™‚/™‚/˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER CDDR™˜“€,™%™‚.™‚.™( ™M™(™Mœ™Q˜–'@X¹HºS²ggIhJhg˜’Œ*NEW-COMPILER-IS-EXPANDING*™'™Q™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX!˜’ŒPASS™'™‚³ ˜•Œ\ARG˜–2gggÁÉg'¸gH‘H†gH ˜Œ8DEFOPTIMIZER (IL:ARG :OPTIMIZED-BY CONVERT-ARG-TO-\\ARG)™˜“€,™%™Q™Q™( ™O™(™Oœ™T˜–.@X¹HZ»J¼U²ggIhKLhg™‚8™T™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX(™‚>™‚³˜•Œ\SETARG˜–2gggÁÉg'¸gH‘H†gH ˜ŒADEFOPTIMIZER (IL:SETARG :OPTIMIZED-BY CONVERT-SETARG-TO-\\SETARG)™˜“€,™%™T™T™( ™S™(™Sœ˜Œoptimize-VALUES˜–Z@X¹H–H‘h‚i€hšoHhS²0BÉZjð—gIJkð—gIggIggH™‚8™‚N™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTXQ™WL˜•ŒMISCNC™W>™‚T6˜ŒPROG1*˜ŒPROGN˜’ŒCONTEXT™'˜“˜•ŒOPCODES˜•ŒNOP˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER VALUES™˜“€,™%™‚N™‚N™( ™W™(™Wœ˜Œoptimize-VALUES-LIST˜–E@X¹S².BÉZjð‘IJkð™gIhggIhggIh™‚8™‚_™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX:™X5™‚T*™X%™‚T™‚$ ™‚W˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER VALUES-LIST™˜“€,™%™‚_™‚_™( ™X™(™Xœ˜•Œoptimize-LOADTIMECONSTANT˜– @X¹R›gI gSIh™‚8˜•ŒLOADTIMECONSTANTMARKER™‚i™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX˜’ŒMAKE-EVAL-WHEN-LOAD™'™‚³˜ŒFORM˜–2gggÁÉg'¸gH‘H†gH ˜Œ DEFOPTIMIZER IL:LOADTIMECONSTANT™˜“€,™%™‚i™‚i™( ™Z™(™Zœ˜•Œ optimize-GETD˜–@X¹BÉ™gIhg™‚v™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX™‚>˜•Œ \DEFINEDP™‚W˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER IL:GETD™˜“€,™%™‚v™‚v™( ™[™(™[œ˜•Œoptimize-FGETD˜–@X¹gIh™‚™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX™[˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER IL:FGETD™˜“€,™%™‚™‚™( ™\™(™\œ˜•Œ optimize-EVQ˜–@XY™‚‹™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER IL:EVQ™˜“€,™%™‚‹™‚‹™( ™]™(™]œ˜Œ optimize-EQ˜–L@X¹HºI šI ‘h‚i€h™gJhJ šJ ‘h‚i€h™gIhg™‚•™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX0™‚ë)˜Œ CONSTANTP™‚ë ™‚›F™‚><™o™o˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER EQ™˜“€,™%™‚•™‚•™( ™_™(™_œ˜Œ optimize-EQL˜–@ ™‚ ™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX™g˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER EQL™˜“€,™%™‚ ™‚ ™( ™`™(™`œ˜•Œ optimize-EQP˜–@ ™‚ª™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX™f˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER IL:EQP™˜“€,™%™‚ª™‚ª™( ™a™(™aœ˜Œoptimize-EQUAL˜–@ ™‚´™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX™f˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER EQUAL™˜“€,™%™‚´™‚´™( ™b™(™bœ˜•Œoptimize-EQUAL˜–@ ™‚¾™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX™f˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER IL:EQUAL™˜“€,™%™‚¾™‚¾™( ™c™(™cœ˜Œoptimize-EQUALP˜–@ ™‚È™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX™f˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER EQUALP™˜“€,™%™‚È™‚È™( ™d™(™dœ™f˜–l@X¹HºI šI d3@ð€h²gJgI hhJ šJ d3@ð€h²gIgJ hhg™f™˜“˜“˜ŒFORMY™‚ë@™‚ë9™‚›+™‚ë™‚ë ™‚›f™‚>S™‚³M™_%™‚³™_œ™g˜–x@X¹Hºh»h¼I ²I [d3@ð]‘M„K€h²ggKhJhJ ²J \d3@ð]‘M„L€h²gIgLhhg™g™˜“˜“˜ŒFORMI™‚ëA™‚›™‚뙂›r™‚>d™‚³^™_1™‚³,™_œ™j˜–a@X¹HºIoÌ–J‘h‚i€h—gJgIgJ»h¼h½h¾K¢L°#K_¿gOh¾L”MN&½„Nh]¼K»°Üh™j™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX?˜ŒMULTIPLE-VALUE-LIST(˜ŒNCONC"˜•ŒAPPLY™‚Û ˜“˜•ŒFUNCTION˜ŒLIST˜–2gggÁÉg'¸gH‘H†gH ˜Œ?DEFOPTIMIZER (MULTIPLE-VALUE-CALL :OPTIMIZED-BY SCREEN-MV-CALL)™˜“€,™%™j™j™( ™i™(™iœ™m˜–@X¹RgIog™‚8™m™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX™‚>˜ŒIF˜“€˜–2gggÁÉg'¸gH‘H†gH ˜Œ*DEFOPTIMIZER (NOT :OPTIMIZED-BY NOT-TO-IF)™˜“€,™%™m™m™( ™l™(™lœ™p˜–@X¹RgIog™‚8™p™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX™‚>™‚€˜–2gggÁÉg'¸gH‘H†gH ˜Œ,DEFOPTIMIZER (NULL :OPTIMIZED-BY NULL-TO-IF)™˜“€,™%™p™p™( ™o™(™oœ˜•Œoptimize-\CALLME˜–‚‚@X¹BÉjð²LI ’h°I‘h€iZ‘J‹Igð‘h€i²$og ¿ggIhhgog ¿ggIho™‚þ™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTXf˜ŒWARN>™‚™‚› q™sl™‚Va™sV™‚>I™‚³D™s9™s(™‚³™‚Wz˜“€\˜Œ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™˜“€,™%™‚þ™‚þ™( ™s™(™s˜– o ˜Œ DEFVAR *INPUT-FILECOMS-VARIABLE*™˜“€™‚š˜“˜ŒSPECIAL™xœ˜•Œ optimize-RPAQ˜–A@X¹HZ»Bɲ(gggIhhgIKhhg™‚™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX;™‚>+˜ŒSETQ™‚¬˜ŒDECLARE˜ŒLOCALLY ™‚W˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER IL:RPAQ™˜“€,™%™‚™‚™( ™z™(™zœ˜•Œoptimize-RPAQ?˜–W@X¹HZ»Bɲ>gggIhhggIogIKhhhg™‚™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTXQ™‚>=™‚0™_+˜ŒAND™‚¬™‚™‚ ™‚W6˜“˜“™‚³˜•ŒNOBIND˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER IL:RPAQ?™˜“€,™%™‚™‚™( ™{™(™{œ˜•Œoptimize-RPAQQ˜–I@X¹HZ»Bɲ0gggIhhgIgKhhhg™‚,™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTXC™‚>1™‚³+™‚™‚¬™‚™‚ ™‚W˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER IL:RPAQQ™˜“€,™%™‚,™‚,™( ™|™(™|œ˜•Œoptimize-PRETTYCOMPRINT˜–BÉ‘hg™‚6™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX ™‚>™‚W˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER IL:PRETTYCOMPRINT™˜“€,™%™‚6™‚6™( ™}™(™}œ˜•Œoptimize-FILECREATED˜–R@X¹HZ»BÉ™K•Kd3@ð‚h€h²-ggK hogIKhhhg™‚@™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX,˜•Œ ROOTFILENAMEL™‚>9™‚³&™‚³!™ ™‚W4˜“™‚³™˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER IL:FILECREATED™˜“€,™%™‚@™‚@™( ™~™(™~œ˜•Œoptimize-\PILOTBITBLT˜–'@X–H‘h‚i€h²gHo g™‚L™˜“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX™‚Ú!™‚>™‚‚˜“€˜–2gggÁÉg'¸gH‘H†gH ˜ŒDEFOPTIMIZER IL:\\PILOTBITBLT™˜“€,™%™‚L™‚L™( ™‚‚™(™‚‚˜–"o ¿o ¿o ˜Œ3 top-level forms™˜“€™‚Ì™‚Ì™‚̘“™˜•Œ COPYRIGHT˜“˜ŒVenue & Xerox Corporation‚‚ÂÄ‚Å‚Æ ˜“™™‚Š˜Œ COMPILE-FILE˜“™™‚†˜“™ ˜ŒXCL™ ˜“™˜ŒCOMPILER˜“™˜ŒLISP˜ŒXCLš‚hÿÿ