‘XCL Compiler output for source file {DSK}arunwelch>SKYDRIVE>DOCUMENTS>UNIX>LISP>LDE>ROOMS>MEDLEY-35>ROOMS-WINDOW-HIDER.;2 Source file created Saturday, 5 December 2020, 16:26:33. FASL file created Saturday, 5 December 2020, 16:26:33. ÿ˜–#ogg o ˜•ŒFILECREATEDLOC˜Œ*STANDARD-INPUT*˜Œ1 top-level form˜ŒFUNCTION˜“€˜•ŒDEFINE-FILE-INFO˜ŒOPEN ˜ŒOUTPUT˜Œ DIRECTION˜“˜Œ READTABLE˜ŒXCL˜ŒPACKAGE˜ŒROOMS˜Œ{Null}˜–!ggo ¿o˜Œ2 top-level forms™˜“€˜•ŒPUTPROP˜•ŒROOMS-WINDOW-HIDERCOMS˜•Œ FILEDATES˜•ŒROOMS-WINDOW-HIDER˜“ ˜“˜’ŒFILE-ENVIRONMENTS˜‘˜ŒXEROX-COMMON-LISP™˜“˜•ŒP˜“˜ŒEXPORT˜“˜ŒQUOTE˜“˜’Œ HIDE-WINDOW˜‘˜ŒROOMS˜’ŒUN-HIDE-WINDOW™˜’ŒWINDOW-HIDDEN?™˜’Œ ALL-WINDOWS™˜’Œ LOST-WINDOWS™˜“˜ŒREQUIRE˜ŒROOMS˜“˜•ŒDECLARE:˜•Œ EVAL@COMPILE˜•ŒDONTCOPY˜“˜•ŒFILES˜“˜•ŒLOADCOMP˜•ŒWINDOW˜•ŒFILEIO˜•Œ LLDISPLAY˜•ŒTTYIN˜“˜•Œ VARIABLES˜’Œ*HIDDEN-WINDOWS*™˜“˜•Œ FUNCTIONS™"™#˜“ ™:˜’ŒHIDE-ALL-WINDOWS™™˜’ŒHIDE-WINDOW-INTERNAL™™ ˜’ŒUN-HIDE-WINDOW-INTERNAL™˜’ŒDO-TOTOP-FUNCTIONS™™!˜’Œ%WINDOW-HIDDEN?™˜“ ˜•ŒFNS˜’ŒSHAPEW1™˜’Œ\CLOSEW1™˜’ŒMOVEW™˜’Œ\INTERNALTOTOPW™˜’Œ WFROMMENU™˜’Œ RESHOWTITLE™˜’Œ\RESHOWBORDER1™˜’Œ TTYIN.SETUP™˜“˜•Œ GLOBALVARS˜•Œ LAMBDASPLST˜•Œ\EM.DISPINTERRUPT˜•Œ\SCREENBITMAPS˜•Œ\TTYIN.LAST.FONT˜•Œ\TTYIN.LAST.COMMENTFONT˜“˜Œ EVAL-WHEN˜“˜ŒLOAD˜“ ™˜“˜•ŒMOVD˜“™™C˜“™˜•ŒSHAPEW1˜“™V˜“™™D˜“™˜•Œ\CLOSEW1˜“™V˜“™™E˜“™˜•ŒMOVEW˜“™V˜“™™F˜“™˜•Œ\INTERNALTOTOPW˜“™V˜“™™G˜“™˜•Œ WFROMMENU˜“™V˜“™™H˜“™˜•Œ RESHOWTITLE˜“™V˜“™™I˜“™˜•Œ\RESHOWBORDER1˜“™V˜“™™J˜“™˜•Œ TTYIN.SETUP˜“˜•ŒADVISE˜•Œ ATTACHWINDOW ˜“˜”˜Œ 5-Dec-2020 16:26:33•Œ\{DSK}arunwelch>SKYDRIVE>DOCUMENTS>UNIX>LISP>LDE>ROOMS>MEDLEY-35>ROOMS-WINDOW-HIDER.;2˜–+ggo ¿ggg ˜Œ-DEFINE-FILE-ENVIRONMENT IL:ROOMS-WINDOW-HIDER™˜“€%™™ ˜Œ COMPILE-FILE˜•ŒFILETYPE™˜•ŒMAKEFILE-ENVIRONMENT™ ˜“™ ˜ŒXCL™ ˜ŒROOMS˜– o ˜Œ1 top-level form™˜“€™˜“™™ ™!™"™#˜– o ˜Œ1 top-level form™˜“€™'˜ŒROOMS˜–/o ¿g X‘Hgg ˜ŒDEFGLOBALVAR *HIDDEN-WINDOWS*™˜“€$˜ŒMAKE-HASH-TABLE˜ŒBOUNDP˜ŒPROCLAIM)™8˜ŒEQ˜ŒTEST ™8˜“˜’ŒGLOBAL™™8œ™"˜–tnX¿hHý¿i ¹hºI‘I‡hZ[‘K°4Z»Jg \‘L†Ki [HÉ“HÉ„KHÉHý¿I¹°Ä@²noH` ¿HÉ™"™˜“˜“˜Œ &OPTIONAL˜ŒINCLUDE-HIDDEN?j˜ŒMAPHASH6˜•Œ MAINWINDOW+˜•ŒGETWINDOWUSERPROP˜•Œ OPENWINDOWSe™8&˜•ŒICONFOR[˜–/@¹@g Z‘J†Ii YHÉ“HÉ„IHÉdHý¿˜Œlambda in ALL-WINDOWS˜ŒCLOSURE˜“˜“˜ŒWINDOW˜ŒTRUE™‚¡ ™‚¢™‚¤W˜•ŒCOMPILED-CLOSURE˜•Œ \PTRHUNK2œ™#˜–5¿h¸h¹i ºh»J‘J°[ «H”IK&¹„KhY¸Jº°ãH™#™˜“€˜’ŒFIND-ROOMS-CONTAINING™ ™"˜’ŒUPDATE-PLACEMENTS™œ™<˜–! ¸h¹H‘HhY ¿H¸°ï™<™˜“€™˜ŒNREVERSE™"œ™˜–?@¸@g Y‘I†Hi X ‘hHg Y–I ¿H ¿i™™˜“˜“˜ŒWINDOW7™=0™=(™‚¢™!™‚¡ ™‚¢#˜•Œ ICONWINDOW™‚¤œ™=˜–‚†@ ‘h@g ¸h¹H‘H€ŒY ¿H¸°ð@ –@ ¿@ɹ@É,¸hI º@ÉI ¿HJÕI ¿HJÕI ¿@h¿@`i ¿i˜•Œ\INTERRUPTABLE™=™˜“˜“˜ŒWINDOW ~˜ŒPUTHASHk˜•Œ DSPYOFFSET_˜•Œ DSPXOFFSETT˜•ŒDSPDESTINATIONG˜•ŒDSPCLIPPINGREGION2™\+˜•ŒOPENWP™=™‚¢™!x™89™1 ˜•ŒATTACHEDWINDOWSœ™ ˜–D@¸@g Y‘I†Hi Xg ¹H ºI›IJ‘h€i ¿HJ ¿i™ ™˜“˜“˜ŒWINDOW<™>4™>&˜’Œ SHRUNKEN?™™‚¢™‚¡ ™‚¢™‚¹™‚¤œ™>˜–‚Ÿ@ ²W@ɹ@ɺ@É,»hI ¼@É2ÉI ¿JKÔLÕI ¿JKÔLÕI ¿@g¿A¦@ ¿@` ¿@g ¹hºI‘I€ZA ¿I¹°ïA‘h@ ™‚»™>™˜“˜“˜ŒWINDOW™‚œ˜ŒNO-OPEN ‚™™?‚‰™>y™‚¢m˜ŒREMHASHa˜•Œ\OPENW1N™‚À>™‚Á0™‚™‚Ù!t™‚Åh™8U˜•ŒCLOSED(˜•ŒSCREEN ™1œ™?˜–[@g X²BgHðY‘IH›gH‘i‚h€hY’I°gHðZ‘JH›gH‘i‚h€h‘h‚i€h—H@ h™?™˜“˜“˜ŒWINDOWS˜•Œ DOUSERFNS™‚¢=˜•ŒATTACHEDWINDOWTOTOPFN/™‚Ù˜•ŒTOPATTACHEDWINDOWS™‚Ú˜•ŒTOTOPFNœ™!˜–@¸@ÉÉ0ÉHÉð™!™˜“˜“˜ŒWINDOW˜•Œ \DISPLAYDATA ˜ŒSTREAM™1œ™@˜–@ÉÉ0É@Éð™@™˜“˜“˜ŒWINDOW™‚à ™‚á™1œ˜’Œdefinline-%WINDOW-HIDDEN?™˜– @¸oH™‚癘“˜“˜Œ$$WHOLE˜Œ$$ENV˜Œ$$CTX˜“˜ŒLAMBDA˜“˜’ŒWINDOW™˜“˜ŒBLOCK™@˜“™‚—˜“˜•ŒFETCH˜“™‚à˜•Œ DDDestination˜•ŒOF˜“™‚ñ˜“™‚ᘕŒ IMAGEDATA™‚ô˜“™‚ñ˜“™1˜•ŒDSP™‚ô™‚˜•ŒFFETCH˜“™1˜•ŒSAVE™‚ô™‚2gggÁÉg'¸gH‘H†gH ˜ŒDEFINLINE %WINDOW-HIDDEN?™˜“€,™%™‚療瘒ŒOPTIMIZER-LIST˜‘˜ŒCOMPILER ™@™‚™@œ™C˜–‚o@ b¿A X¦A ¿@ɸh@É ¹@É,º@É»@É2¼h½h¾h_¿AALÉÈ ½@ ²@ ”i_¿ˆi¾@ ¿@A¿@M¿O²w@É,lÚ_¿@É_¿MO ¿hO _OAOÕAOÕ@É(žhLÉ €jÔOO ¿@ ¿°"@H ¿@ ¿N—@ ¿†@ ¿@É_’O„g@KJJIIhH ¿@™‚»™C ™˜“˜“™‚œ˜ŒWINDOW˜ŒREGION˜Œ INTERLISP‚g˜•Œ DOUSERFNS2‚9˜•ŒOPENW‚1™‚Ñ‚(˜•Œ SHOWWFRAME‚!˜•Œ ADVISEWDS‚™‚‚™‚Âü˜•Œ DSPLINEFEED‚Ï™‚Âƙ‚‚Œ™\~™!v™‚Äl˜•Œ BITMAPCREATE+™‚Ø•Œ \ILLEGAL.ARG ˜•ŒREGIONP˜•Œ \INSUREWINDOW‚N˜•ŒRESHAPEBYREPAINTFN‚A™1‚õ™‚Ó‚ë™1‚¹™1‚«™1‚™1‚“™1e˜•ŒBITMAP^™‚ÓD™1;™12™1$™1™1œ™D˜–‚Ô @ @i ¿g@É2¹ U²*Všh@ Wð€hZ²`È»`jÍ¿¿@`ð\³h@ `–@ ¿IÉ@É@Éh ¿@ɸIH¿H˜HÉ€h¿@g¿Jž¿`KÍ¿h˜•Œ DISPINTERRUPT˜•Œ SOFTCURSORUP™‚Ó˜•ŒNEXTW™1˜•Œ \SOFTCURSORP˜•Œ\SOFTCURSORUPP˜•Œ\CURSORDESTINATION™D™˜“˜“™‚œ™1™‚ ‚Ø•Œ\SOFTCURSORUPCURRENT‚ˆ˜•Œ\SW2BMi˜•Œ \TOTOPWDS\™‚ÂJ˜•Œ\SOFTCURSORDOWN,™‚ ™>™!‚É™N‚¹™‚Ò‚´™1‚­˜•Œ\TOPWDS‚¤™1‚˜™‚Ó‚™1‚€™1x™1p™‚Óa™OQ™‚'A™N9™N™1™‚Òœ™E˜–&‚á@ b¿@É@É&@ Ã@É2_¿I—gI†Igðœo ¿hHjjOÉOÉh ¯@ _’O€i_¿H_¿H_¿H_¿H_¿A²9A ’A°,A3²B3”AB°B °A –AA…A _€h›J²l@ ¿°c@ ¿@g [K@g \€h²,LLL^L] _ONÙØOOMÙØ_¿OOOO _¿iºIœI`‘h‚i€h²UI_¿O_"’O"°5_ @O _gð™g)°O ”O_¿O_¿°Äh)gð²(hI²#I@O _gð‘hO ”O_¿OOð‘h€i_’O‰OOð‘h€i¢±øOOOOh_¿@ @O¿±°J¢±“ WD².WFšh@ WHð€h_&²`È_(¿`jÍ¿¿@`ð_³h@ `–@ ¿OÉH@Éh ¿@ÉhOÉO ¿O&Ÿ¿`O(Í¿@O¿@Hi ¿J@ É’O‚h€h¢±ýOið›@hi ¿±ìÐ!@ _B¥)±ÚOB_<¿O_:¿O_4¿OB_2¿O_0¿OB_.¿OB_@O_>ýñ²@O@O:O>O@ÙO0 ¿O>O4Ø_8O@O2Ø_6ýñ²@O8O:O6O8ÙO0 ¿O