‘XCL Compiler output for source file {DSK}arunwelch>SKYDRIVE>DOCUMENTS>UNIX>LISP>LDE>ROOMS>MEDLEY-35>WALLPAPER.;2 Source file created Saturday, 5 December 2020, 16:37:39. FASL file created Saturday, 5 December 2020, 16:37:39. ÿ˜–#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˜•Œ WALLPAPERCOMS˜•Œ FILEDATES˜•Œ WALLPAPER˜“˜“˜’ŒFILE-ENVIRONMENTS˜‘˜ŒXEROX-COMMON-LISP™˜“˜•ŒP˜“˜ŒEXPORT˜“˜ŒQUOTE˜“˜’ŒMAKE-WALLPAPER-WINDOW˜‘˜ŒROOMS˜’ŒHACK-BACKGROUND™˜ŒROOMS˜“˜•ŒFILES˜“˜•ŒSYSLOAD˜•Œ SCREENPAPER˜“˜•Œ FUNCTIONS™˜’ŒWALLPAPER-WINDOW-BUTTONEVENTFN™™ ˜“˜•Œ WINDOW-TYPES˜Œ WALLPAPER ˜“˜”˜Œ 5-Dec-2020 16:37:39•ŒS{DSK}arunwelch>SKYDRIVE>DOCUMENTS>UNIX>LISP>LDE>ROOMS>MEDLEY-35>WALLPAPER.;2˜–+ggo ¿ggg ˜Œ$DEFINE-FILE-ENVIRONMENT IL:WALLPAPER™˜“€%™™ ˜Œ COMPILE-FILE˜•ŒFILETYPE™˜•ŒMAKEFILE-ENVIRONMENT™ ˜“™ ˜ŒXCL™ ˜ŒROOMS˜–oo ˜Œ1 top-level form™˜“€ ™˜ŒROOMS˜“™™ ˜– o ˜Œ1 top-level form™˜“€˜•Œ FILESLOAD˜“˜“™'™)œ™˜–!@ol Xgg ¿H™™˜“˜“˜Œ &OPTIONAL˜ŒREGION˜•Œ PUTWINDOWPROP ˜•ŒCREATEW™,˜•Œ BUTTONEVENTFN˜Œ Wallpaperœ™,˜–#o ¿@hg X–H h™,™˜“˜“˜ŒWINDOW™ ™)˜’Œ NOTIFY-USER™˜•ŒPICK˜ŒRPick regions of the screen with LEFT~%Press MIDDLE when satisfied, RIGHT to abort.œ™ ˜–‚®ejó”eló˜kl ¿ekÙjð¤la¸…`¸¿HÉÉYºh»J’J°h[\‘Lg@hI¹°?»K\gð–K@¿°,Lgð²KKg@ ¿Šg@h]»„Jº°¬HI ¿Hg ™ ‚ÿÿÿÿ™˜“˜“˜ŒSHADE™J˜ŒROOM‚¨˜’Œ ROOM-CHANGED™‚š˜’ŒMAKE-BACKGROUND™{˜•ŒLISTPUT$˜’ŒUPDATE-PLACEMENTS™ ˜’ŒARGUMENT-ERROR˜‘˜ŒSYSTEM ‚£˜ŒEDITED‚”˜’ŒROOM™‚‚˜ŒSHADEu™gj˜ŒREGION[˜Œ WHOLE-SCREENH™i2˜’Œ BACKGROUND™+™f˜’Œ*CURRENT-ROOM*™˜–ug`ggghgnognognoggogoh ˜ŒDEF-WINDOW-TYPE :WALLPAPER™˜“€o˜ŒPUTHASHj˜’ŒMAKE-WINDOW-TYPE™ Z˜ŒFILESP˜ŒTITLEK˜ŒPROPS;˜Œ RECONSTITUTER+˜Œ ABSTRACTER˜Œ RECOGNIZER˜Œ DEPENDENCIES™/ ˜ŒNAME˜’Œ*WINDOW-TYPES*™™/_˜“™U˜Œ WallpaperD˜–@g' ˜Œ$lambda in DEF-WINDOW-TYPE :WALLPAPER˜ŒCLOSURE˜“˜“˜ŒARGS ™˜’ŒINTERNALIZE-REGION™™h4˜–g@ h˜Œ$lambda in DEF-WINDOW-TYPE :WALLPAPER™}˜“˜“˜ŒWINDOW ˜’ŒEXTERNALIZE-REGION™˜•Œ WINDOWREGION™h$˜–@ Égð˜Œ$lambda in DEF-WINDOW-TYPE :WALLPAPER™}˜“˜“˜ŒWINDOW˜•Œ \INSUREWINDOW ™,@˜•ŒCOMPILED-CLOSURE0™‚ ™‚˜– o ˜Œ1 top-level form™˜“€˜•ŒPUTPROPS˜“™˜•Œ COPYRIGHT˜“˜ŒVenue & Xerox Corporation‚Ä‚Æ‚äš‚šÿÿ