(SYSTEM::VERSION '(20020129.))
#0Y UTF-8
#Y(#:|1| #20Y(00 00 00 00 00 00 00 00 00 01 DA 01 02 38 01 31 DD 3E 19 01)
   "XLIB")
#Y(#:|2| #17Y(00 00 00 00 00 00 00 00 00 01 DA DB 31 DA 3E 19 01)
   ("COMMON-LISP") "XLIB")
#Y(#:|3| #19Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 2D 03 03 3E 19 01)
   "STRING-CONCAT" "SYS" "XLIB" SYSTEM::IMPORT-CERROR)
#Y(#:|4| #15Y(00 00 00 00 00 00 00 00 00 01 DA 31 CA 19 01) "XLIB")
#Y(#:|2| #15Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 19 01) :CLX
   COMMON-LISP::PROVIDE)
#Y(#:|3| #17Y(00 00 00 00 00 00 00 00 00 01 DA 31 E2 0F 01 19 01) "XLIB"
   COMMON-LISP::*PACKAGE*)
#Y(#:|4|
   #24Y(00 00 00 00 00 00 00 00 00 01 DA 31 59 DB 8C 4E 04 DB 63 31 51 C6 19
        01)
   (COMMON-LISP::SPECIAL XLIB::*DISPLAYS*) XLIB::*DISPLAYS*)
#Y(#:|5| #18Y(00 00 00 00 00 00 00 00 00 01 DA 0E 01 5D 0F 01 19 01) :CLX
   COMMON-LISP::*FEATURES*)
#Y(#:|6| #18Y(00 00 00 00 00 00 00 00 00 01 DA 0E 01 5D 0F 01 19 01)
   :CLX-ANSI-COMMON-LISP COMMON-LISP::*FEATURES*)
#Y(#:|7| #15Y(00 00 00 00 00 00 00 00 00 01 DA 31 59 19 01)
   (COMMON-LISP::DECLARATION COMMON-LISP::VALUES))
#Y(#:|8|
   #34Y(00 00 00 00 00 00 00 00 00 01 DA 38 01 8D 5D 0B DB DA 71 4D 8A 02 04 DA
        DD 30 04 DA DB 32 81 C5 19 01)
   XLIB::*VERSION* #1="CLISP-CLX 1997-06-12" SYSTEM::LOOSE-CONSTANT-EQL
   (COMMON-LISP::DEFCONSTANT XLIB::*VERSION* #1#) SYSTEM::CONSTANT-WARNING)
#Y(#:|9| #17Y(00 00 00 00 00 00 00 00 00 01 DA 38 01 31 D5 19 01)
   (XLIB::*VERSION* XLIB::ACCESS-CONTROL XLIB::ACCESS-ERROR XLIB::ACCESS-HOSTS
    XLIB::ACTIVATE-SCREEN-SAVER XLIB::ADD-ACCESS-HOST XLIB::ADD-RESOURCE
    XLIB::ADD-TO-SAVE-SET XLIB::ALIST XLIB::ALLOC-COLOR XLIB::ALLOC-COLOR-CELLS
    XLIB::ALLOC-COLOR-PLANES XLIB::ALLOC-ERROR XLIB::ALLOW-EVENTS XLIB::ANGLE
    XLIB::ARC-SEQ XLIB::ARRAY-INDEX XLIB::ATOM-ERROR XLIB::ATOM-NAME XLIB::BELL
    XLIB::BIT-GRAVITY XLIB::BITMAP XLIB::BITMAP-FORMAT
    XLIB::BITMAP-FORMAT-LSB-FIRST-P XLIB::BITMAP-FORMAT-P
    XLIB::BITMAP-FORMAT-PAD XLIB::BITMAP-FORMAT-UNIT XLIB::BITMAP-IMAGE
    XLIB::BOOLE-CONSTANT COMMON-LISP::BOOLEAN XLIB::CARD16 XLIB::CARD29
    XLIB::CARD32 XLIB::CARD8 XLIB::CARD8->CHAR XLIB::CHANGE-ACTIVE-POINTER-GRAB
    XLIB::CHANGE-KEYBOARD-CONTROL XLIB::CHANGE-KEYBOARD-MAPPING
    XLIB::CHANGE-POINTER-CONTROL XLIB::CHANGE-PROPERTY XLIB::CHAR->CARD8
    XLIB::CHAR-ASCENT XLIB::CHAR-ATTRIBUTES XLIB::CHAR-DESCENT
    XLIB::CHAR-LEFT-BEARING XLIB::CHAR-RIGHT-BEARING XLIB::CHAR-WIDTH
    XLIB::CHARACTER->KEYSYMS XLIB::CHARACTER-IN-MAP-P
    XLIB::CIRCULATE-WINDOW-DOWN XLIB::CIRCULATE-WINDOW-UP XLIB::CLEAR-AREA
    XLIB::CLOSE-DISPLAY XLIB::CLOSE-DOWN-MODE XLIB::CLOSE-FONT
    XLIB::CLOSED-DISPLAY XLIB::COLOR XLIB::COLOR-BLUE XLIB::COLOR-GREEN
    XLIB::COLOR-P XLIB::COLOR-RED XLIB::COLOR-RGB XLIB::COLORMAP
    XLIB::COLORMAP-DISPLAY XLIB::COLORMAP-EQUAL XLIB::COLORMAP-ERROR
    XLIB::COLORMAP-ID XLIB::COLORMAP-P XLIB::COLORMAP-PLIST
    XLIB::COLORMAP-VISUAL-INFO XLIB::CONNECTION-FAILURE XLIB::CONVERT-SELECTION
    XLIB::COPY-AREA XLIB::COPY-COLORMAP-AND-FREE XLIB::COPY-GCONTEXT
    XLIB::COPY-GCONTEXT-COMPONENTS XLIB::COPY-IMAGE XLIB::COPY-PLANE
    XLIB::CREATE-COLORMAP XLIB::CREATE-CURSOR XLIB::CREATE-GCONTEXT
    XLIB::CREATE-GLYPH-CURSOR XLIB::CREATE-IMAGE XLIB::CREATE-PIXMAP
    XLIB::CREATE-WINDOW XLIB::CURSOR XLIB::CURSOR-DISPLAY XLIB::CURSOR-EQUAL
    XLIB::CURSOR-ERROR XLIB::CURSOR-ID XLIB::CURSOR-P XLIB::CURSOR-PLIST
    XLIB::CUT-BUFFER XLIB::DECLARE-EVENT XLIB::DECODE-CORE-ERROR
    XLIB::DEFAULT-ERROR-HANDLER XLIB::DEFAULT-KEYSYM-INDEX
    XLIB::DEFAULT-KEYSYM-TRANSLATE XLIB::DEFINE-ERROR XLIB::DEFINE-EXTENSION
    XLIB::DEFINE-GCONTEXT-ACCESSOR XLIB::DEFINE-KEYSYM XLIB::DEFINE-KEYSYM-SET
    XLIB::DELETE-PROPERTY XLIB::DELETE-RESOURCE XLIB::DESTROY-SUBWINDOWS
    XLIB::DESTROY-WINDOW XLIB::DEVICE-BUSY XLIB::DEVICE-EVENT-MASK
    XLIB::DEVICE-EVENT-MASK-CLASS XLIB::DISCARD-CURRENT-EVENT
    XLIB::DISCARD-FONT-INFO XLIB::DISPLAY XLIB::DISPLAY-AFTER-FUNCTION
    XLIB::DISPLAY-AUTHORIZATION-DATA XLIB::DISPLAY-AUTHORIZATION-NAME
    XLIB::DISPLAY-BITMAP-FORMAT XLIB::DISPLAY-BYTE-ORDER
    XLIB::DISPLAY-DEFAULT-SCREEN XLIB::DISPLAY-DISPLAY
    XLIB::DISPLAY-ERROR-HANDLER XLIB::DISPLAY-FINISH-OUTPUT
    XLIB::DISPLAY-FORCE-OUTPUT XLIB::DISPLAY-HOST
    XLIB::DISPLAY-IMAGE-LSB-FIRST-P XLIB::DISPLAY-INVOKE-AFTER-FUNCTION
    XLIB::DISPLAY-KEYCODE-RANGE XLIB::DISPLAY-MAX-KEYCODE
    XLIB::DISPLAY-MAX-REQUEST-LENGTH XLIB::DISPLAY-MIN-KEYCODE
    XLIB::DISPLAY-MOTION-BUFFER-SIZE XLIB::DISPLAY-NSCREENS XLIB::DISPLAY-P
    XLIB::DISPLAY-PIXMAP-FORMATS XLIB::DISPLAY-PLIST
    XLIB::DISPLAY-PROTOCOL-MAJOR-VERSION XLIB::DISPLAY-PROTOCOL-MINOR-VERSION
    XLIB::DISPLAY-PROTOCOL-VERSION XLIB::DISPLAY-RELEASE-NUMBER
    XLIB::DISPLAY-REPORT-ASYNCHRONOUS-ERRORS XLIB::DISPLAY-RESOURCE-ID-BASE
    XLIB::DISPLAY-RESOURCE-ID-MASK XLIB::DISPLAY-ROOTS XLIB::DISPLAY-VENDOR
    XLIB::DISPLAY-VENDOR-NAME XLIB::DISPLAY-XID XLIB::DRAW-ARC XLIB::DRAW-ARCS
    XLIB::DRAW-DIRECTION XLIB::DRAW-GLYPH XLIB::DRAW-GLYPHS
    XLIB::DRAW-IMAGE-GLYPH XLIB::DRAW-IMAGE-GLYPHS XLIB::DRAW-LINE
    XLIB::DRAW-LINES XLIB::DRAW-POINT XLIB::DRAW-POINTS XLIB::DRAW-RECTANGLE
    XLIB::DRAW-RECTANGLES XLIB::DRAW-SEGMENTS XLIB::DRAWABLE
    XLIB::DRAWABLE-BORDER-WIDTH XLIB::DRAWABLE-DEPTH XLIB::DRAWABLE-DISPLAY
    XLIB::DRAWABLE-EQUAL XLIB::DRAWABLE-ERROR XLIB::DRAWABLE-HEIGHT
    XLIB::DRAWABLE-ID XLIB::DRAWABLE-P XLIB::DRAWABLE-PLIST XLIB::DRAWABLE-ROOT
    XLIB::DRAWABLE-WIDTH XLIB::DRAWABLE-X XLIB::DRAWABLE-Y XLIB::ERROR-KEY
    XLIB::EVENT-CASE XLIB::EVENT-COND XLIB::EVENT-HANDLER XLIB::EVENT-KEY
    XLIB::EVENT-LISTEN XLIB::EVENT-MASK XLIB::EVENT-MASK-CLASS
    XLIB::EXTENSION-OPCODE XLIB::FIND-ATOM XLIB::FONT
    XLIB::FONT-ALL-CHARS-EXIST-P XLIB::FONT-ASCENT XLIB::FONT-DEFAULT-CHAR
    XLIB::FONT-DESCENT XLIB::FONT-DIRECTION XLIB::FONT-DISPLAY XLIB::FONT-EQUAL
    XLIB::FONT-ERROR XLIB::FONT-ID XLIB::FONT-MAX-BYTE1 XLIB::FONT-MAX-BYTE2
    XLIB::FONT-MAX-CHAR XLIB::FONT-MIN-BYTE1 XLIB::FONT-MIN-BYTE2
    XLIB::FONT-MIN-CHAR XLIB::FONT-NAME XLIB::FONT-P XLIB::FONT-PATH
    XLIB::FONT-PLIST XLIB::FONT-PROPERTIES XLIB::FONT-PROPERTY XLIB::FONTABLE
    XLIB::FORCE-GCONTEXT-CHANGES XLIB::FREE-COLORMAP XLIB::FREE-COLORS
    XLIB::FREE-CURSOR XLIB::FREE-GCONTEXT XLIB::FREE-PIXMAP XLIB::GCONTEXT
    XLIB::GCONTEXT-ARC-MODE XLIB::GCONTEXT-BACKGROUND XLIB::GCONTEXT-CACHE-P
    XLIB::GCONTEXT-CAP-STYLE XLIB::GCONTEXT-CLIP-MASK
    XLIB::GCONTEXT-CLIP-ORDERING XLIB::GCONTEXT-CLIP-X XLIB::GCONTEXT-CLIP-Y
    XLIB::GCONTEXT-DASH-OFFSET XLIB::GCONTEXT-DASHES XLIB::GCONTEXT-DISPLAY
    XLIB::GCONTEXT-EQUAL XLIB::GCONTEXT-ERROR XLIB::GCONTEXT-EXPOSURES
    XLIB::GCONTEXT-FILL-RULE XLIB::GCONTEXT-FILL-STYLE XLIB::GCONTEXT-FONT
    XLIB::GCONTEXT-FOREGROUND XLIB::GCONTEXT-FUNCTION XLIB::GCONTEXT-ID
    XLIB::GCONTEXT-JOIN-STYLE XLIB::GCONTEXT-KEY XLIB::GCONTEXT-LINE-STYLE
    XLIB::GCONTEXT-LINE-WIDTH XLIB::GCONTEXT-P XLIB::GCONTEXT-PLANE-MASK
    XLIB::GCONTEXT-PLIST XLIB::GCONTEXT-STIPPLE XLIB::GCONTEXT-SUBWINDOW-MODE
    XLIB::GCONTEXT-TILE XLIB::GCONTEXT-TS-X XLIB::GCONTEXT-TS-Y
    XLIB::GET-EXTERNAL-EVENT-CODE XLIB::GET-IMAGE XLIB::GET-PROPERTY
    XLIB::GET-RAW-IMAGE XLIB::GET-RESOURCE XLIB::GET-SEARCH-RESOURCE
    XLIB::GET-SEARCH-TABLE XLIB::GET-STANDARD-COLORMAP XLIB::GET-WM-CLASS
    XLIB::GLOBAL-POINTER-POSITION XLIB::GRAB-BUTTON XLIB::GRAB-KEY
    XLIB::GRAB-KEYBOARD XLIB::GRAB-POINTER XLIB::GRAB-SERVER XLIB::GRAB-STATUS
    XLIB::ICON-SIZES XLIB::ICONIFY-WINDOW XLIB::ID-CHOICE-ERROR
    XLIB::ILLEGAL-REQUEST-ERROR XLIB::IMAGE XLIB::IMAGE-BLUE-MASK
    XLIB::IMAGE-DEPTH XLIB::IMAGE-GREEN-MASK XLIB::IMAGE-HEIGHT
    XLIB::IMAGE-NAME XLIB::IMAGE-PIXMAP XLIB::IMAGE-PLIST XLIB::IMAGE-RED-MASK
    XLIB::IMAGE-WIDTH XLIB::IMAGE-X XLIB::IMAGE-X-HOT XLIB::IMAGE-X-P
    XLIB::IMAGE-XY XLIB::IMAGE-XY-BITMAP-LIST XLIB::IMAGE-XY-P
    XLIB::IMAGE-Y-HOT XLIB::IMAGE-Z XLIB::IMAGE-Z-BITS-PER-PIXEL
    XLIB::IMAGE-Z-P XLIB::IMAGE-Z-PIXARRAY XLIB::IMPLEMENTATION-ERROR
    XLIB::INPUT-FOCUS XLIB::INSTALL-COLORMAP XLIB::INSTALLED-COLORMAPS
    XLIB::INT16 XLIB::INT32 XLIB::INT8 XLIB::INTERN-ATOM XLIB::INVALID-FONT
    XLIB::KEYBOARD-CONTROL XLIB::KEYBOARD-MAPPING XLIB::KEYCODE->CHARACTER
    XLIB::KEYCODE->KEYSYM XLIB::KEYSYM XLIB::KEYSYM->CHARACTER
    XLIB::KEYSYM->KEYCODES XLIB::KEYSYM-IN-MAP-P XLIB::KEYSYM-SET
    XLIB::KILL-CLIENT XLIB::KILL-TEMPORARY-CLIENTS XLIB::LENGTH-ERROR
    XLIB::LIST-EXTENSIONS XLIB::LIST-FONT-NAMES XLIB::LIST-FONTS
    XLIB::LIST-PROPERTIES XLIB::LOOKUP-COLOR XLIB::LOOKUP-ERROR
    XLIB::MAKE-COLOR XLIB::MAKE-EVENT-HANDLERS XLIB::MAKE-EVENT-KEYS
    XLIB::MAKE-EVENT-MASK XLIB::MAKE-RESOURCE-DATABASE XLIB::MAKE-STATE-KEYS
    XLIB::MAKE-STATE-MASK XLIB::MAKE-WM-HINTS XLIB::MAKE-WM-SIZE-HINTS
    XLIB::MAP-RESOURCE XLIB::MAP-SUBWINDOWS XLIB::MAP-WINDOW
    XLIB::MAPPING-NOTIFY XLIB::MASK16 XLIB::MASK32 XLIB::MATCH-ERROR
    XLIB::MAX-CHAR-ASCENT XLIB::MAX-CHAR-ATTRIBUTES XLIB::MAX-CHAR-DESCENT
    XLIB::MAX-CHAR-LEFT-BEARING XLIB::MAX-CHAR-RIGHT-BEARING
    XLIB::MAX-CHAR-WIDTH XLIB::MERGE-RESOURCES XLIB::MIN-CHAR-ASCENT
    XLIB::MIN-CHAR-ATTRIBUTES XLIB::MIN-CHAR-DESCENT
    XLIB::MIN-CHAR-LEFT-BEARING XLIB::MIN-CHAR-RIGHT-BEARING
    XLIB::MIN-CHAR-WIDTH XLIB::MISSING-PARAMETER XLIB::MODIFIER-KEY
    XLIB::MODIFIER-MAPPING XLIB::MODIFIER-MASK XLIB::MOTION-EVENTS
    XLIB::NAME-ERROR XLIB::NO-OPERATION XLIB::OPEN-DISPLAY XLIB::OPEN-FONT
    XLIB::PIXARRAY XLIB::PIXEL XLIB::PIXMAP XLIB::PIXMAP-DISPLAY
    XLIB::PIXMAP-EQUAL XLIB::PIXMAP-ERROR XLIB::PIXMAP-FORMAT
    XLIB::PIXMAP-FORMAT-BITS-PER-PIXEL XLIB::PIXMAP-FORMAT-DEPTH
    XLIB::PIXMAP-FORMAT-P XLIB::PIXMAP-FORMAT-SCANLINE-PAD XLIB::PIXMAP-ID
    XLIB::PIXMAP-P XLIB::PIXMAP-PLIST XLIB::POINT-SEQ XLIB::POINTER-CONTROL
    XLIB::POINTER-EVENT-MASK XLIB::POINTER-EVENT-MASK-CLASS
    XLIB::POINTER-MAPPING XLIB::POINTER-POSITION XLIB::PROCESS-EVENT
    XLIB::PUT-IMAGE XLIB::PUT-RAW-IMAGE XLIB::QUERY-BEST-CURSOR
    XLIB::QUERY-BEST-STIPPLE XLIB::QUERY-BEST-TILE XLIB::QUERY-COLORS
    XLIB::QUERY-EXTENSION XLIB::QUERY-KEYMAP XLIB::QUERY-POINTER
    XLIB::QUERY-TREE XLIB::QUEUE-EVENT XLIB::READ-BITMAP-FILE
    XLIB::READ-RESOURCES XLIB::RECOLOR-CURSOR XLIB::RECT-SEQ
    XLIB::REMOVE-ACCESS-HOST XLIB::REMOVE-FROM-SAVE-SET XLIB::REPARENT-WINDOW
    XLIB::REPEAT-SEQ XLIB::REPLY-LENGTH-ERROR XLIB::REPLY-TIMEOUT
    XLIB::REQUEST-ERROR XLIB::RESET-SCREEN-SAVER XLIB::RESOURCE-DATABASE
    XLIB::RESOURCE-DATABASE-TIMESTAMP XLIB::RESOURCE-ERROR XLIB::RESOURCE-ID
    XLIB::RESOURCE-KEY XLIB::RGB-COLORMAPS XLIB::RGB-VAL XLIB::ROOT-RESOURCES
    XLIB::ROTATE-CUT-BUFFERS XLIB::ROTATE-PROPERTIES XLIB::SCREEN
    XLIB::SCREEN-BACKING-STORES XLIB::SCREEN-BLACK-PIXEL
    XLIB::SCREEN-DEFAULT-COLORMAP XLIB::SCREEN-DEPTHS
    XLIB::SCREEN-EVENT-MASK-AT-OPEN XLIB::SCREEN-HEIGHT
    XLIB::SCREEN-HEIGHT-IN-MILLIMETERS XLIB::SCREEN-MAX-INSTALLED-MAPS
    XLIB::SCREEN-MIN-INSTALLED-MAPS XLIB::SCREEN-P XLIB::SCREEN-PLIST
    XLIB::SCREEN-ROOT XLIB::SCREEN-ROOT-DEPTH XLIB::SCREEN-ROOT-VISUAL
    XLIB::SCREEN-ROOT-VISUAL-INFO XLIB::SCREEN-SAVE-UNDERS-P XLIB::SCREEN-SAVER
    XLIB::SCREEN-WHITE-PIXEL XLIB::SCREEN-WIDTH
    XLIB::SCREEN-WIDTH-IN-MILLIMETERS XLIB::SEG-SEQ XLIB::SELECTION-OWNER
    XLIB::SEND-EVENT XLIB::SEQUENCE-ERROR XLIB::SET-ACCESS-CONTROL
    XLIB::SET-CLOSE-DOWN-MODE XLIB::SET-INPUT-FOCUS XLIB::SET-MODIFIER-MAPPING
    XLIB::SET-POINTER-MAPPING XLIB::SET-SCREEN-SAVER XLIB::SET-SELECTION-OWNER
    XLIB::SET-STANDARD-COLORMAP XLIB::SET-STANDARD-PROPERTIES
    XLIB::SET-WM-CLASS XLIB::SET-WM-PROPERTIES XLIB::SET-WM-RESOURCES
    XLIB::STATE-KEYSYM-P XLIB::STATE-MASK-KEY XLIB::STORE-COLOR
    XLIB::STORE-COLORS XLIB::STRINGABLE XLIB::TEXT-EXTENTS XLIB::TEXT-WIDTH
    XLIB::TIMESTAMP XLIB::TRANSIENT-FOR XLIB::TRANSLATE-COORDINATES
    XLIB::TRANSLATE-DEFAULT XLIB::TRANSLATION-FUNCTION COMMON-LISP::TYPE-ERROR
    XLIB::UNDEFINE-KEYSYM XLIB::UNEXPECTED-REPLY XLIB::UNGRAB-BUTTON
    XLIB::UNGRAB-KEY XLIB::UNGRAB-KEYBOARD XLIB::UNGRAB-POINTER
    XLIB::UNGRAB-SERVER XLIB::UNINSTALL-COLORMAP XLIB::UNKNOWN-ERROR
    XLIB::UNMAP-SUBWINDOWS XLIB::UNMAP-WINDOW XLIB::VALUE-ERROR
    XLIB::VISUAL-INFO XLIB::VISUAL-INFO-BITS-PER-RGB
    XLIB::VISUAL-INFO-BLUE-MASK XLIB::VISUAL-INFO-CLASS
    XLIB::VISUAL-INFO-COLORMAP-ENTRIES XLIB::VISUAL-INFO-DISPLAY
    XLIB::VISUAL-INFO-GREEN-MASK XLIB::VISUAL-INFO-ID XLIB::VISUAL-INFO-P
    XLIB::VISUAL-INFO-PLIST XLIB::VISUAL-INFO-RED-MASK XLIB::WARP-POINTER
    XLIB::WARP-POINTER-IF-INSIDE XLIB::WARP-POINTER-RELATIVE
    XLIB::WARP-POINTER-RELATIVE-IF-INSIDE XLIB::WIN-GRAVITY XLIB::WINDOW
    XLIB::WINDOW-ALL-EVENT-MASKS XLIB::WINDOW-BACKGROUND
    XLIB::WINDOW-BACKING-PIXEL XLIB::WINDOW-BACKING-PLANES
    XLIB::WINDOW-BACKING-STORE XLIB::WINDOW-BIT-GRAVITY XLIB::WINDOW-BORDER
    XLIB::WINDOW-CLASS XLIB::WINDOW-COLORMAP XLIB::WINDOW-COLORMAP-INSTALLED-P
    XLIB::WINDOW-CURSOR XLIB::WINDOW-DISPLAY XLIB::WINDOW-DO-NOT-PROPAGATE-MASK
    XLIB::WINDOW-EQUAL XLIB::WINDOW-ERROR XLIB::WINDOW-EVENT-MASK
    XLIB::WINDOW-GRAVITY XLIB::WINDOW-ID XLIB::WINDOW-MAP-STATE
    XLIB::WINDOW-OVERRIDE-REDIRECT XLIB::WINDOW-P XLIB::WINDOW-PLIST
    XLIB::WINDOW-PRIORITY XLIB::WINDOW-SAVE-UNDER XLIB::WINDOW-VISUAL
    XLIB::WINDOW-VISUAL-INFO XLIB::WITH-DISPLAY XLIB::WITH-EVENT-QUEUE
    XLIB::WITH-GCONTEXT XLIB::WITH-SERVER-GRABBED XLIB::WITH-STATE
    XLIB::WITHDRAW-WINDOW XLIB::WM-CLIENT-MACHINE XLIB::WM-COLORMAP-WINDOWS
    XLIB::WM-COMMAND XLIB::WM-HINTS XLIB::WM-HINTS-FLAGS
    XLIB::WM-HINTS-ICON-MASK XLIB::WM-HINTS-ICON-PIXMAP
    XLIB::WM-HINTS-ICON-WINDOW XLIB::WM-HINTS-ICON-X XLIB::WM-HINTS-ICON-Y
    XLIB::WM-HINTS-INITIAL-STATE XLIB::WM-HINTS-INPUT XLIB::WM-HINTS-P
    XLIB::WM-HINTS-WINDOW-GROUP XLIB::WM-ICON-NAME XLIB::WM-NAME
    XLIB::WM-NORMAL-HINTS XLIB::WM-PROTOCOLS XLIB::WM-RESOURCES
    XLIB::WM-SIZE-HINTS XLIB::WM-SIZE-HINTS-BASE-HEIGHT
    XLIB::WM-SIZE-HINTS-BASE-WIDTH XLIB::WM-SIZE-HINTS-HEIGHT
    XLIB::WM-SIZE-HINTS-HEIGHT-INC XLIB::WM-SIZE-HINTS-MAX-ASPECT
    XLIB::WM-SIZE-HINTS-MAX-HEIGHT XLIB::WM-SIZE-HINTS-MAX-WIDTH
    XLIB::WM-SIZE-HINTS-MIN-ASPECT XLIB::WM-SIZE-HINTS-MIN-HEIGHT
    XLIB::WM-SIZE-HINTS-MIN-WIDTH XLIB::WM-SIZE-HINTS-P
    XLIB::WM-SIZE-HINTS-USER-SPECIFIED-POSITION-P
    XLIB::WM-SIZE-HINTS-USER-SPECIFIED-SIZE-P XLIB::WM-SIZE-HINTS-WIDTH
    XLIB::WM-SIZE-HINTS-WIDTH-INC XLIB::WM-SIZE-HINTS-WIN-GRAVITY
    XLIB::WM-SIZE-HINTS-X XLIB::WM-SIZE-HINTS-Y XLIB::WM-ZOOM-HINTS
    XLIB::WRITE-BITMAP-FILE XLIB::WRITE-RESOURCES XLIB::XATOM
    XLIB::TRACE-DISPLAY XLIB::SUSPEND-DISPLAY-TRACING
    XLIB::RESUME-DISPLAY-TRACING XLIB::UNTRACE-DISPLAY XLIB::SHOW-TRACE
    XLIB::DISPLAY-TRACE XLIB::DESCRIBE-ERROR XLIB::DESCRIBE-TRACE))
#Y(#:|10| #17Y(00 00 00 00 00 00 00 00 00 01 DA 38 01 31 D5 19 01)
   (XLIB::SHAPE-VERSION XLIB::SHAPE-COMBINE XLIB::SHAPE-OFFSET
    XLIB::SHAPE-EXTENTS XLIB::SHAPE-RECTANGLES))
#Y(#:|11|
   #24Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 DA DD 63 2D 03 04 C5 19
        01)
   XLIB::CARD4 SYSTEM::DEFTYPE-EXPANDER
   #Y(#:DEFTYPE-CARD4
      #26Y(00 00 00 00 01 00 00 00 00 02 AD 72 45 DA 90 01 31 03 C7 19 02 AD 2F
           01 19 02)
      1. SYSTEM::TYPE-CALL-ERROR (COMMON-LISP::UNSIGNED-BYTE 4.))
   COMMON-LISP::TYPE SYSTEM::%SET-DOCUMENTATION)
#Y(#:|12|
   #24Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 DA DD 63 2D 03 04 C5 19
        01)
   XLIB::CARD8 SYSTEM::DEFTYPE-EXPANDER
   #Y(#:DEFTYPE-CARD8
      #26Y(00 00 00 00 01 00 00 00 00 02 AD 72 45 DA 90 01 31 03 C7 19 02 AD 2F
           01 19 02)
      1. SYSTEM::TYPE-CALL-ERROR (COMMON-LISP::UNSIGNED-BYTE 8.))
   COMMON-LISP::TYPE SYSTEM::%SET-DOCUMENTATION)
#Y(#:|13|
   #24Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 DA DD 63 2D 03 04 C5 19
        01)
   XLIB::CARD16 SYSTEM::DEFTYPE-EXPANDER
   #Y(#:DEFTYPE-CARD16
      #26Y(00 00 00 00 01 00 00 00 00 02 AD 72 45 DA 90 01 31 03 C7 19 02 AD 2F
           01 19 02)
      1. SYSTEM::TYPE-CALL-ERROR (COMMON-LISP::UNSIGNED-BYTE 16.))
   COMMON-LISP::TYPE SYSTEM::%SET-DOCUMENTATION)
#Y(#:|14|
   #24Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 DA DD 63 2D 03 04 C5 19
        01)
   XLIB::CARD24 SYSTEM::DEFTYPE-EXPANDER
   #Y(#:DEFTYPE-CARD24
      #26Y(00 00 00 00 01 00 00 00 00 02 AD 72 45 DA 90 01 31 03 C7 19 02 AD 2F
           01 19 02)
      1. SYSTEM::TYPE-CALL-ERROR (COMMON-LISP::UNSIGNED-BYTE 24.))
   COMMON-LISP::TYPE SYSTEM::%SET-DOCUMENTATION)
#Y(#:|15|
   #24Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 DA DD 63 2D 03 04 C5 19
        01)
   XLIB::CARD29 SYSTEM::DEFTYPE-EXPANDER
   #Y(#:DEFTYPE-CARD29
      #26Y(00 00 00 00 01 00 00 00 00 02 AD 72 45 DA 90 01 31 03 C7 19 02 AD 2F
           01 19 02)
      1. SYSTEM::TYPE-CALL-ERROR (COMMON-LISP::UNSIGNED-BYTE 29.))
   COMMON-LISP::TYPE SYSTEM::%SET-DOCUMENTATION)
#Y(#:|16|
   #24Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 DA DD 63 2D 03 04 C5 19
        01)
   XLIB::CARD32 SYSTEM::DEFTYPE-EXPANDER
   #Y(#:DEFTYPE-CARD32
      #26Y(00 00 00 00 01 00 00 00 00 02 AD 72 45 DA 90 01 31 03 C7 19 02 AD 2F
           01 19 02)
      1. SYSTEM::TYPE-CALL-ERROR (COMMON-LISP::UNSIGNED-BYTE 32.))
   COMMON-LISP::TYPE SYSTEM::%SET-DOCUMENTATION)
#Y(#:|17|
   #24Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 DA DD 63 2D 03 04 C5 19
        01)
   XLIB::INT8 SYSTEM::DEFTYPE-EXPANDER
   #Y(#:DEFTYPE-INT8
      #26Y(00 00 00 00 01 00 00 00 00 02 AD 72 45 DA 90 01 31 03 C7 19 02 AD 2F
           01 19 02)
      1. SYSTEM::TYPE-CALL-ERROR (COMMON-LISP::SIGNED-BYTE 8.))
   COMMON-LISP::TYPE SYSTEM::%SET-DOCUMENTATION)
#Y(#:|18|
   #24Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 DA DD 63 2D 03 04 C5 19
        01)
   XLIB::INT16 SYSTEM::DEFTYPE-EXPANDER
   #Y(#:DEFTYPE-INT16
      #26Y(00 00 00 00 01 00 00 00 00 02 AD 72 45 DA 90 01 31 03 C7 19 02 AD 2F
           01 19 02)
      1. SYSTEM::TYPE-CALL-ERROR (COMMON-LISP::SIGNED-BYTE 16.))
   COMMON-LISP::TYPE SYSTEM::%SET-DOCUMENTATION)
#Y(#:|19|
   #24Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 DA DD 63 2D 03 04 C5 19
        01)
   XLIB::INT32 SYSTEM::DEFTYPE-EXPANDER
   #Y(#:DEFTYPE-INT32
      #26Y(00 00 00 00 01 00 00 00 00 02 AD 72 45 DA 90 01 31 03 C7 19 02 AD 2F
           01 19 02)
      1. SYSTEM::TYPE-CALL-ERROR (COMMON-LISP::SIGNED-BYTE 32.))
   COMMON-LISP::TYPE SYSTEM::%SET-DOCUMENTATION)
#Y(#:|20|
   #24Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 DA DD 63 2D 03 04 C5 19
        01)
   XLIB::RGB-VAL SYSTEM::DEFTYPE-EXPANDER
   #Y(#:DEFTYPE-RGB-VAL
      #26Y(00 00 00 00 01 00 00 00 00 02 AD 72 45 DA 90 01 31 03 C7 19 02 AD 2F
           01 19 02)
      1. SYSTEM::TYPE-CALL-ERROR (COMMON-LISP::REAL 0. 1.))
   COMMON-LISP::TYPE SYSTEM::%SET-DOCUMENTATION)
#Y(#:|21|
   #24Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 DA DD 63 2D 03 04 C5 19
        01)
   XLIB::STRINGABLE SYSTEM::DEFTYPE-EXPANDER
   #Y(#:DEFTYPE-STRINGABLE
      #26Y(00 00 00 00 01 00 00 00 00 02 AD 72 45 DA 90 01 31 03 C7 19 02 AD 2F
           01 19 02)
      1. SYSTEM::TYPE-CALL-ERROR
      (COMMON-LISP::OR COMMON-LISP::STRING COMMON-LISP::SYMBOL))
   COMMON-LISP::TYPE SYSTEM::%SET-DOCUMENTATION)
#Y(#:|22|
   #24Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 DA DD 63 2D 03 04 C5 19
        01)
   XLIB::FONTABLE SYSTEM::DEFTYPE-EXPANDER
   #Y(#:DEFTYPE-FONTABLE
      #26Y(00 00 00 00 01 00 00 00 00 02 AD 72 45 DA 90 01 31 03 C7 19 02 AD 2F
           01 19 02)
      1. SYSTEM::TYPE-CALL-ERROR (COMMON-LISP::OR XLIB::STRINGABLE XLIB::FONT))
   COMMON-LISP::TYPE SYSTEM::%SET-DOCUMENTATION)
#Y(#:|23|
   #24Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 DA DD 63 2D 03 04 C5 19
        01)
   XLIB::ARRAY-INDEX SYSTEM::DEFTYPE-EXPANDER
   #Y(#:DEFTYPE-ARRAY-INDEX
      #26Y(00 00 00 00 01 00 00 00 00 02 AD 72 45 DA 90 01 31 03 C7 19 02 AD 2F
           01 19 02)
      1. SYSTEM::TYPE-CALL-ERROR (COMMON-LISP::INTEGER 0. 16777216.))
   COMMON-LISP::TYPE SYSTEM::%SET-DOCUMENTATION)
#Y(#:|24|
   #24Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 DA DD 63 2D 03 04 C5 19
        01)
   XLIB::ANGLE SYSTEM::DEFTYPE-EXPANDER
   #Y(#:DEFTYPE-ANGLE
      #26Y(00 00 00 00 01 00 00 00 00 02 AD 72 45 DA 90 01 31 03 C7 19 02 AD 2F
           01 19 02)
      1. SYSTEM::TYPE-CALL-ERROR
      (COMMON-LISP::REAL -6.283185307179586477L0 6.283185307179586477L0))
   COMMON-LISP::TYPE SYSTEM::%SET-DOCUMENTATION)
#Y(#:|25|
   #24Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 DA DD 63 2D 03 04 C5 19
        01)
   XLIB::MASK32 SYSTEM::DEFTYPE-EXPANDER
   #Y(#:DEFTYPE-MASK32
      #26Y(00 00 00 00 01 00 00 00 00 02 AD 72 45 DA 90 01 31 03 C7 19 02 AD 2F
           01 19 02)
      1. SYSTEM::TYPE-CALL-ERROR XLIB::CARD32)
   COMMON-LISP::TYPE SYSTEM::%SET-DOCUMENTATION)
#Y(#:|26|
   #24Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 DA DD 63 2D 03 04 C5 19
        01)
   XLIB::MASK16 SYSTEM::DEFTYPE-EXPANDER
   #Y(#:DEFTYPE-MASK16
      #26Y(00 00 00 00 01 00 00 00 00 02 AD 72 45 DA 90 01 31 03 C7 19 02 AD 2F
           01 19 02)
      1. SYSTEM::TYPE-CALL-ERROR XLIB::CARD16)
   COMMON-LISP::TYPE SYSTEM::%SET-DOCUMENTATION)
#Y(#:|27|
   #24Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 DA DD 63 2D 03 04 C5 19
        01)
   XLIB::PIXEL SYSTEM::DEFTYPE-EXPANDER
   #Y(#:DEFTYPE-PIXEL
      #26Y(00 00 00 00 01 00 00 00 00 02 AD 72 45 DA 90 01 31 03 C7 19 02 AD 2F
           01 19 02)
      1. SYSTEM::TYPE-CALL-ERROR (COMMON-LISP::UNSIGNED-BYTE 32.))
   COMMON-LISP::TYPE SYSTEM::%SET-DOCUMENTATION)
#Y(#:|28|
   #24Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 DA DD 63 2D 03 04 C5 19
        01)
   XLIB::IMAGE-DEPTH SYSTEM::DEFTYPE-EXPANDER
   #Y(#:DEFTYPE-IMAGE-DEPTH
      #26Y(00 00 00 00 01 00 00 00 00 02 AD 72 45 DA 90 01 31 03 C7 19 02 AD 2F
           01 19 02)
      1. SYSTEM::TYPE-CALL-ERROR (COMMON-LISP::INTEGER 0. 32.))
   COMMON-LISP::TYPE SYSTEM::%SET-DOCUMENTATION)
#Y(#:|29|
   #24Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 DA DD 63 2D 03 04 C5 19
        01)
   XLIB::RESOURCE-ID SYSTEM::DEFTYPE-EXPANDER
   #Y(#:DEFTYPE-RESOURCE-ID
      #26Y(00 00 00 00 01 00 00 00 00 02 AD 72 45 DA 90 01 31 03 C7 19 02 AD 2F
           01 19 02)
      1. SYSTEM::TYPE-CALL-ERROR XLIB::CARD29)
   COMMON-LISP::TYPE SYSTEM::%SET-DOCUMENTATION)
#Y(#:|30|
   #24Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 DA DD 63 2D 03 04 C5 19
        01)
   XLIB::KEYSYM SYSTEM::DEFTYPE-EXPANDER
   #Y(#:DEFTYPE-KEYSYM
      #26Y(00 00 00 00 01 00 00 00 00 02 AD 72 45 DA 90 01 31 03 C7 19 02 AD 2F
           01 19 02)
      1. SYSTEM::TYPE-CALL-ERROR XLIB::CARD32)
   COMMON-LISP::TYPE SYSTEM::%SET-DOCUMENTATION)
#Y(#:|31|
   #24Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 DA DD 63 2D 03 04 C5 19
        01)
   XLIB::ALIST SYSTEM::DEFTYPE-EXPANDER
   #Y(#:DEFTYPE-ALIST
      #26Y(00 00 00 00 01 00 00 00 00 02 AD 72 45 DA 90 01 2F 03 C7 19 02 AD 2F
           01 19 02)
      3. SYSTEM::TYPE-CALL-ERROR COMMON-LISP::LIST)
   COMMON-LISP::TYPE SYSTEM::%SET-DOCUMENTATION)
#Y(#:|32|
   #24Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 DA DD 63 2D 03 04 C5 19
        01)
   XLIB::REPEAT-SEQ SYSTEM::DEFTYPE-EXPANDER
   #Y(#:DEFTYPE-REPEAT-SEQ #13Y(00 00 00 00 01 00 00 00 00 02 C5 19 02)
      COMMON-LISP::SEQUENCE)
   COMMON-LISP::TYPE SYSTEM::%SET-DOCUMENTATION)
#Y(#:|33|
   #24Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 DA DD 63 2D 03 04 C5 19
        01)
   XLIB::POINT-SEQ SYSTEM::DEFTYPE-EXPANDER
   #Y(#:DEFTYPE-POINT-SEQ
      #26Y(00 00 00 00 01 00 00 00 00 02 AD 72 45 DA 90 01 31 03 C7 19 02 AD 2F
           01 19 02)
      1. SYSTEM::TYPE-CALL-ERROR
      (XLIB::REPEAT-SEQ (XLIB::INT16 XLIB::X) (XLIB::INT16 XLIB::Y)))
   COMMON-LISP::TYPE SYSTEM::%SET-DOCUMENTATION)
#Y(#:|34|
   #24Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 DA DD 63 2D 03 04 C5 19
        01)
   XLIB::SEG-SEQ SYSTEM::DEFTYPE-EXPANDER
   #Y(#:DEFTYPE-SEG-SEQ
      #26Y(00 00 00 00 01 00 00 00 00 02 AD 72 45 DA 90 01 31 03 C7 19 02 AD 2F
           01 19 02)
      1. SYSTEM::TYPE-CALL-ERROR
      (XLIB::REPEAT-SEQ (XLIB::INT16 XLIB::X1) (XLIB::INT16 XLIB::Y1)
       (XLIB::INT16 XLIB::X2) (XLIB::INT16 XLIB::Y2)))
   COMMON-LISP::TYPE SYSTEM::%SET-DOCUMENTATION)
#Y(#:|35|
   #24Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 DA DD 63 2D 03 04 C5 19
        01)
   XLIB::RECT-SEQ SYSTEM::DEFTYPE-EXPANDER
   #Y(#:DEFTYPE-RECT-SEQ
      #26Y(00 00 00 00 01 00 00 00 00 02 AD 72 45 DA 90 01 31 03 C7 19 02 AD 2F
           01 19 02)
      1. SYSTEM::TYPE-CALL-ERROR
      (XLIB::REPEAT-SEQ (XLIB::INT16 XLIB::X) (XLIB::INT16 XLIB::Y)
       (XLIB::CARD16 XLIB::WIDTH) (XLIB::CARD16 XLIB::HEIGHT)))
   COMMON-LISP::TYPE SYSTEM::%SET-DOCUMENTATION)
#Y(#:|36|
   #24Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 DA DD 63 2D 03 04 C5 19
        01)
   XLIB::ARC-SEQ SYSTEM::DEFTYPE-EXPANDER
   #Y(#:DEFTYPE-ARC-SEQ
      #26Y(00 00 00 00 01 00 00 00 00 02 AD 72 45 DA 90 01 31 03 C7 19 02 AD 2F
           01 19 02)
      1. SYSTEM::TYPE-CALL-ERROR
      (XLIB::REPEAT-SEQ (XLIB::INT16 XLIB::X) (XLIB::INT16 XLIB::Y)
       (XLIB::CARD16 XLIB::WIDTH) (XLIB::CARD16 XLIB::HEIGHT)
       (XLIB::ANGLE XLIB::ANGLE1) (XLIB::ANGLE XLIB::ANGLE2)))
   COMMON-LISP::TYPE SYSTEM::%SET-DOCUMENTATION)
#Y(#:|37|
   #24Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 DA DD 63 2D 03 04 C5 19
        01)
   XLIB::TIMESTAMP SYSTEM::DEFTYPE-EXPANDER
   #Y(#:DEFTYPE-TIMESTAMP
      #26Y(00 00 00 00 01 00 00 00 00 02 AD 72 45 DA 90 01 31 03 C7 19 02 AD 2F
           01 19 02)
      1. SYSTEM::TYPE-CALL-ERROR
      (COMMON-LISP::OR COMMON-LISP::NULL XLIB::CARD32))
   COMMON-LISP::TYPE SYSTEM::%SET-DOCUMENTATION)
#Y(#:|38|
   #24Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 DA DD 63 2D 03 04 C5 19
        01)
   XLIB::BIT-GRAVITY SYSTEM::DEFTYPE-EXPANDER
   #Y(#:DEFTYPE-BIT-GRAVITY
      #26Y(00 00 00 00 01 00 00 00 00 02 AD 72 45 DA 90 01 31 03 C7 19 02 AD 2F
           01 19 02)
      1. SYSTEM::TYPE-CALL-ERROR
      (COMMON-LISP::MEMBER :FORGET :NORTH-WEST :NORTH :NORTH-EAST :WEST :CENTER
       :EAST :SOUTH-WEST :SOUTH :SOUTH-EAST :STATIC))
   COMMON-LISP::TYPE SYSTEM::%SET-DOCUMENTATION)
#Y(#:|39|
   #24Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 DA DD 63 2D 03 04 C5 19
        01)
   XLIB::BOOLE-CONSTANT SYSTEM::DEFTYPE-EXPANDER
   #Y(#:DEFTYPE-BOOLE-CONSTANT
      #26Y(00 00 00 00 01 00 00 00 00 02 AD 72 45 DA 90 01 31 03 C7 19 02 AD 2F
           01 19 02)
      1. SYSTEM::TYPE-CALL-ERROR
      (COMMON-LISP::MEMBER 0. 8. 2. 10. 4. 12. 6. 14. 1. 9. 3. 11. 5. 13. 7.
       15.))
   COMMON-LISP::TYPE SYSTEM::%SET-DOCUMENTATION)
#Y(#:|40|
   #24Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 DA DD 63 2D 03 04 C5 19
        01)
   XLIB::DEVICE-EVENT-MASK SYSTEM::DEFTYPE-EXPANDER
   #Y(#:DEFTYPE-DEVICE-EVENT-MASK
      #26Y(00 00 00 00 01 00 00 00 00 02 AD 72 45 DA 90 01 31 03 C7 19 02 AD 2F
           01 19 02)
      1. SYSTEM::TYPE-CALL-ERROR
      (COMMON-LISP::OR XLIB::MASK32 COMMON-LISP::LIST))
   COMMON-LISP::TYPE SYSTEM::%SET-DOCUMENTATION)
#Y(#:|41|
   #24Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 DA DD 63 2D 03 04 C5 19
        01)
   XLIB::DEVICE-EVENT-MASK-CLASS SYSTEM::DEFTYPE-EXPANDER
   #Y(#:DEFTYPE-DEVICE-EVENT-MASK-CLASS
      #26Y(00 00 00 00 01 00 00 00 00 02 AD 72 45 DA 90 01 31 03 C7 19 02 AD 2F
           01 19 02)
      1. SYSTEM::TYPE-CALL-ERROR
      (COMMON-LISP::MEMBER :KEY-PRESS :KEY-RELEASE :BUTTON-PRESS
       :BUTTON-RELEASE :POINTER-MOTION :BUTTON-1-MOTION :BUTTON-2-MOTION
       :BUTTON-3-MOTION :BUTTON-4-MOTION :BUTTON-5-MOTION :BUTTON-MOTION))
   COMMON-LISP::TYPE SYSTEM::%SET-DOCUMENTATION)
#Y(#:|42|
   #24Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 DA DD 63 2D 03 04 C5 19
        01)
   XLIB::DRAW-DIRECTION SYSTEM::DEFTYPE-EXPANDER
   #Y(#:DEFTYPE-DRAW-DIRECTION
      #26Y(00 00 00 00 01 00 00 00 00 02 AD 72 45 DA 90 01 31 03 C7 19 02 AD 2F
           01 19 02)
      1. SYSTEM::TYPE-CALL-ERROR
      (COMMON-LISP::MEMBER :LEFT-TO-RIGHT :RIGHT-TO-LEFT))
   COMMON-LISP::TYPE SYSTEM::%SET-DOCUMENTATION)
#Y(#:|43|
   #24Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 DA DD 63 2D 03 04 C5 19
        01)
   XLIB::ERROR-KEY SYSTEM::DEFTYPE-EXPANDER
   #Y(#:DEFTYPE-ERROR-KEY
      #26Y(00 00 00 00 01 00 00 00 00 02 AD 72 45 DA 90 01 31 03 C7 19 02 AD 2F
           01 19 02)
      1. SYSTEM::TYPE-CALL-ERROR
      (COMMON-LISP::MEMBER :ACCESS :ALLOC :ATOM :COLORMAP :CURSOR :DRAWABLE
       :FONT :GCONTEXT :ID-CHOICE :ILLEGAL-REQUEST :IMPLEMENTATION :LENGTH
       :MATCH :NAME :PIXMAP :VALUE :WINDOW))
   COMMON-LISP::TYPE SYSTEM::%SET-DOCUMENTATION)
#Y(#:|44|
   #24Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 DA DD 63 2D 03 04 C5 19
        01)
   XLIB::GCONTEXT-KEY SYSTEM::DEFTYPE-EXPANDER
   #Y(#:DEFTYPE-GCONTEXT-KEY
      #26Y(00 00 00 00 01 00 00 00 00 02 AD 72 45 DA 90 01 31 03 C7 19 02 AD 2F
           01 19 02)
      1. SYSTEM::TYPE-CALL-ERROR
      (COMMON-LISP::MEMBER :FUNCTION :PLANE-MASK :FOREGROUND :BACKGROUND
       :LINE-WIDTH :LINE-STYLE :CAP-STYLE :JOIN-STYLE :FILL-STYLE :FILL-RULE
       :TILE :STIPPLE :TS-X :TS-Y :FONT :SUBWINDOW-MODE :EXPOSURES :CLIP-X
       :CLIP-Y :CLIP-MASK :DASH-OFFSET :DASHES :ARC-MODE))
   COMMON-LISP::TYPE SYSTEM::%SET-DOCUMENTATION)
#Y(#:|45|
   #24Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 DA DD 63 2D 03 04 C5 19
        01)
   XLIB::EVENT-KEY SYSTEM::DEFTYPE-EXPANDER
   #Y(#:DEFTYPE-EVENT-KEY
      #26Y(00 00 00 00 01 00 00 00 00 02 AD 72 45 DA 90 01 31 03 C7 19 02 AD 2F
           01 19 02)
      1. SYSTEM::TYPE-CALL-ERROR
      (COMMON-LISP::MEMBER :KEY-PRESS :KEY-RELEASE :BUTTON-PRESS
       :BUTTON-RELEASE :MOTION-NOTIFY :ENTER-NOTIFY :LEAVE-NOTIFY :FOCUS-IN
       :FOCUS-OUT :KEYMAP-NOTIFY :EXPOSURE :GRAPHICS-EXPOSURE :NO-EXPOSURE
       :VISIBILITY-NOTIFY :CREATE-NOTIFY :DESTROY-NOTIFY :UNMAP-NOTIFY
       :MAP-NOTIFY :MAP-REQUEST :REPARENT-NOTIFY :CONFIGURE-NOTIFY
       :GRAVITY-NOTIFY :RESIZE-REQUEST :CONFIGURE-REQUEST :CIRCULATE-NOTIFY
       :CIRCULATE-REQUEST :PROPERTY-NOTIFY :SELECTION-CLEAR :SELECTION-REQUEST
       :SELECTION-NOTIFY :COLORMAP-NOTIFY :CLIENT-MESSAGE :MAPPING-NOTIFY))
   COMMON-LISP::TYPE SYSTEM::%SET-DOCUMENTATION)
#Y(#:|46|
   #24Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 DA DD 63 2D 03 04 C5 19
        01)
   XLIB::EVENT-MASK-CLASS SYSTEM::DEFTYPE-EXPANDER
   #Y(#:DEFTYPE-EVENT-MASK-CLASS
      #26Y(00 00 00 00 01 00 00 00 00 02 AD 72 45 DA 90 01 31 03 C7 19 02 AD 2F
           01 19 02)
      1. SYSTEM::TYPE-CALL-ERROR
      (COMMON-LISP::MEMBER :KEY-PRESS :KEY-RELEASE :OWNER-GRAB-BUTTON
       :BUTTON-PRESS :BUTTON-RELEASE :ENTER-WINDOW :LEAVE-WINDOW
       :POINTER-MOTION :POINTER-MOTION-HINT :BUTTON-1-MOTION :BUTTON-2-MOTION
       :BUTTON-3-MOTION :BUTTON-4-MOTION :BUTTON-5-MOTION :BUTTON-MOTION
       :EXPOSURE :VISIBILITY-CHANGE :STRUCTURE-NOTIFY :RESIZE-REDIRECT
       :SUBSTRUCTURE-NOTIFY :SUBSTRUCTURE-REDIRECT :FOCUS-CHANGE
       :PROPERTY-CHANGE :COLORMAP-CHANGE :KEYMAP-STATE))
   COMMON-LISP::TYPE SYSTEM::%SET-DOCUMENTATION)
#Y(#:|47|
   #24Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 DA DD 63 2D 03 04 C5 19
        01)
   XLIB::EVENT-MASK SYSTEM::DEFTYPE-EXPANDER
   #Y(#:DEFTYPE-EVENT-MASK
      #26Y(00 00 00 00 01 00 00 00 00 02 AD 72 45 DA 90 01 31 03 C7 19 02 AD 2F
           01 19 02)
      1. SYSTEM::TYPE-CALL-ERROR
      (COMMON-LISP::OR XLIB::MASK32 COMMON-LISP::LIST))
   COMMON-LISP::TYPE SYSTEM::%SET-DOCUMENTATION)
#Y(#:|48|
   #24Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 DA DD 63 2D 03 04 C5 19
        01)
   XLIB::GRAB-STATUS SYSTEM::DEFTYPE-EXPANDER
   #Y(#:DEFTYPE-GRAB-STATUS
      #26Y(00 00 00 00 01 00 00 00 00 02 AD 72 45 DA 90 01 31 03 C7 19 02 AD 2F
           01 19 02)
      1. SYSTEM::TYPE-CALL-ERROR
      (COMMON-LISP::MEMBER :SUCCESS :ALREADY-GRABBED :INVALID-TIME
       :NOT-VIEWABLE))
   COMMON-LISP::TYPE SYSTEM::%SET-DOCUMENTATION)
#Y(#:|49|
   #24Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 DA DD 63 2D 03 04 C5 19
        01)
   XLIB::MODIFIER-KEY SYSTEM::DEFTYPE-EXPANDER
   #Y(#:DEFTYPE-MODIFIER-KEY
      #26Y(00 00 00 00 01 00 00 00 00 02 AD 72 45 DA 90 01 31 03 C7 19 02 AD 2F
           01 19 02)
      1. SYSTEM::TYPE-CALL-ERROR
      (COMMON-LISP::MEMBER :SHIFT :LOCK :CONTROL :MOD-1 :MOD-2 :MOD-3 :MOD-4
       :MOD-5))
   COMMON-LISP::TYPE SYSTEM::%SET-DOCUMENTATION)
#Y(#:|50|
   #24Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 DA DD 63 2D 03 04 C5 19
        01)
   XLIB::MODIFIER-MASK SYSTEM::DEFTYPE-EXPANDER
   #Y(#:DEFTYPE-MODIFIER-MASK
      #26Y(00 00 00 00 01 00 00 00 00 02 AD 72 45 DA 90 01 31 03 C7 19 02 AD 2F
           01 19 02)
      1. SYSTEM::TYPE-CALL-ERROR
      (COMMON-LISP::OR (COMMON-LISP::MEMBER :ANY) XLIB::MASK16
       COMMON-LISP::LIST))
   COMMON-LISP::TYPE SYSTEM::%SET-DOCUMENTATION)
#Y(#:|51|
   #24Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 DA DD 63 2D 03 04 C5 19
        01)
   XLIB::STATE-MASK-KEY SYSTEM::DEFTYPE-EXPANDER
   #Y(#:DEFTYPE-STATE-MASK-KEY
      #26Y(00 00 00 00 01 00 00 00 00 02 AD 72 45 DA 90 01 31 03 C7 19 02 AD 2F
           01 19 02)
      1. SYSTEM::TYPE-CALL-ERROR
      (COMMON-LISP::OR XLIB::MODIFIER-KEY
       (COMMON-LISP::MEMBER :BUTTON-1 :BUTTON-2 :BUTTON-3 :BUTTON-4
        :BUTTON-5)))
   COMMON-LISP::TYPE SYSTEM::%SET-DOCUMENTATION)
#Y(#:|52|
   #24Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 DA DD 63 2D 03 04 C5 19
        01)
   XLIB::TRANSLATION-FUNCTION SYSTEM::DEFTYPE-EXPANDER
   #Y(#:DEFTYPE-TRANSLATION-FUNCTION
      #26Y(00 00 00 00 01 00 00 00 00 02 AD 72 45 DA 90 01 31 03 C7 19 02 AD 2F
           01 19 02)
      1. SYSTEM::TYPE-CALL-ERROR
      (COMMON-LISP::FUNCTION
       (COMMON-LISP::SEQUENCE XLIB::ARRAY-INDEX XLIB::ARRAY-INDEX
        (COMMON-LISP::OR COMMON-LISP::NULL XLIB::FONT) COMMON-LISP::VECTOR
        XLIB::ARRAY-INDEX)
       (COMMON-LISP::VALUES XLIB::ARRAY-INDEX
        (COMMON-LISP::OR COMMON-LISP::NULL XLIB::INT16 XLIB::FONT)
        (COMMON-LISP::OR COMMON-LISP::NULL XLIB::INT32))))
   COMMON-LISP::TYPE SYSTEM::%SET-DOCUMENTATION)
#Y(#:|53|
   #24Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 DA DD 63 2D 03 04 C5 19
        01)
   XLIB::WIN-GRAVITY SYSTEM::DEFTYPE-EXPANDER
   #Y(#:DEFTYPE-WIN-GRAVITY
      #26Y(00 00 00 00 01 00 00 00 00 02 AD 72 45 DA 90 01 31 03 C7 19 02 AD 2F
           01 19 02)
      1. SYSTEM::TYPE-CALL-ERROR
      (COMMON-LISP::MEMBER :UNMAP :NORTH-WEST :NORTH :NORTH-EAST :WEST :CENTER
       :EAST :SOUTH-WEST :SOUTH :SOUTH-EAST :STATIC))
   COMMON-LISP::TYPE SYSTEM::%SET-DOCUMENTATION)
#Y(#:|54|
   #24Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 DA DD 63 2D 03 04 C5 19
        01)
   XLIB::XATOM SYSTEM::DEFTYPE-EXPANDER
   #Y(#:DEFTYPE-XATOM
      #26Y(00 00 00 00 01 00 00 00 00 02 AD 72 45 DA 90 01 31 03 C7 19 02 AD 2F
           01 19 02)
      1. SYSTEM::TYPE-CALL-ERROR
      (COMMON-LISP::OR COMMON-LISP::STRING COMMON-LISP::SYMBOL))
   COMMON-LISP::TYPE SYSTEM::%SET-DOCUMENTATION)
#Y(#:|55|
   #24Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 DA DD 63 2D 03 04 C5 19
        01)
   XLIB::POINTER-EVENT-MASK-CLASS SYSTEM::DEFTYPE-EXPANDER
   #Y(#:DEFTYPE-POINTER-EVENT-MASK-CLASS
      #26Y(00 00 00 00 01 00 00 00 00 02 AD 72 45 DA 90 01 31 03 C7 19 02 AD 2F
           01 19 02)
      1. SYSTEM::TYPE-CALL-ERROR
      (COMMON-LISP::MEMBER :BUTTON-PRESS :BUTTON-RELEASE :ENTER-WINDOW
       :LEAVE-WINDOW :POINTER-MOTION :POINTER-MOTION-HINT :BUTTON-1-MOTION
       :BUTTON-2-MOTION :BUTTON-3-MOTION :BUTTON-4-MOTION :BUTTON-5-MOTION
       :BUTTON-MOTION :KEYMAP-STATE))
   COMMON-LISP::TYPE SYSTEM::%SET-DOCUMENTATION)
#Y(#:|56|
   #24Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 32 86 DA DD 63 2D 03 04 C5 19
        01)
   XLIB::POINTER-EVENT-MASK SYSTEM::DEFTYPE-EXPANDER
   #Y(#:DEFTYPE-POINTER-EVENT-MASK
      #26Y(00 00 00 00 01 00 00 00 00 02 AD 72 45 DA 90 01 31 03 C7 19 02 AD 2F
           01 19 02)
      1. SYSTEM::TYPE-CALL-ERROR
      (COMMON-LISP::OR XLIB::MASK32 COMMON-LISP::LIST))
   COMMON-LISP::TYPE SYSTEM::%SET-DOCUMENTATION)
#Y(#:|57|
   #270Y(00 00 00 00 00 00 00 00 00 01 00 2B 01 DA DB DC 38 01 72 82 C8 5F 5D
         0B 00 00 DE 2F 05 DE AD 6D 06 01 32 80 DA DC 68 02 00 64 DE E1 73 04
         00 32 86 16 01 DA 2F 08 E3 31 59 E4 2F 05 E4 E5 E6 32 86 E4 E7 32 80
         E8 31 59 E9 2F 05 E9 E5 EA 32 86 E9 EB 32 80 EC 31 59 ED 31 59 EE 2F
         05 EE E5 EF 32 86 EE F0 32 80 EE F1 DA 32 86 F2 31 59 F3 31 59 F4 2F
         05 F4 E5 F5 32 86 F4 F6 32 80 F4 F1 DA 32 86 F7 31 59 65 1E 31 59 65
         1F 2F 05 65 1F E5 65 20 32 86 65 1F 65 21 32 80 65 1F F1 DA 32 86 EE
         65 22 32 87 EE 65 23 65 24 65 25 03 26 7C 02 32 86 EE 65 27 63 2D 03
         28 EE 65 22 DA 32 86 F4 65 22 32 87 F4 65 23 65 24 65 25 03 29 7C 02
         32 86 F4 65 27 63 2D 03 28 F4 65 22 DA 32 86 65 1F 65 22 32 87 65 1F
         65 23 65 24 65 25 03 2A 7C 02 32 86 65 1F 65 27 63 2D 03 28 65 1F 65
         22 DA 32 86 DA 65 2B 63 2D 03 28 DA 2F 2C C5 19 01)
   XLIB::BITMAP-FORMAT COMMON-LISP::STRUCTURE-OBJECT
   SYSTEM::DEFSTRUCT-DESCRIPTION 0. XLIB::MAKE-BITMAP-FORMAT
   SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::MAKE-BITMAP-FORMAT
      #47Y(00 00 00 00 00 00 00 00 80 1B 03 00 01 00 3D 03 3D 02 3D 01 69 00 01
           DE 72 2E DF AD E0 B3 32 2D DF AD E1 B2 32 2D DF AD E2 B1 32 2D 15 19
           04)
      COMMON-LISP::NIL :UNIT :PAD :LSB-FIRST-P 4. XLIB::BITMAP-FORMAT 1. 2. 3.)
   (#(XLIB::UNIT (:UNIT) 1. (COMMON-LISP::NIL) COMMON-LISP::NIL COMMON-LISP::T
      COMMON-LISP::NIL)
    #(XLIB::PAD (:PAD) 2. (COMMON-LISP::NIL) COMMON-LISP::NIL COMMON-LISP::T
      COMMON-LISP::NIL)
    #(XLIB::LSB-FIRST-P (:LSB-FIRST-P) 3. (COMMON-LISP::NIL) COMMON-LISP::NIL
      COMMON-LISP::T COMMON-LISP::NIL))
   CLOS::DEFINE-STRUCTURE-CLASS (COMMON-LISP::INLINE XLIB::BITMAP-FORMAT-P)
   XLIB::BITMAP-FORMAT-P SYSTEM::INLINE-EXPANSION
   ((SYSTEM::OBJECT)
    (COMMON-LISP::DECLARE (SYSTEM::IN-DEFUN XLIB::BITMAP-FORMAT-P))
    (COMMON-LISP::BLOCK XLIB::BITMAP-FORMAT-P
     (SYSTEM::%STRUCTURE-TYPE-P 'XLIB::BITMAP-FORMAT SYSTEM::OBJECT)))
   #Y(XLIB::BITMAP-FORMAT-P
      #16Y(00 00 00 00 01 00 00 00 00 02 DA AE 32 30 19 02)
      XLIB::BITMAP-FORMAT)
   (COMMON-LISP::INLINE XLIB::COPY-BITMAP-FORMAT) XLIB::COPY-BITMAP-FORMAT
   ((COMMON-LISP::STRUCTURE)
    (COMMON-LISP::DECLARE (SYSTEM::IN-DEFUN XLIB::COPY-BITMAP-FORMAT))
    (COMMON-LISP::BLOCK XLIB::COPY-BITMAP-FORMAT
     (COMMON-LISP::COPY-STRUCTURE COMMON-LISP::STRUCTURE)))
   #Y(XLIB::COPY-BITMAP-FORMAT
      #15Y(00 00 00 00 01 00 00 00 00 02 AD 32 2F 19 02))
   (COMMON-LISP::FUNCTION XLIB::BITMAP-FORMAT-UNIT (XLIB::BITMAP-FORMAT)
    COMMON-LISP::T)
   (COMMON-LISP::INLINE XLIB::BITMAP-FORMAT-UNIT) XLIB::BITMAP-FORMAT-UNIT
   (#1=(SYSTEM::OBJECT)
    (COMMON-LISP::DECLARE (SYSTEM::IN-DEFUN XLIB::BITMAP-FORMAT-UNIT))
    (COMMON-LISP::BLOCK XLIB::BITMAP-FORMAT-UNIT
     (COMMON-LISP::THE COMMON-LISP::T
      (SYSTEM::%STRUCTURE-REF 'XLIB::BITMAP-FORMAT SYSTEM::OBJECT 1.))))
   #Y(XLIB::BITMAP-FORMAT-UNIT
      #17Y(00 00 00 00 01 00 00 00 00 02 DA AE DB 32 2C 19 02)
      XLIB::BITMAP-FORMAT 1.)
   SYSTEM::DEFSTRUCT-READER
   (COMMON-LISP::FUNCTION XLIB::BITMAP-FORMAT-PAD (XLIB::BITMAP-FORMAT)
    COMMON-LISP::T)
   (COMMON-LISP::INLINE XLIB::BITMAP-FORMAT-PAD) XLIB::BITMAP-FORMAT-PAD
   (#1# (COMMON-LISP::DECLARE (SYSTEM::IN-DEFUN XLIB::BITMAP-FORMAT-PAD))
    (COMMON-LISP::BLOCK XLIB::BITMAP-FORMAT-PAD
     (COMMON-LISP::THE COMMON-LISP::T
      (SYSTEM::%STRUCTURE-REF 'XLIB::BITMAP-FORMAT SYSTEM::OBJECT 2.))))
   #Y(XLIB::BITMAP-FORMAT-PAD
      #17Y(00 00 00 00 01 00 00 00 00 02 DA AE DB 32 2C 19 02)
      XLIB::BITMAP-FORMAT 2.)
   (COMMON-LISP::FUNCTION XLIB::BITMAP-FORMAT-LSB-FIRST-P (XLIB::BITMAP-FORMAT)
    COMMON-LISP::T)
   (COMMON-LISP::INLINE XLIB::BITMAP-FORMAT-LSB-FIRST-P)
   XLIB::BITMAP-FORMAT-LSB-FIRST-P
   (#1#
    (COMMON-LISP::DECLARE (SYSTEM::IN-DEFUN XLIB::BITMAP-FORMAT-LSB-FIRST-P))
    (COMMON-LISP::BLOCK XLIB::BITMAP-FORMAT-LSB-FIRST-P
     (COMMON-LISP::THE COMMON-LISP::T
      (SYSTEM::%STRUCTURE-REF 'XLIB::BITMAP-FORMAT SYSTEM::OBJECT 3.))))
   #Y(XLIB::BITMAP-FORMAT-LSB-FIRST-P
      #17Y(00 00 00 00 01 00 00 00 00 02 DA AE DB 32 2C 19 02)
      XLIB::BITMAP-FORMAT 3.)
   SYSTEM::DEFSTRUCT-WRITER SYSTEM::SETF-EXPANDER -1. 1.
   #Y(XLIB::SETF-BITMAP-FORMAT-UNIT
      #22Y(00 00 00 00 02 00 00 00 00 03 9F 5C 78 DA DB AE DC B2 61 05 19 04)
      SYSTEM::%STRUCTURE-STORE 'XLIB::BITMAP-FORMAT 1.)
   COMMON-LISP::SETF SYSTEM::%SET-DOCUMENTATION
   #Y(XLIB::SETF-BITMAP-FORMAT-PAD
      #22Y(00 00 00 00 02 00 00 00 00 03 9F 5C 78 DA DB AE DC B2 61 05 19 04)
      SYSTEM::%STRUCTURE-STORE 'XLIB::BITMAP-FORMAT 2.)
   #Y(XLIB::SETF-BITMAP-FORMAT-LSB-FIRST-P
      #22Y(00 00 00 00 02 00 00 00 00 03 9F 5C 78 DA DB AE DC B2 61 05 19 04)
      SYSTEM::%STRUCTURE-STORE 'XLIB::BITMAP-FORMAT 3.)
   COMMON-LISP::STRUCTURE CLOS::DEFSTRUCT-REMOVE-PRINT-OBJECT-METHOD)
#Y(#:|58|
   #270Y(00 00 00 00 00 00 00 00 00 01 00 2B 01 DA DB DC 38 01 72 82 C8 5F 5D
         0B 00 00 DE 2F 05 DE AD 6D 06 01 32 80 DA DC 68 02 00 64 DE E1 73 04
         00 32 86 16 01 DA 2F 08 E3 31 59 E4 2F 05 E4 E5 E6 32 86 E4 E7 32 80
         E8 31 59 E9 2F 05 E9 E5 EA 32 86 E9 EB 32 80 EC 31 59 ED 31 59 EE 2F
         05 EE E5 EF 32 86 EE F0 32 80 EE F1 DA 32 86 F2 31 59 F3 31 59 F4 2F
         05 F4 E5 F5 32 86 F4 F6 32 80 F4 F1 DA 32 86 F7 31 59 65 1E 31 59 65
         1F 2F 05 65 1F E5 65 20 32 86 65 1F 65 21 32 80 65 1F F1 DA 32 86 EE
         65 22 32 87 EE 65 23 65 24 65 25 03 26 7C 02 32 86 EE 65 27 63 2D 03
         28 EE 65 22 DA 32 86 F4 65 22 32 87 F4 65 23 65 24 65 25 03 29 7C 02
         32 86 F4 65 27 63 2D 03 28 F4 65 22 DA 32 86 65 1F 65 22 32 87 65 1F
         65 23 65 24 65 25 03 2A 7C 02 32 86 65 1F 65 27 63 2D 03 28 65 1F 65
         22 DA 32 86 DA 65 2B 63 2D 03 28 DA 2F 2C C5 19 01)
   XLIB::PIXMAP-FORMAT COMMON-LISP::STRUCTURE-OBJECT
   SYSTEM::DEFSTRUCT-DESCRIPTION 0. XLIB::MAKE-PIXMAP-FORMAT
   SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::MAKE-PIXMAP-FORMAT
      #47Y(00 00 00 00 00 00 00 00 80 1B 03 00 01 00 3D 03 3D 02 3D 01 69 00 01
           DE 72 2E DF AD E0 B3 32 2D DF AD E1 B2 32 2D DF AD E2 B1 32 2D 15 19
           04)
      COMMON-LISP::NIL :DEPTH :BITS-PER-PIXEL :SCANLINE-PAD 4.
      XLIB::PIXMAP-FORMAT 1. 2. 3.)
   (#(XLIB::DEPTH (:DEPTH) 1. (COMMON-LISP::NIL) COMMON-LISP::NIL
      COMMON-LISP::T COMMON-LISP::NIL)
    #(XLIB::BITS-PER-PIXEL (:BITS-PER-PIXEL) 2. (COMMON-LISP::NIL)
      COMMON-LISP::NIL COMMON-LISP::T COMMON-LISP::NIL)
    #(XLIB::SCANLINE-PAD (:SCANLINE-PAD) 3. (COMMON-LISP::NIL) COMMON-LISP::NIL
      COMMON-LISP::T COMMON-LISP::NIL))
   CLOS::DEFINE-STRUCTURE-CLASS (COMMON-LISP::INLINE XLIB::PIXMAP-FORMAT-P)
   XLIB::PIXMAP-FORMAT-P SYSTEM::INLINE-EXPANSION
   ((SYSTEM::OBJECT)
    (COMMON-LISP::DECLARE (SYSTEM::IN-DEFUN XLIB::PIXMAP-FORMAT-P))
    (COMMON-LISP::BLOCK XLIB::PIXMAP-FORMAT-P
     (SYSTEM::%STRUCTURE-TYPE-P 'XLIB::PIXMAP-FORMAT SYSTEM::OBJECT)))
   #Y(XLIB::PIXMAP-FORMAT-P
      #16Y(00 00 00 00 01 00 00 00 00 02 DA AE 32 30 19 02)
      XLIB::PIXMAP-FORMAT)
   (COMMON-LISP::INLINE XLIB::COPY-PIXMAP-FORMAT) XLIB::COPY-PIXMAP-FORMAT
   ((COMMON-LISP::STRUCTURE)
    (COMMON-LISP::DECLARE (SYSTEM::IN-DEFUN XLIB::COPY-PIXMAP-FORMAT))
    (COMMON-LISP::BLOCK XLIB::COPY-PIXMAP-FORMAT
     (COMMON-LISP::COPY-STRUCTURE COMMON-LISP::STRUCTURE)))
   #Y(XLIB::COPY-PIXMAP-FORMAT
      #15Y(00 00 00 00 01 00 00 00 00 02 AD 32 2F 19 02))
   (COMMON-LISP::FUNCTION XLIB::PIXMAP-FORMAT-DEPTH (XLIB::PIXMAP-FORMAT)
    COMMON-LISP::T)
   (COMMON-LISP::INLINE XLIB::PIXMAP-FORMAT-DEPTH) XLIB::PIXMAP-FORMAT-DEPTH
   (#1=(SYSTEM::OBJECT)
    (COMMON-LISP::DECLARE (SYSTEM::IN-DEFUN XLIB::PIXMAP-FORMAT-DEPTH))
    (COMMON-LISP::BLOCK XLIB::PIXMAP-FORMAT-DEPTH
     (COMMON-LISP::THE COMMON-LISP::T
      (SYSTEM::%STRUCTURE-REF 'XLIB::PIXMAP-FORMAT SYSTEM::OBJECT 1.))))
   #Y(XLIB::PIXMAP-FORMAT-DEPTH
      #17Y(00 00 00 00 01 00 00 00 00 02 DA AE DB 32 2C 19 02)
      XLIB::PIXMAP-FORMAT 1.)
   SYSTEM::DEFSTRUCT-READER
   (COMMON-LISP::FUNCTION XLIB::PIXMAP-FORMAT-BITS-PER-PIXEL
    (XLIB::PIXMAP-FORMAT) COMMON-LISP::T)
   (COMMON-LISP::INLINE XLIB::PIXMAP-FORMAT-BITS-PER-PIXEL)
   XLIB::PIXMAP-FORMAT-BITS-PER-PIXEL
   (#1#
    (COMMON-LISP::DECLARE
     (SYSTEM::IN-DEFUN XLIB::PIXMAP-FORMAT-BITS-PER-PIXEL))
    (COMMON-LISP::BLOCK XLIB::PIXMAP-FORMAT-BITS-PER-PIXEL
     (COMMON-LISP::THE COMMON-LISP::T
      (SYSTEM::%STRUCTURE-REF 'XLIB::PIXMAP-FORMAT SYSTEM::OBJECT 2.))))
   #Y(XLIB::PIXMAP-FORMAT-BITS-PER-PIXEL
      #17Y(00 00 00 00 01 00 00 00 00 02 DA AE DB 32 2C 19 02)
      XLIB::PIXMAP-FORMAT 2.)
   (COMMON-LISP::FUNCTION XLIB::PIXMAP-FORMAT-SCANLINE-PAD
    (XLIB::PIXMAP-FORMAT) COMMON-LISP::T)
   (COMMON-LISP::INLINE XLIB::PIXMAP-FORMAT-SCANLINE-PAD)
   XLIB::PIXMAP-FORMAT-SCANLINE-PAD
   (#1#
    (COMMON-LISP::DECLARE (SYSTEM::IN-DEFUN XLIB::PIXMAP-FORMAT-SCANLINE-PAD))
    (COMMON-LISP::BLOCK XLIB::PIXMAP-FORMAT-SCANLINE-PAD
     (COMMON-LISP::THE COMMON-LISP::T
      (SYSTEM::%STRUCTURE-REF 'XLIB::PIXMAP-FORMAT SYSTEM::OBJECT 3.))))
   #Y(XLIB::PIXMAP-FORMAT-SCANLINE-PAD
      #17Y(00 00 00 00 01 00 00 00 00 02 DA AE DB 32 2C 19 02)
      XLIB::PIXMAP-FORMAT 3.)
   SYSTEM::DEFSTRUCT-WRITER SYSTEM::SETF-EXPANDER -1. 1.
   #Y(XLIB::SETF-PIXMAP-FORMAT-DEPTH
      #22Y(00 00 00 00 02 00 00 00 00 03 9F 5C 78 DA DB AE DC B2 61 05 19 04)
      SYSTEM::%STRUCTURE-STORE 'XLIB::PIXMAP-FORMAT 1.)
   COMMON-LISP::SETF SYSTEM::%SET-DOCUMENTATION
   #Y(XLIB::SETF-PIXMAP-FORMAT-BITS-PER-PIXEL
      #22Y(00 00 00 00 02 00 00 00 00 03 9F 5C 78 DA DB AE DC B2 61 05 19 04)
      SYSTEM::%STRUCTURE-STORE 'XLIB::PIXMAP-FORMAT 2.)
   #Y(XLIB::SETF-PIXMAP-FORMAT-SCANLINE-PAD
      #22Y(00 00 00 00 02 00 00 00 00 03 9F 5C 78 DA DB AE DC B2 61 05 19 04)
      SYSTEM::%STRUCTURE-STORE 'XLIB::PIXMAP-FORMAT 3.)
   COMMON-LISP::STRUCTURE CLOS::DEFSTRUCT-REMOVE-PRINT-OBJECT-METHOD)
#Y(#:|59|
   #276Y(00 00 00 00 00 00 00 00 00 01 00 2B 01 DA DB DC 38 01 72 82 C8 5F 5D
         0B 00 00 DE 2F 05 DE AD 6D 06 01 32 80 DA DC 68 02 00 64 63 E1 73 04
         00 32 86 16 01 DA 2F 08 E3 31 59 E4 2F 05 E4 E5 E6 32 86 E4 E7 32 80
         E8 31 59 E9 31 59 EA 2F 05 EA E5 EB 32 86 EA EC 32 80 EA ED DA 32 86
         EE 31 59 EF 31 59 F0 2F 05 F0 E5 F1 32 86 F0 F2 32 80 F0 ED DA 32 86
         F3 31 59 F4 31 59 F5 2F 05 F5 E5 F6 32 86 F5 F7 32 80 F5 ED DA 32 86
         EA 65 1E 32 87 EA 65 1F 65 20 65 21 03 22 7C 02 32 86 EA 65 23 63 2D
         03 24 EA 65 1E DA 32 86 F0 65 1E 32 87 F0 65 1F 65 20 65 21 03 25 7C
         02 32 86 F0 65 23 63 2D 03 24 F0 65 1E DA 32 86 F5 65 1E 32 87 F5 65
         1F 65 20 65 21 03 26 7C 02 32 86 F5 65 23 63 2D 03 24 F5 65 1E DA 32
         86 DA 65 27 63 2D 03 24 65 28 65 29 65 2A 65 2B 64 65 2C DA 38 02 72
         27 64 38 02 72 27 7B 02 65 2D 63 65 2E 65 2F 6E 0A 30 30 31 C5 19 01)
   XLIB::COLOR COMMON-LISP::STRUCTURE-OBJECT SYSTEM::DEFSTRUCT-DESCRIPTION 0.
   XLIB::MAKE-COLOR-INTERNAL SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::MAKE-COLOR-INTERNAL
      #37Y(00 00 00 00 03 00 00 00 00 04 69 00 01 DB 72 2E DC AD DD B3 32 2D DC
           AD DE B2 32 2D DC AD DF B1 32 2D 15 19 04)
      COMMON-LISP::NIL 4. XLIB::COLOR 1. 2. 3.)
   (#(XLIB::RED (:RED) 1. (COMMON-LISP::NIL . 0.0s0) 0.0s0 XLIB::RGB-VAL
      COMMON-LISP::NIL)
    #(XLIB::GREEN (:GREEN) 2. (COMMON-LISP::NIL . 0.0s0) 0.0s0 XLIB::RGB-VAL
      COMMON-LISP::NIL)
    #(XLIB::BLUE (:BLUE) 3. (COMMON-LISP::NIL . 0.0s0) 0.0s0 XLIB::RGB-VAL
      COMMON-LISP::NIL))
   CLOS::DEFINE-STRUCTURE-CLASS (COMMON-LISP::INLINE XLIB::COLOR-P)
   XLIB::COLOR-P SYSTEM::INLINE-EXPANSION
   ((SYSTEM::OBJECT) (COMMON-LISP::DECLARE (SYSTEM::IN-DEFUN XLIB::COLOR-P))
    (COMMON-LISP::BLOCK XLIB::COLOR-P
     (SYSTEM::%STRUCTURE-TYPE-P 'XLIB::COLOR SYSTEM::OBJECT)))
   #Y(XLIB::COLOR-P #16Y(00 00 00 00 01 00 00 00 00 02 DA AE 32 30 19 02)
      XLIB::COLOR)
   (COMMON-LISP::FUNCTION XLIB::COLOR-RED (XLIB::COLOR) XLIB::RGB-VAL)
   (COMMON-LISP::INLINE XLIB::COLOR-RED) XLIB::COLOR-RED
   (#1=(SYSTEM::OBJECT)
    (COMMON-LISP::DECLARE (SYSTEM::IN-DEFUN XLIB::COLOR-RED))
    (COMMON-LISP::BLOCK XLIB::COLOR-RED
     (COMMON-LISP::THE XLIB::RGB-VAL
      (SYSTEM::%STRUCTURE-REF 'XLIB::COLOR SYSTEM::OBJECT 1.))))
   #Y(XLIB::COLOR-RED #17Y(00 00 00 00 01 00 00 00 00 02 DA AE DB 32 2C 19 02)
      XLIB::COLOR 1.)
   SYSTEM::DEFSTRUCT-READER
   (COMMON-LISP::FUNCTION XLIB::COLOR-GREEN (XLIB::COLOR) XLIB::RGB-VAL)
   (COMMON-LISP::INLINE XLIB::COLOR-GREEN) XLIB::COLOR-GREEN
   (#1# (COMMON-LISP::DECLARE (SYSTEM::IN-DEFUN XLIB::COLOR-GREEN))
    (COMMON-LISP::BLOCK XLIB::COLOR-GREEN
     (COMMON-LISP::THE XLIB::RGB-VAL
      (SYSTEM::%STRUCTURE-REF 'XLIB::COLOR SYSTEM::OBJECT 2.))))
   #Y(XLIB::COLOR-GREEN
      #17Y(00 00 00 00 01 00 00 00 00 02 DA AE DB 32 2C 19 02) XLIB::COLOR 2.)
   (COMMON-LISP::FUNCTION XLIB::COLOR-BLUE (XLIB::COLOR) XLIB::RGB-VAL)
   (COMMON-LISP::INLINE XLIB::COLOR-BLUE) XLIB::COLOR-BLUE
   (#1# (COMMON-LISP::DECLARE (SYSTEM::IN-DEFUN XLIB::COLOR-BLUE))
    (COMMON-LISP::BLOCK XLIB::COLOR-BLUE
     (COMMON-LISP::THE XLIB::RGB-VAL
      (SYSTEM::%STRUCTURE-REF 'XLIB::COLOR SYSTEM::OBJECT 3.))))
   #Y(XLIB::COLOR-BLUE #17Y(00 00 00 00 01 00 00 00 00 02 DA AE DB 32 2C 19 02)
      XLIB::COLOR 3.)
   SYSTEM::DEFSTRUCT-WRITER SYSTEM::SETF-EXPANDER -1. 1.
   #Y(XLIB::SETF-COLOR-RED
      #26Y(00 00 00 00 02 00 00 00 00 03 9F 5C 78 DA DB AE DC DD DE B4 7B 03 61
           05 19 04)
      SYSTEM::%STRUCTURE-STORE 'XLIB::COLOR 1. COMMON-LISP::THE XLIB::RGB-VAL)
   COMMON-LISP::SETF SYSTEM::%SET-DOCUMENTATION
   #Y(XLIB::SETF-COLOR-GREEN
      #26Y(00 00 00 00 02 00 00 00 00 03 9F 5C 78 DA DB AE DC DD DE B4 7B 03 61
           05 19 04)
      SYSTEM::%STRUCTURE-STORE 'XLIB::COLOR 2. COMMON-LISP::THE XLIB::RGB-VAL)
   #Y(XLIB::SETF-COLOR-BLUE
      #26Y(00 00 00 00 02 00 00 00 00 03 9F 5C 78 DA DB AE DC DD DE B4 7B 03 61
           05 19 04)
      SYSTEM::%STRUCTURE-STORE 'XLIB::COLOR 3. COMMON-LISP::THE XLIB::RGB-VAL)
   COMMON-LISP::STRUCTURE CLOS::PRINT-OBJECT :INITFUNCTION
   #Y(#:|1| #15Y(00 00 00 00 01 00 00 00 00 02 DA C6 5D 19 02)
      #Y(#:|1| #19Y(00 00 00 00 02 00 00 00 00 03 AE AE 6B 00 2D 03 01 19 03)
         SYSTEM::*PRIN-LEVEL* XLIB::PRINT-COLOR)
      (COMMON-LISP::T))
   :WANTS-NEXT-METHOD-P :PARAMETER-SPECIALIZERS :QUALIFIERS :SIGNATURE
   #S(SYSTEM::SIGNATURE :REQ-NUM 2. :OPT-NUM 0. :REST-P COMMON-LISP::NIL
      :KEYS-P COMMON-LISP::NIL :KEYWORDS COMMON-LISP::NIL
      :ALLOW-P COMMON-LISP::NIL)
   CLOS::MAKE-STANDARD-METHOD CLOS::DO-DEFMETHOD)
#Y(#:|60|
   #508Y(00 00 00 00 00 00 00 00 00 01 00 2B 01 DA DB DC 38 01 72 82 C8 5F 5D
         0B 00 00 DE 2F 05 DE AD 6D 06 01 32 80 DA DC 68 02 00 64 DE E1 73 04
         00 32 86 16 01 DA 2F 08 E3 31 59 E4 2F 05 E4 E5 E6 32 86 E4 E7 32 80
         E8 31 59 E9 31 59 EA 2F 05 EA E5 EB 32 86 EA EC 32 80 EA ED DA 32 86
         EE 31 59 EF 31 59 F0 2F 05 F0 E5 F1 32 86 F0 F2 32 80 F0 ED DA 32 86
         F3 31 59 F4 31 59 F5 2F 05 F5 E5 F6 32 86 F5 F7 32 80 F5 ED DA 32 86
         65 1E 31 59 65 1F 31 59 65 20 2F 05 65 20 E5 65 21 32 86 65 20 65 22
         32 80 65 20 ED DA 32 86 65 23 31 59 65 24 31 59 65 25 2F 05 65 25 E5
         65 26 32 86 65 25 65 27 32 80 65 25 ED DA 32 86 65 28 31 59 65 29 31
         59 65 2A 2F 05 65 2A E5 65 2B 32 86 65 2A 65 2C 32 80 65 2A ED DA 32
         86 65 2D 31 59 65 2E 31 59 65 2F 2F 05 65 2F E5 65 30 32 86 65 2F 65
         31 32 80 65 2F ED DA 32 86 EA 65 32 32 87 EA 65 33 65 34 65 35 03 36
         7C 02 32 86 EA 65 37 63 2D 03 38 EA 65 32 DA 32 86 F0 65 32 32 87 F0
         65 33 65 34 65 35 03 39 7C 02 32 86 F0 65 37 63 2D 03 38 F0 65 32 DA
         32 86 F5 65 32 32 87 F5 65 33 65 34 65 35 03 3A 7C 02 32 86 F5 65 37
         63 2D 03 38 F5 65 32 DA 32 86 65 20 65 32 32 87 65 20 65 33 65 34 65
         35 03 3B 7C 02 32 86 65 20 65 37 63 2D 03 38 65 20 65 32 DA 32 86 65
         25 65 32 32 87 65 25 65 33 65 34 65 35 03 3C 7C 02 32 86 65 25 65 37
         63 2D 03 38 65 25 65 32 DA 32 86 65 2A 65 32 32 87 65 2A 65 33 65 34
         65 35 03 3D 7C 02 32 86 65 2A 65 37 63 2D 03 38 65 2A 65 32 DA 32 86
         65 2F 65 32 32 87 65 2F 65 33 65 34 65 35 03 3E 7C 02 32 86 65 2F 65
         37 63 2D 03 38 65 2F 65 32 DA 32 86 DA 65 3F 63 2D 03 38 DA 2F 40 C5
         19 01)
   XLIB::VISUAL-INFO COMMON-LISP::STRUCTURE-OBJECT
   SYSTEM::DEFSTRUCT-DESCRIPTION 0. XLIB::MAKE-VISUAL-INFO
   SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::MAKE-VISUAL-INFO
      #79Y(00 00 00 00 00 00 00 00 80 1B 07 00 01 00 3D 07 3D 06 3D 05 3D 04 3D
           03 3D 02 3D 01 69 00 01 E2 72 2E E3 AD E4 B7 32 2D E3 AD E5 B6 32 2D
           E3 AD E6 B5 32 2D E3 AD E7 B4 32 2D E3 AD E8 B3 32 2D E3 AD E9 B2 32
           2D E3 AD EA B1 32 2D 15 19 08)
      COMMON-LISP::NIL :ID :CLASS :RED-MASK :GREEN-MASK :BLUE-MASK
      :BITS-PER-RGB :COLORMAP-ENTRIES 8. XLIB::VISUAL-INFO 1. 2. 3. 4. 5. 6.
      7.)
   (#(XLIB::ID (:ID) 1. (COMMON-LISP::NIL) COMMON-LISP::NIL COMMON-LISP::T
      COMMON-LISP::NIL)
    #(CLOS::CLASS (:CLASS) 2. (COMMON-LISP::NIL) COMMON-LISP::NIL
      COMMON-LISP::T COMMON-LISP::NIL)
    #(XLIB::RED-MASK (:RED-MASK) 3. (COMMON-LISP::NIL) COMMON-LISP::NIL
      COMMON-LISP::T COMMON-LISP::NIL)
    #(XLIB::GREEN-MASK (:GREEN-MASK) 4. (COMMON-LISP::NIL) COMMON-LISP::NIL
      COMMON-LISP::T COMMON-LISP::NIL)
    #(XLIB::BLUE-MASK (:BLUE-MASK) 5. (COMMON-LISP::NIL) COMMON-LISP::NIL
      COMMON-LISP::T COMMON-LISP::NIL)
    #(XLIB::BITS-PER-RGB (:BITS-PER-RGB) 6. (COMMON-LISP::NIL) COMMON-LISP::NIL
      COMMON-LISP::T COMMON-LISP::NIL)
    #(XLIB::COLORMAP-ENTRIES (:COLORMAP-ENTRIES) 7. (COMMON-LISP::NIL)
      COMMON-LISP::NIL COMMON-LISP::T COMMON-LISP::NIL))
   CLOS::DEFINE-STRUCTURE-CLASS (COMMON-LISP::INLINE XLIB::VISUAL-INFO-P)
   XLIB::VISUAL-INFO-P SYSTEM::INLINE-EXPANSION
   ((SYSTEM::OBJECT)
    (COMMON-LISP::DECLARE (SYSTEM::IN-DEFUN XLIB::VISUAL-INFO-P))
    (COMMON-LISP::BLOCK XLIB::VISUAL-INFO-P
     (SYSTEM::%STRUCTURE-TYPE-P 'XLIB::VISUAL-INFO SYSTEM::OBJECT)))
   #Y(XLIB::VISUAL-INFO-P #16Y(00 00 00 00 01 00 00 00 00 02 DA AE 32 30 19 02)
      XLIB::VISUAL-INFO)
   (COMMON-LISP::FUNCTION XLIB::VISUAL-INFO-ID (XLIB::VISUAL-INFO)
    COMMON-LISP::T)
   (COMMON-LISP::INLINE XLIB::VISUAL-INFO-ID) XLIB::VISUAL-INFO-ID
   (#1=(SYSTEM::OBJECT)
    (COMMON-LISP::DECLARE (SYSTEM::IN-DEFUN XLIB::VISUAL-INFO-ID))
    (COMMON-LISP::BLOCK XLIB::VISUAL-INFO-ID
     (COMMON-LISP::THE COMMON-LISP::T
      (SYSTEM::%STRUCTURE-REF 'XLIB::VISUAL-INFO SYSTEM::OBJECT 1.))))
   #Y(XLIB::VISUAL-INFO-ID
      #17Y(00 00 00 00 01 00 00 00 00 02 DA AE DB 32 2C 19 02)
      XLIB::VISUAL-INFO 1.)
   SYSTEM::DEFSTRUCT-READER
   (COMMON-LISP::FUNCTION XLIB::VISUAL-INFO-CLASS (XLIB::VISUAL-INFO)
    COMMON-LISP::T)
   (COMMON-LISP::INLINE XLIB::VISUAL-INFO-CLASS) XLIB::VISUAL-INFO-CLASS
   (#1# (COMMON-LISP::DECLARE (SYSTEM::IN-DEFUN XLIB::VISUAL-INFO-CLASS))
    (COMMON-LISP::BLOCK XLIB::VISUAL-INFO-CLASS
     (COMMON-LISP::THE COMMON-LISP::T
      (SYSTEM::%STRUCTURE-REF 'XLIB::VISUAL-INFO SYSTEM::OBJECT 2.))))
   #Y(XLIB::VISUAL-INFO-CLASS
      #17Y(00 00 00 00 01 00 00 00 00 02 DA AE DB 32 2C 19 02)
      XLIB::VISUAL-INFO 2.)
   (COMMON-LISP::FUNCTION XLIB::VISUAL-INFO-RED-MASK (XLIB::VISUAL-INFO)
    COMMON-LISP::T)
   (COMMON-LISP::INLINE XLIB::VISUAL-INFO-RED-MASK) XLIB::VISUAL-INFO-RED-MASK
   (#1# (COMMON-LISP::DECLARE (SYSTEM::IN-DEFUN XLIB::VISUAL-INFO-RED-MASK))
    (COMMON-LISP::BLOCK XLIB::VISUAL-INFO-RED-MASK
     (COMMON-LISP::THE COMMON-LISP::T
      (SYSTEM::%STRUCTURE-REF 'XLIB::VISUAL-INFO SYSTEM::OBJECT 3.))))
   #Y(XLIB::VISUAL-INFO-RED-MASK
      #17Y(00 00 00 00 01 00 00 00 00 02 DA AE DB 32 2C 19 02)
      XLIB::VISUAL-INFO 3.)
   (COMMON-LISP::FUNCTION XLIB::VISUAL-INFO-GREEN-MASK (XLIB::VISUAL-INFO)
    COMMON-LISP::T)
   (COMMON-LISP::INLINE XLIB::VISUAL-INFO-GREEN-MASK)
   XLIB::VISUAL-INFO-GREEN-MASK
   (#1# (COMMON-LISP::DECLARE (SYSTEM::IN-DEFUN XLIB::VISUAL-INFO-GREEN-MASK))
    (COMMON-LISP::BLOCK XLIB::VISUAL-INFO-GREEN-MASK
     (COMMON-LISP::THE COMMON-LISP::T
      (SYSTEM::%STRUCTURE-REF 'XLIB::VISUAL-INFO SYSTEM::OBJECT 4.))))
   #Y(XLIB::VISUAL-INFO-GREEN-MASK
      #17Y(00 00 00 00 01 00 00 00 00 02 DA AE DB 32 2C 19 02)
      XLIB::VISUAL-INFO 4.)
   (COMMON-LISP::FUNCTION XLIB::VISUAL-INFO-BLUE-MASK (XLIB::VISUAL-INFO)
    COMMON-LISP::T)
   (COMMON-LISP::INLINE XLIB::VISUAL-INFO-BLUE-MASK)
   XLIB::VISUAL-INFO-BLUE-MASK
   (#1# (COMMON-LISP::DECLARE (SYSTEM::IN-DEFUN XLIB::VISUAL-INFO-BLUE-MASK))
    (COMMON-LISP::BLOCK XLIB::VISUAL-INFO-BLUE-MASK
     (COMMON-LISP::THE COMMON-LISP::T
      (SYSTEM::%STRUCTURE-REF 'XLIB::VISUAL-INFO SYSTEM::OBJECT 5.))))
   #Y(XLIB::VISUAL-INFO-BLUE-MASK
      #17Y(00 00 00 00 01 00 00 00 00 02 DA AE DB 32 2C 19 02)
      XLIB::VISUAL-INFO 5.)
   (COMMON-LISP::FUNCTION XLIB::VISUAL-INFO-BITS-PER-RGB (XLIB::VISUAL-INFO)
    COMMON-LISP::T)
   (COMMON-LISP::INLINE XLIB::VISUAL-INFO-BITS-PER-RGB)
   XLIB::VISUAL-INFO-BITS-PER-RGB
   (#1#
    (COMMON-LISP::DECLARE (SYSTEM::IN-DEFUN XLIB::VISUAL-INFO-BITS-PER-RGB))
    (COMMON-LISP::BLOCK XLIB::VISUAL-INFO-BITS-PER-RGB
     (COMMON-LISP::THE COMMON-LISP::T
      (SYSTEM::%STRUCTURE-REF 'XLIB::VISUAL-INFO SYSTEM::OBJECT 6.))))
   #Y(XLIB::VISUAL-INFO-BITS-PER-RGB
      #17Y(00 00 00 00 01 00 00 00 00 02 DA AE DB 32 2C 19 02)
      XLIB::VISUAL-INFO 6.)
   (COMMON-LISP::FUNCTION XLIB::VISUAL-INFO-COLORMAP-ENTRIES
    (XLIB::VISUAL-INFO) COMMON-LISP::T)
   (COMMON-LISP::INLINE XLIB::VISUAL-INFO-COLORMAP-ENTRIES)
   XLIB::VISUAL-INFO-COLORMAP-ENTRIES
   (#1#
    (COMMON-LISP::DECLARE
     (SYSTEM::IN-DEFUN XLIB::VISUAL-INFO-COLORMAP-ENTRIES))
    (COMMON-LISP::BLOCK XLIB::VISUAL-INFO-COLORMAP-ENTRIES
     (COMMON-LISP::THE COMMON-LISP::T
      (SYSTEM::%STRUCTURE-REF 'XLIB::VISUAL-INFO SYSTEM::OBJECT 7.))))
   #Y(XLIB::VISUAL-INFO-COLORMAP-ENTRIES
      #17Y(00 00 00 00 01 00 00 00 00 02 DA AE DB 32 2C 19 02)
      XLIB::VISUAL-INFO 7.)
   SYSTEM::DEFSTRUCT-WRITER SYSTEM::SETF-EXPANDER -1. 1.
   #Y(XLIB::SETF-VISUAL-INFO-ID
      #22Y(00 00 00 00 02 00 00 00 00 03 9F 5C 78 DA DB AE DC B2 61 05 19 04)
      SYSTEM::%STRUCTURE-STORE 'XLIB::VISUAL-INFO 1.)
   COMMON-LISP::SETF SYSTEM::%SET-DOCUMENTATION
   #Y(XLIB::SETF-VISUAL-INFO-CLASS
      #22Y(00 00 00 00 02 00 00 00 00 03 9F 5C 78 DA DB AE DC B2 61 05 19 04)
      SYSTEM::%STRUCTURE-STORE 'XLIB::VISUAL-INFO 2.)
   #Y(XLIB::SETF-VISUAL-INFO-RED-MASK
      #22Y(00 00 00 00 02 00 00 00 00 03 9F 5C 78 DA DB AE DC B2 61 05 19 04)
      SYSTEM::%STRUCTURE-STORE 'XLIB::VISUAL-INFO 3.)
   #Y(XLIB::SETF-VISUAL-INFO-GREEN-MASK
      #22Y(00 00 00 00 02 00 00 00 00 03 9F 5C 78 DA DB AE DC B2 61 05 19 04)
      SYSTEM::%STRUCTURE-STORE 'XLIB::VISUAL-INFO 4.)
   #Y(XLIB::SETF-VISUAL-INFO-BLUE-MASK
      #22Y(00 00 00 00 02 00 00 00 00 03 9F 5C 78 DA DB AE DC B2 61 05 19 04)
      SYSTEM::%STRUCTURE-STORE 'XLIB::VISUAL-INFO 5.)
   #Y(XLIB::SETF-VISUAL-INFO-BITS-PER-RGB
      #22Y(00 00 00 00 02 00 00 00 00 03 9F 5C 78 DA DB AE DC B2 61 05 19 04)
      SYSTEM::%STRUCTURE-STORE 'XLIB::VISUAL-INFO 6.)
   #Y(XLIB::SETF-VISUAL-INFO-COLORMAP-ENTRIES
      #22Y(00 00 00 00 02 00 00 00 00 03 9F 5C 78 DA DB AE DC B2 61 05 19 04)
      SYSTEM::%STRUCTURE-STORE 'XLIB::VISUAL-INFO 7.)
   COMMON-LISP::STRUCTURE CLOS::DEFSTRUCT-REMOVE-PRINT-OBJECT-METHOD)
#Y(#:|61|
   #362Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 38 01 72 82 C8 5F 7A DA DC AE
         64 63 DE 73 04 00 32 86 16 01 DA 2F 05 E0 31 59 E1 31 59 E2 2F 09 E2
         E4 E5 32 86 E2 E6 32 80 E2 E7 DA 32 86 E8 31 59 E9 31 59 EA 2F 09 EA
         E4 EB 32 86 EA EC 32 80 EA E7 DA 32 86 ED 31 59 EE 31 59 EF 2F 09 EF
         E4 F0 32 86 EF F1 32 80 EF E7 DA 32 86 F2 31 59 F3 31 59 F4 2F 09 F4
         E4 F5 32 86 F4 F6 32 80 F4 E7 DA 32 86 F7 31 59 65 1E 31 59 65 1F 2F
         09 65 1F E4 65 20 32 86 65 1F 65 21 32 80 65 1F E7 DA 32 86 E2 65 22
         32 87 E2 65 23 65 24 65 25 03 26 7C 02 32 86 E2 65 27 63 2D 03 28 E2
         65 22 DA 32 86 EA 65 22 32 87 EA 65 23 65 24 65 25 03 29 7C 02 32 86
         EA 65 27 63 2D 03 28 EA 65 22 DA 32 86 EF 65 22 32 87 EF 65 23 65 24
         65 25 03 2A 7C 02 32 86 EF 65 27 63 2D 03 28 EF 65 22 DA 32 86 F4 65
         22 32 87 F4 65 23 65 24 65 25 03 2B 7C 02 32 86 F4 65 27 63 2D 03 28
         F4 65 22 DA 32 86 65 1F 65 22 32 87 65 1F 65 23 65 24 65 25 03 2C 7C
         02 32 86 65 1F 65 27 63 2D 03 28 65 1F 65 22 DA 32 86 DA 65 2D 63 2D
         03 28 65 2E 65 2F 65 30 65 31 64 65 32 DA 38 02 72 27 64 38 02 72 27
         7B 02 65 33 63 65 34 65 35 6E 0A 36 30 37 C5 19 01)
   XLIB::DISPLAY COMMON-LISP::STRUCTURE-OBJECT SYSTEM::DEFSTRUCT-DESCRIPTION 0.
   (#(XLIB::FOREIGN-POINTER (:FOREIGN-POINTER) 1. (COMMON-LISP::NIL)
      COMMON-LISP::NIL COMMON-LISP::T COMMON-LISP::NIL)
    #(COMMON-LISP::HASH-TABLE (:HASH-TABLE) 2. (COMMON-LISP::NIL)
      COMMON-LISP::NIL COMMON-LISP::T COMMON-LISP::NIL)
    #(XLIB::PLIST (:PLIST) 3. (COMMON-LISP::NIL) COMMON-LISP::NIL
      COMMON-LISP::T COMMON-LISP::NIL)
    #(XLIB::AFTER-FUNCTION (:AFTER-FUNCTION) 4. (COMMON-LISP::NIL)
      COMMON-LISP::NIL COMMON-LISP::T COMMON-LISP::NIL)
    #(XLIB::ERROR-HANDLER (:ERROR-HANDLER) 5. (COMMON-LISP::NIL)
      COMMON-LISP::NIL COMMON-LISP::T COMMON-LISP::NIL))
   CLOS::DEFINE-STRUCTURE-CLASS
   (COMMON-LISP::FUNCTION XLIB::%DISPLAY-FOREIGN-POINTER (XLIB::DISPLAY)
    COMMON-LISP::T)
   (COMMON-LISP::INLINE XLIB::%DISPLAY-FOREIGN-POINTER)
   XLIB::%DISPLAY-FOREIGN-POINTER SYSTEM::REMOVE-OLD-DEFINITIONS
   SYSTEM::INLINE-EXPANSION
   (#1=(SYSTEM::OBJECT)
    (COMMON-LISP::DECLARE (SYSTEM::IN-DEFUN XLIB::%DISPLAY-FOREIGN-POINTER))
    (COMMON-LISP::BLOCK XLIB::%DISPLAY-FOREIGN-POINTER
     (COMMON-LISP::THE COMMON-LISP::T
      (SYSTEM::%STRUCTURE-REF 'XLIB::DISPLAY SYSTEM::OBJECT 1.))))
   #Y(XLIB::%DISPLAY-FOREIGN-POINTER
      #17Y(00 00 00 00 01 00 00 00 00 02 DA AE DB 32 2C 19 02) XLIB::DISPLAY
      1.)
   SYSTEM::DEFSTRUCT-READER
   (COMMON-LISP::FUNCTION XLIB::%DISPLAY-HASH-TABLE (XLIB::DISPLAY)
    COMMON-LISP::T)
   (COMMON-LISP::INLINE XLIB::%DISPLAY-HASH-TABLE) XLIB::%DISPLAY-HASH-TABLE
   (#1# (COMMON-LISP::DECLARE (SYSTEM::IN-DEFUN XLIB::%DISPLAY-HASH-TABLE))
    (COMMON-LISP::BLOCK XLIB::%DISPLAY-HASH-TABLE
     (COMMON-LISP::THE COMMON-LISP::T
      (SYSTEM::%STRUCTURE-REF 'XLIB::DISPLAY SYSTEM::OBJECT 2.))))
   #Y(XLIB::%DISPLAY-HASH-TABLE
      #17Y(00 00 00 00 01 00 00 00 00 02 DA AE DB 32 2C 19 02) XLIB::DISPLAY
      2.)
   (COMMON-LISP::FUNCTION XLIB::%DISPLAY-PLIST (XLIB::DISPLAY) COMMON-LISP::T)
   (COMMON-LISP::INLINE XLIB::%DISPLAY-PLIST) XLIB::%DISPLAY-PLIST
   (#1# (COMMON-LISP::DECLARE (SYSTEM::IN-DEFUN XLIB::%DISPLAY-PLIST))
    (COMMON-LISP::BLOCK XLIB::%DISPLAY-PLIST
     (COMMON-LISP::THE COMMON-LISP::T
      (SYSTEM::%STRUCTURE-REF 'XLIB::DISPLAY SYSTEM::OBJECT 3.))))
   #Y(XLIB::%DISPLAY-PLIST
      #17Y(00 00 00 00 01 00 00 00 00 02 DA AE DB 32 2C 19 02) XLIB::DISPLAY
      3.)
   (COMMON-LISP::FUNCTION XLIB::%DISPLAY-AFTER-FUNCTION (XLIB::DISPLAY)
    COMMON-LISP::T)
   (COMMON-LISP::INLINE XLIB::%DISPLAY-AFTER-FUNCTION)
   XLIB::%DISPLAY-AFTER-FUNCTION
   (#1# (COMMON-LISP::DECLARE (SYSTEM::IN-DEFUN XLIB::%DISPLAY-AFTER-FUNCTION))
    (COMMON-LISP::BLOCK XLIB::%DISPLAY-AFTER-FUNCTION
     (COMMON-LISP::THE COMMON-LISP::T
      (SYSTEM::%STRUCTURE-REF 'XLIB::DISPLAY SYSTEM::OBJECT 4.))))
   #Y(XLIB::%DISPLAY-AFTER-FUNCTION
      #17Y(00 00 00 00 01 00 00 00 00 02 DA AE DB 32 2C 19 02) XLIB::DISPLAY
      4.)
   (COMMON-LISP::FUNCTION XLIB::%DISPLAY-ERROR-HANDLER (XLIB::DISPLAY)
    COMMON-LISP::T)
   (COMMON-LISP::INLINE XLIB::%DISPLAY-ERROR-HANDLER)
   XLIB::%DISPLAY-ERROR-HANDLER
   (#1# (COMMON-LISP::DECLARE (SYSTEM::IN-DEFUN XLIB::%DISPLAY-ERROR-HANDLER))
    (COMMON-LISP::BLOCK XLIB::%DISPLAY-ERROR-HANDLER
     (COMMON-LISP::THE COMMON-LISP::T
      (SYSTEM::%STRUCTURE-REF 'XLIB::DISPLAY SYSTEM::OBJECT 5.))))
   #Y(XLIB::%DISPLAY-ERROR-HANDLER
      #17Y(00 00 00 00 01 00 00 00 00 02 DA AE DB 32 2C 19 02) XLIB::DISPLAY
      5.)
   SYSTEM::DEFSTRUCT-WRITER SYSTEM::SETF-EXPANDER -1. 1.
   #Y(XLIB::SETF-%DISPLAY-FOREIGN-POINTER
      #22Y(00 00 00 00 02 00 00 00 00 03 9F 5C 78 DA DB AE DC B2 61 05 19 04)
      SYSTEM::%STRUCTURE-STORE 'XLIB::DISPLAY 1.)
   COMMON-LISP::SETF SYSTEM::%SET-DOCUMENTATION
   #Y(XLIB::SETF-%DISPLAY-HASH-TABLE
      #22Y(00 00 00 00 02 00 00 00 00 03 9F 5C 78 DA DB AE DC B2 61 05 19 04)
      SYSTEM::%STRUCTURE-STORE 'XLIB::DISPLAY 2.)
   #Y(XLIB::SETF-%DISPLAY-PLIST
      #22Y(00 00 00 00 02 00 00 00 00 03 9F 5C 78 DA DB AE DC B2 61 05 19 04)
      SYSTEM::%STRUCTURE-STORE 'XLIB::DISPLAY 3.)
   #Y(XLIB::SETF-%DISPLAY-AFTER-FUNCTION
      #22Y(00 00 00 00 02 00 00 00 00 03 9F 5C 78 DA DB AE DC B2 61 05 19 04)
      SYSTEM::%STRUCTURE-STORE 'XLIB::DISPLAY 4.)
   #Y(XLIB::SETF-%DISPLAY-ERROR-HANDLER
      #22Y(00 00 00 00 02 00 00 00 00 03 9F 5C 78 DA DB AE DC B2 61 05 19 04)
      SYSTEM::%STRUCTURE-STORE 'XLIB::DISPLAY 5.)
   COMMON-LISP::STRUCTURE CLOS::PRINT-OBJECT :INITFUNCTION
   #Y(#:|1| #15Y(00 00 00 00 01 00 00 00 00 02 DA C6 5D 19 02)
      #Y(#:|1| #19Y(00 00 00 00 02 00 00 00 00 03 AE AE 6B 00 2D 03 01 19 03)
         SYSTEM::*PRIN-LEVEL* XLIB::PRINT-DISPLAY)
      (COMMON-LISP::T))
   :WANTS-NEXT-METHOD-P :PARAMETER-SPECIALIZERS :QUALIFIERS :SIGNATURE
   #S(SYSTEM::SIGNATURE :REQ-NUM 2. :OPT-NUM 0. :REST-P COMMON-LISP::NIL
      :KEYS-P COMMON-LISP::NIL :KEYWORDS COMMON-LISP::NIL
      :ALLOW-P COMMON-LISP::NIL)
   CLOS::MAKE-STANDARD-METHOD CLOS::DO-DEFMETHOD)
#Y(#:|62| #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   XLIB::MAKE-COLOR SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::MAKE-COLOR
      #37Y(00 00 00 00 00 00 00 00 C0 1B 03 00 00 00 3B 03 02 C8 FB 3B 02 02 C8
           FA 3B 01 02 C8 F9 AF AF AF 2D 03 04 19 04)
      :RED :GREEN :BLUE 1.0s0 XLIB::MAKE-COLOR-INTERNAL))
#Y(#:|63| #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   XLIB::COLOR-RGB SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::COLOR-RGB
      #23Y(00 00 00 00 01 00 00 00 00 02 AD 6F 00 AE 6F 01 AF 6F 02 40 03 19
           02)
      XLIB::COLOR-RED XLIB::COLOR-GREEN XLIB::COLOR-BLUE))
#Y(#:|64|
   #42Y(00 00 00 00 00 00 00 00 00 01 DA DB 63 DC DD DE DF E0 E1 63 00 7A 7B 06
        DD E2 DF E3 7B 04 7B 02 2D 05 0A DA 38 02 32 27 19 01)
   XLIB::XLIB-OBJECT :DIRECT-SUPERCLASSES :DIRECT-SLOTS :NAME XLIB::PLIST
   :INITARGS (:PLIST) :INITER XLIB::DISPLAY (:DISPLAY) CLOS::ENSURE-CLASS)
#Y(#:|65|
   #38Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 38 02 72 27 7B 01 DD DE DF E0 E1
        7B 04 7B 01 2D 05 08 DA 38 02 32 27 19 01)
   XLIB::XID-OBJECT :DIRECT-SUPERCLASSES XLIB::XLIB-OBJECT :DIRECT-SLOTS :NAME
   XLIB::ID :INITARGS (:ID) CLOS::ENSURE-CLASS)
#Y(#:|66|
   #38Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 38 02 72 27 7B 01 DD DE DF E0 E1
        7B 04 7B 01 2D 05 08 DA 38 02 32 27 19 01)
   XLIB::PTR-OBJECT :DIRECT-SUPERCLASSES XLIB::XLIB-OBJECT :DIRECT-SLOTS :NAME
   XLIB::PTR :INITARGS (:PTR) CLOS::ENSURE-CLASS)
#Y(#:|67|
   #31Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 38 02 72 27 7B 01 DD 63 2D 05 04
        DA 38 02 32 27 19 01)
   XLIB::DRAWABLE :DIRECT-SUPERCLASSES XLIB::XID-OBJECT :DIRECT-SLOTS
   CLOS::ENSURE-CLASS)
#Y(#:|68|
   #31Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 38 02 72 27 7B 01 DD 63 2D 05 04
        DA 38 02 32 27 19 01)
   XLIB::WINDOW :DIRECT-SUPERCLASSES XLIB::DRAWABLE :DIRECT-SLOTS
   CLOS::ENSURE-CLASS)
#Y(#:|69|
   #31Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 38 02 72 27 7B 01 DD 63 2D 05 04
        DA 38 02 32 27 19 01)
   XLIB::PIXMAP :DIRECT-SUPERCLASSES XLIB::DRAWABLE :DIRECT-SLOTS
   CLOS::ENSURE-CLASS)
#Y(#:|70|
   #31Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 38 02 72 27 7B 01 DD 63 2D 05 04
        DA 38 02 32 27 19 01)
   XLIB::CURSOR :DIRECT-SUPERCLASSES XLIB::XID-OBJECT :DIRECT-SLOTS
   CLOS::ENSURE-CLASS)
#Y(#:|71|
   #31Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 38 02 72 27 7B 01 DD 63 2D 05 04
        DA 38 02 32 27 19 01)
   XLIB::COLORMAP :DIRECT-SUPERCLASSES XLIB::XID-OBJECT :DIRECT-SLOTS
   CLOS::ENSURE-CLASS)
#Y(#:|72|
   #40Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 38 02 72 27 7B 01 DD DE DF 7B 02
        DE E0 7B 02 7B 02 2D 05 07 DA 38 02 32 27 19 01)
   XLIB::GCONTEXT :DIRECT-SUPERCLASSES XLIB::PTR-OBJECT :DIRECT-SLOTS :NAME
   XLIB::%DASHES XLIB::%CLIP-MASK CLOS::ENSURE-CLASS)
#Y(#:|73|
   #31Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 38 02 72 27 7B 01 DD 63 2D 05 04
        DA 38 02 32 27 19 01)
   XLIB::SCREEN :DIRECT-SUPERCLASSES XLIB::PTR-OBJECT :DIRECT-SLOTS
   CLOS::ENSURE-CLASS)
#Y(#:|74|
   #58Y(00 00 00 00 00 00 00 00 00 01 DA DB DC 38 02 72 27 7B 01 DD DE DF E0 E1
        E2 63 00 7A 7B 06 DE E3 E0 E4 7B 04 DE E5 E0 E6 E2 63 00 7A 7B 06 7B 03
        2D 05 0D DA 38 02 32 27 19 01)
   XLIB::FONT :DIRECT-SUPERCLASSES XLIB::XID-OBJECT :DIRECT-SLOTS :NAME
   XLIB::FONT-INFO :INITARGS (:FONT-INFO) :INITER XLIB::NAME (:NAME)
   XLIB::ENCODING (:ENCODING) CLOS::ENSURE-CLASS)
#Y(#:|75|
   #333Y(00 00 00 00 00 00 00 00 00 01 DA 99 01 30 02 DD 99 04 30 02 DF 99 06
         30 02 E1 99 08 30 02 E3 99 0A 30 02 E5 99 0C 30 02 E7 99 0E 30 02 E9
         99 10 30 02 EB 99 12 30 02 ED 99 14 30 02 EF 99 16 30 02 F1 99 18 30
         02 F3 99 1A 30 02 F5 99 1C 30 02 F7 99 1E 30 02 65 1F 99 20 30 02 65
         21 99 22 30 02 65 23 99 24 30 02 65 25 99 26 30 02 65 27 99 28 30 02
         65 29 99 2A 30 02 65 2B 99 2C 30 02 65 2D 99 2E 30 02 65 2F 99 30 30
         02 65 31 99 32 30 02 65 33 99 34 30 02 65 35 99 36 30 02 65 37 99 38
         30 02 65 39 99 3A 30 02 65 3B 99 3C 30 02 65 3D 99 3E 30 02 65 3F 99
         40 30 02 65 41 99 42 30 02 65 43 99 44 30 02 65 45 99 46 30 02 65 47
         99 48 30 02 65 49 99 4A 30 02 65 4B 99 4C 30 02 65 4D 99 4E 30 02 65
         4F 99 50 30 02 65 51 99 52 30 02 65 53 99 54 30 02 65 55 99 56 30 02
         65 57 99 58 30 02 65 59 99 5A 30 02 65 5B 99 5C 30 02 65 5D 99 5E 30
         02 65 5F 99 60 30 02 65 61 99 62 30 02 65 63 99 64 30 02 65 65 99 66
         30 02 65 67 99 68 30 02 65 69 99 6A 30 02 65 6B 99 6C 30 02 65 6D 99
         6E 30 02 65 6F 99 70 30 02 19 01)
   (COMMON-LISP::SETF XLIB::CLOSE-DOWN-MODE) XLIB::CLOSE-DOWN-MODE-SETTER
   SYSTEM::SET-FDEFINITION (COMMON-LISP::SETF XLIB::DISPLAY-AFTER-FUNCTION)
   XLIB::DISPLAY-AFTER-FUNCTION-SETTER
   (COMMON-LISP::SETF XLIB::DISPLAY-ERROR-HANDLER)
   XLIB::DISPLAY-ERROR-HANDLER-SETTER (COMMON-LISP::SETF XLIB::DISPLAY-PLIST)
   XLIB::DISPLAY-PLIST-SETTER (COMMON-LISP::SETF XLIB::DRAWABLE-BORDER-WIDTH)
   XLIB::DRAWABLE-BORDER-WIDTH-SETTER (COMMON-LISP::SETF XLIB::DRAWABLE-HEIGHT)
   XLIB::DRAWABLE-HEIGHT-SETTER (COMMON-LISP::SETF XLIB::DRAWABLE-PLIST)
   XLIB::DRAWABLE-PLIST-SETTER (COMMON-LISP::SETF XLIB::DRAWABLE-WIDTH)
   XLIB::DRAWABLE-WIDTH-SETTER (COMMON-LISP::SETF XLIB::DRAWABLE-X)
   XLIB::DRAWABLE-X-SETTER (COMMON-LISP::SETF XLIB::DRAWABLE-Y)
   XLIB::DRAWABLE-Y-SETTER (COMMON-LISP::SETF XLIB::FONT-PATH)
   XLIB::FONT-PATH-SETTER (COMMON-LISP::SETF XLIB::FONT-PLIST)
   XLIB::FONT-PLIST-SETTER (COMMON-LISP::SETF XLIB::GCONTEXT-ARC-MODE)
   XLIB::GCONTEXT-ARC-MODE-SETTER (COMMON-LISP::SETF XLIB::GCONTEXT-BACKGROUND)
   XLIB::GCONTEXT-BACKGROUND-SETTER (COMMON-LISP::SETF XLIB::GCONTEXT-CACHE-P)
   XLIB::GCONTEXT-CACHE-P-SETTER (COMMON-LISP::SETF XLIB::GCONTEXT-CAP-STYLE)
   XLIB::GCONTEXT-CAP-STYLE-SETTER (COMMON-LISP::SETF XLIB::GCONTEXT-CLIP-MASK)
   XLIB::GCONTEXT-CLIP-MASK-SETTER (COMMON-LISP::SETF XLIB::GCONTEXT-CLIP-X)
   XLIB::GCONTEXT-CLIP-X-SETTER (COMMON-LISP::SETF XLIB::GCONTEXT-CLIP-Y)
   XLIB::GCONTEXT-CLIP-Y-SETTER (COMMON-LISP::SETF XLIB::GCONTEXT-DASH-OFFSET)
   XLIB::GCONTEXT-DASH-OFFSET-SETTER (COMMON-LISP::SETF XLIB::GCONTEXT-DASHES)
   XLIB::GCONTEXT-DASHES-SETTER (COMMON-LISP::SETF XLIB::GCONTEXT-EXPOSURES)
   XLIB::GCONTEXT-EXPOSURES-SETTER (COMMON-LISP::SETF XLIB::GCONTEXT-FILL-RULE)
   XLIB::GCONTEXT-FILL-RULE-SETTER
   (COMMON-LISP::SETF XLIB::GCONTEXT-FILL-STYLE)
   XLIB::GCONTEXT-FILL-STYLE-SETTER (COMMON-LISP::SETF XLIB::GCONTEXT-FONT)
   XLIB::GCONTEXT-FONT-SETTER (COMMON-LISP::SETF XLIB::GCONTEXT-FOREGROUND)
   XLIB::GCONTEXT-FOREGROUND-SETTER (COMMON-LISP::SETF XLIB::GCONTEXT-FUNCTION)
   XLIB::GCONTEXT-FUNCTION-SETTER (COMMON-LISP::SETF XLIB::GCONTEXT-JOIN-STYLE)
   XLIB::GCONTEXT-JOIN-STYLE-SETTER
   (COMMON-LISP::SETF XLIB::GCONTEXT-LINE-STYLE)
   XLIB::GCONTEXT-LINE-STYLE-SETTER
   (COMMON-LISP::SETF XLIB::GCONTEXT-LINE-WIDTH)
   XLIB::GCONTEXT-LINE-WIDTH-SETTER
   (COMMON-LISP::SETF XLIB::GCONTEXT-PLANE-MASK)
   XLIB::GCONTEXT-PLANE-MASK-SETTER (COMMON-LISP::SETF XLIB::GCONTEXT-PLIST)
   XLIB::GCONTEXT-PLIST-SETTER (COMMON-LISP::SETF XLIB::GCONTEXT-STIPPLE)
   XLIB::GCONTEXT-STIPPLE-SETTER
   (COMMON-LISP::SETF XLIB::GCONTEXT-SUBWINDOW-MODE)
   XLIB::GCONTEXT-SUBWINDOW-MODE-SETTER (COMMON-LISP::SETF XLIB::GCONTEXT-TILE)
   XLIB::GCONTEXT-TILE-SETTER (COMMON-LISP::SETF XLIB::GCONTEXT-TS-X)
   XLIB::GCONTEXT-TS-X-SETTER (COMMON-LISP::SETF XLIB::GCONTEXT-TS-Y)
   XLIB::GCONTEXT-TS-Y-SETTER (COMMON-LISP::SETF XLIB::PIXMAP-PLIST)
   XLIB::PIXMAP-PLIST-SETTER (COMMON-LISP::SETF XLIB::POINTER-MAPPING)
   XLIB::POINTER-MAPPING-SETTER (COMMON-LISP::SETF XLIB::SCREEN-PLIST)
   XLIB::SCREEN-PLIST-SETTER (COMMON-LISP::SETF XLIB::SELECTION-OWNER)
   XLIB::SELECTION-OWNER-SETTER (COMMON-LISP::SETF XLIB::WINDOW-BACKGROUND)
   XLIB::WINDOW-BACKGROUND-SETTER
   (COMMON-LISP::SETF XLIB::WINDOW-BACKING-PIXEL)
   XLIB::WINDOW-BACKING-PIXEL-SETTER
   (COMMON-LISP::SETF XLIB::WINDOW-BACKING-PLANES)
   XLIB::WINDOW-BACKING-PLANES-SETTER
   (COMMON-LISP::SETF XLIB::WINDOW-BACKING-STORE)
   XLIB::WINDOW-BACKING-STORE-SETTER (COMMON-LISP::SETF XLIB::WINDOW-COLORMAP)
   XLIB::WINDOW-COLORMAP-SETTER (COMMON-LISP::SETF XLIB::WINDOW-CURSOR)
   XLIB::WINDOW-CURSOR-SETTER (COMMON-LISP::SETF XLIB::WINDOW-BIT-GRAVITY)
   XLIB::WINDOW-BIT-GRAVITY-SETTER (COMMON-LISP::SETF XLIB::WINDOW-BORDER)
   XLIB::WINDOW-BORDER-SETTER (COMMON-LISP::SETF XLIB::WINDOW-EVENT-MASK)
   XLIB::WINDOW-EVENT-MASK-SETTER (COMMON-LISP::SETF XLIB::WINDOW-GRAVITY)
   XLIB::WINDOW-GRAVITY-SETTER
   (COMMON-LISP::SETF XLIB::WINDOW-DO-NOT-PROPAGATE-MASK)
   XLIB::WINDOW-DO-NOT-PROPAGATE-MASK-SETTER
   (COMMON-LISP::SETF XLIB::WINDOW-OVERRIDE-REDIRECT)
   XLIB::WINDOW-OVERRIDE-REDIRECT-SETTER (COMMON-LISP::SETF XLIB::WINDOW-PLIST)
   XLIB::WINDOW-PLIST-SETTER (COMMON-LISP::SETF XLIB::WINDOW-PRIORITY)
   XLIB::WINDOW-PRIORITY-SETTER (COMMON-LISP::SETF XLIB::WINDOW-SAVE-UNDER)
   XLIB::WINDOW-SAVE-UNDER-SETTER)
#Y(#:|76| #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   XLIB::SET-POINTER-MAPPING SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::SET-POINTER-MAPPING
      #16Y(00 00 00 00 02 00 00 00 00 03 AD AF 30 00 19 03)
      #.(SYSTEM::GET-SETF-SYMBOL 'XLIB::POINTER-MAPPING)))
#Y(#:|77| #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   XLIB::SET-CLOSE-DOWN-MODE SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::SET-CLOSE-DOWN-MODE
      #16Y(00 00 00 00 02 00 00 00 00 03 AD AF 30 00 19 03)
      #.(SYSTEM::GET-SETF-SYMBOL 'XLIB::CLOSE-DOWN-MODE)))
#Y(#:|78| #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   XLIB::SET-SELECTION-OWNER SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::SET-SELECTION-OWNER
      #21Y(00 00 00 00 03 00 01 00 00 0A 3D 01 AE B1 B1 B0 2D 04 00 19 05)
      #.(SYSTEM::GET-SETF-SYMBOL 'XLIB::SELECTION-OWNER)))
#Y(#:|79|
   #22Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 6F 03 32 80 C5 19 01)
   XLIB::EVENT-COND SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::EVENT-COND
      #289Y(00 00 00 00 01 00 01 00 00 08 AE 72 45 DA 90 01 30 80 B7 9F 5C 5B
            78 A0 5C 5B 79 AC DC 63 72 83 AD DD 63 72 83 AE DE 63 72 83 AF DF
            6B 06 72 83 AC 0E 06 22 80 99 9D 14 A6 5C 79 B2 E1 31 5F 38 01 72
            8E E2 B5 DC B5 DD B6 DE B7 DF B7 E3 E4 E5 E6 BA D2 7C 02 E8 63 BD
            9D 20 80 B5 94 00 94 00 9E 5C 78 9F 5C 5C 78 A0 5C 5C 79 AF E9 38
            03 8C B2 80 68 AF 8E 09 04 AF 61 01 FB 99 15 B0 82 00 17 03 EA A1
            5C 1C 80 75 F3 F1 F2 A4 5B 14 7B 02 7B 03 93 03 15 EB E4 E5 EC B4
            F4 33 02 23 7A B3 7B 03 7B 02 66 1A 7B 03 61 01 7C 02 93 01 80 54
            EB E4 E5 EC B3 03 1B 14 33 02 23 7A A2 7C 02 7B 02 66 19 7B 03 61
            01 5D 1B 3B AE 2F 01 19 03 02 1B FF 64 EB E4 E5 EC B3 D9 1B 5C EA
            64 93 03 15 EB E4 E5 EC B4 ED 33 02 23 7A B3 7B 03 7B 02 66 1A 7B
            03 61 01 7C 02 92 01 59 5D 1B 08 F0 F1 F2 A4 1B FF 89 5D 16 03 F8
            84 02 16 01 83 00 1B FF 47 16 01 AC 31 A2 16 01 7A 7B 03 7B 02 61
            0C 19 0C)
      2. SYSTEM::MACRO-CALL-ERROR :TIMEOUT :PEEK-P :DISCARD-P :FORCE-OUTPUT-P
      SYSTEM::MACRO-MISSING-VALUE (:FORCE-OUTPUT-P :DISCARD-P :PEEK-P :TIMEOUT)
      XLIB::PROCESS-EVENT :HANDLER COMMON-LISP::FUNCTION COMMON-LISP::LAMBDA
      COMMON-LISP::&REST
      (COMMON-LISP::&KEY XLIB::EVENT-KEY COMMON-LISP::&ALLOW-OTHER-KEYS)
      COMMON-LISP::COND (COMMON-LISP::T COMMON-LISP::OTHERWISE)
      COMMON-LISP::AND COMMON-LISP::APPLY COMMON-LISP::&KEY
      (COMMON-LISP::&ALLOW-OTHER-KEYS) (COMMON-LISP::&ALLOW-OTHER-KEYS)
      XLIB::KINTERN COMMON-LISP::MEMBER XLIB::EVENT-KEY COMMON-LISP::QUOTE
      COMMON-LISP::EQ (COMMON-LISP::&ALLOW-OTHER-KEYS)
      (COMMON-LISP::&ALLOW-OTHER-KEYS))
   SYSTEM::MAKE-MACRO)
#Y(#:|80|
   #22Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 6F 03 32 80 C5 19 01)
   XLIB::EVENT-CASE SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::EVENT-CASE
      #69Y(00 00 00 00 01 00 01 00 00 08 AE 72 45 DA 90 01 30 0C 9F 5C 78 A0 5C
           79 DC AE 63 AF 1B 19 AE 2F 01 19 03 94 00 94 00 9E 5C 78 DD A0 5C 5C
           7A 7B 03 84 02 16 01 83 00 9D 21 69 16 01 AC 31 A2 16 01 62 02 19
           05)
      2. SYSTEM::MACRO-CALL-ERROR XLIB::EVENT-COND COMMON-LISP::PROGN)
   SYSTEM::MAKE-MACRO)
#Y(#:|81|
   #22Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 6F 03 32 80 C5 19 01)
   XLIB::WITH-STATE SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::WITH-STATE
      #37Y(00 00 00 00 01 00 01 00 00 08 AE 72 45 DA 90 01 30 0E 9F 5C 5B 78 A0
           5C 79 DC AE 9F 62 02 19 05 AE 2F 01 19 03)
      2. SYSTEM::MACRO-CALL-ERROR COMMON-LISP::PROGN)
   SYSTEM::MAKE-MACRO)
#Y(#:|82|
   #22Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 6F 03 32 80 C5 19 01)
   XLIB::WITH-EVENT-QUEUE SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::WITH-EVENT-QUEUE
      #37Y(00 00 00 00 01 00 01 00 00 08 AE 72 45 DA 90 01 30 0E 9F 5C 5B 78 A0
           5C 79 DC AE 9F 62 02 19 05 AE 2F 01 19 03)
      2. SYSTEM::MACRO-CALL-ERROR COMMON-LISP::PROGN)
   SYSTEM::MAKE-MACRO)
#Y(#:|83|
   #22Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 6F 03 32 80 C5 19 01)
   XLIB::WITH-GCONTEXT SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::WITH-GCONTEXT
      #215Y(00 00 00 00 01 00 01 00 00 08 AE 72 45 DA 90 01 30 80 BA 9F 5C 5B
            78 A0 5C 5B 79 A1 5C 79 38 01 72 8E 38 01 72 8E 38 01 72 8E 38 01
            72 8E DC 01 03 B5 93 00 35 94 00 24 03 80 97 94 00 25 04 02 7E 01
            B0 94 01 6F 05 82 02 3C 04 AF E0 94 02 72 8A 73 02 13 E1 71 D3 B5
            7B 02 9F 5C 78 7B 02 82 02 24 03 9D 5C 5C F8 92 00 4B 16 01 E2 B3
            B8 7B 02 B5 E3 B6 B4 7B 03 7B 02 93 04 09 B4 E4 B7 7B 02 7B 02 61
            01 14 93 04 09 B4 E5 B8 7B 02 7B 02 61 01 14 33 02 23 7C 02 E6 E7
            E8 A4 7A AA 7C 02 E7 E9 B8 BA 7B 03 93 07 0A E8 E4 BA 7B 02 B9 7B
            03 61 01 14 93 07 0A E8 E5 BB 7B 02 B9 7B 03 61 01 14 33 02 23 7C
            02 7B 03 61 03 19 0E AE 2F 01 19 03 7E 02 1B FF 6B)
      2. SYSTEM::MACRO-CALL-ERROR 0. :DASHES :CLIP-MASK
      XLIB::%GCONTEXT-KEY->MASK "GCONTEXT-" :XLIB COMMON-LISP::LET*
      XLIB::%SAVE-GCONTEXT-COMPONENTS XLIB::GCONTEXT-DASHES
      XLIB::GCONTEXT-CLIP-MASK COMMON-LISP::UNWIND-PROTECT COMMON-LISP::PROGN
      COMMON-LISP::SETF XLIB::%RESTORE-GCONTEXT-COMPONENTS)
   SYSTEM::MAKE-MACRO)
#Y(#:|84|
   #22Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 6F 03 32 80 C5 19 01)
   XLIB::WITH-SERVER-GRABBED SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::WITH-SERVER-GRABBED
      #76Y(00 00 00 00 01 00 01 00 00 08 AE 72 45 DA 90 01 30 32 9F 5C 5B 78 A0
           5C 79 AD 8E 04 2C 38 01 32 8E 14 DC AD B0 7B 02 7B 01 DD DE DF B1 7B
           03 7B 02 E0 E1 E2 B2 7B 02 A4 7C 02 E3 B2 7B 02 7B 03 61 04 19 06 AE
           2F 01 19 03 9E 1B 55)
      2. SYSTEM::MACRO-CALL-ERROR COMMON-LISP::LET COMMON-LISP::DECLARE
      COMMON-LISP::TYPE XLIB::DISPLAY COMMON-LISP::UNWIND-PROTECT
      COMMON-LISP::PROGN XLIB::GRAB-SERVER XLIB::UNGRAB-SERVER)
   SYSTEM::MAKE-MACRO)
#Y(#:|85| #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   XLIB::WM-NAME SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::WM-NAME
      #24Y(00 00 00 00 01 00 00 00 00 02 AD DA DB DC DD DE DF 99 06 2D 08 07 19
           02)
      :WM_NAME :TYPE :STRING :RESULT-TYPE COMMON-LISP::STRING :TRANSFORM
      XLIB::CARD8->CHAR XLIB::GET-PROPERTY))
#Y(#:|86|
   #32Y(00 00 00 00 00 00 00 00 00 01 DA DB 32 87 DA DC DD DE CA 7C 02 32 86 DA
        E0 63 2D 03 07 C5 19 01)
   XLIB::WM-NAME SYSTEM::DEFSTRUCT-WRITER SYSTEM::SETF-EXPANDER -1. 1.
   #Y(XLIB::SETF-WM-NAME
      #21Y(00 00 00 00 02 00 00 00 00 03 9F 5C 78 DA AD DB B1 61 04 19 04)
      XLIB::SET-STRING-PROPERTY :WM_NAME)
   COMMON-LISP::SETF SYSTEM::%SET-DOCUMENTATION)
#Y(#:|87| #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   XLIB::SET-STRING-PROPERTY SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::SET-STRING-PROPERTY
      #26Y(00 00 00 00 03 00 00 00 00 04 AF AF AF 71 4A DA DB DC 99 03 2D 07 04
           9E 19 04)
      :STRING 8. :TRANSFORM XLIB::CHAR->CARD8 XLIB::CHANGE-PROPERTY))
#Y(#:|88| #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   XLIB::WM-ICON-NAME SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::WM-ICON-NAME
      #24Y(00 00 00 00 01 00 00 00 00 02 AD DA DB DC DD DE DF 99 06 2D 08 07 19
           02)
      :WM_ICON_NAME :TYPE :STRING :RESULT-TYPE COMMON-LISP::STRING :TRANSFORM
      XLIB::CARD8->CHAR XLIB::GET-PROPERTY))
#Y(#:|89|
   #32Y(00 00 00 00 00 00 00 00 00 01 DA DB 32 87 DA DC DD DE CA 7C 02 32 86 DA
        E0 63 2D 03 07 C5 19 01)
   XLIB::WM-ICON-NAME SYSTEM::DEFSTRUCT-WRITER SYSTEM::SETF-EXPANDER -1. 1.
   #Y(XLIB::SETF-WM-ICON-NAME
      #21Y(00 00 00 00 02 00 00 00 00 03 9F 5C 78 DA AD DB B1 61 04 19 04)
      XLIB::SET-STRING-PROPERTY :WM_ICON_NAME)
   COMMON-LISP::SETF SYSTEM::%SET-DOCUMENTATION)
#Y(#:|90| #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   XLIB::WM-CLIENT-MACHINE SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::WM-CLIENT-MACHINE
      #24Y(00 00 00 00 01 00 00 00 00 02 AD DA DB DC DD DE DF 99 06 2D 08 07 19
           02)
      :WM_CLIENT_MACHINE :TYPE :STRING :RESULT-TYPE COMMON-LISP::STRING
      :TRANSFORM XLIB::CARD8->CHAR XLIB::GET-PROPERTY))
#Y(#:|91|
   #32Y(00 00 00 00 00 00 00 00 00 01 DA DB 32 87 DA DC DD DE CA 7C 02 32 86 DA
        E0 63 2D 03 07 C5 19 01)
   XLIB::WM-CLIENT-MACHINE SYSTEM::DEFSTRUCT-WRITER SYSTEM::SETF-EXPANDER -1.
   1.
   #Y(XLIB::SETF-WM-CLIENT-MACHINE
      #21Y(00 00 00 00 02 00 00 00 00 03 9F 5C 78 DA AD DB B1 61 04 19 04)
      XLIB::SET-STRING-PROPERTY :WM_CLIENT_MACHINE)
   COMMON-LISP::SETF SYSTEM::%SET-DOCUMENTATION)
#Y(#:|92| #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   XLIB::GET-WM-CLASS SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::GET-WM-CLASS
      #68Y(00 00 00 00 01 00 00 00 00 02 AD DA DB DC DD DE DF 99 06 6E 08 07 9D
           1F 29 E2 AD 38 06 72 5D AD E3 AE 72 43 AE 96 02 B0 72 45 72 96 72 43
           AD 72 45 8F 91 01 9E 14 AD 72 45 8F 91 01 9E 14 40 02 19 06 19 03)
      :WM_CLASS :TYPE :STRING :RESULT-TYPE COMMON-LISP::STRING :TRANSFORM
      XLIB::CARD8->CHAR XLIB::GET-PROPERTY #.(XLIB::CARD8->CHAR 0.) 0.))
#Y(#:|93| #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   XLIB::SET-WM-CLASS SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::SET-WM-CLASS
      #37Y(00 00 00 00 03 00 00 00 00 04 AF DA 92 04 01 C6 14 71 4A DC 92 05 01
           C8 14 71 4A DE 73 04 13 2D 03 05 3E 19 04)
      :WM_CLASS ""
      #.(COMMON-LISP::MAKE-STRING 1. :INITIAL-ELEMENT (XLIB::CARD8->CHAR 0.))
      ""
      #.(COMMON-LISP::MAKE-STRING 1. :INITIAL-ELEMENT (XLIB::CARD8->CHAR 0.))
      XLIB::SET-STRING-PROPERTY))
#Y(#:|94| #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   XLIB::WM-COMMAND SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::WM-COMMAND
      #61Y(00 00 00 00 01 00 00 00 00 02 AD DA DB DC DD DE DF 99 06 6E 08 07 63
           E2 E2 AF 72 45 1B 14 E3 B1 38 06 A7 FC 81 5D 01 B0 AF AF 72 43 84 03
           AD 81 95 02 AE AD 91 01 33 66 AF 32 47 19 07)
      :WM_COMMAND :TYPE :STRING :RESULT-TYPE COMMON-LISP::STRING :TRANSFORM
      XLIB::CARD8->CHAR XLIB::GET-PROPERTY 0. #.(XLIB::CARD8->CHAR 0.)))
#Y(#:|95|
   #28Y(00 00 00 00 00 00 00 00 00 01 DA DB 32 87 DA DC DD 32 86 DA DE 63 2D 03
        05 C5 19 01)
   XLIB::WM-COMMAND SYSTEM::DEFSTRUCT-WRITER SYSTEM::SETF-EXPANDER
   XLIB::SET-WM-COMMAND COMMON-LISP::SETF SYSTEM::%SET-DOCUMENTATION)
#Y(#:|96| #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   XLIB::SET-WM-COMMAND SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::SET-WM-COMMAND
      #202Y(03 00 01 00 02 00 00 00 00 03 AE DA 63 38 01 72 73 53 80 A8 6B 01
            64 DC DD 63 64 64 01 07 64 01 03 DE 63 DF 63 DC E0 64 01 02 38 01
            31 6C 10 07 04 1C 10 08 04 1E 10 09 04 20 10 0A 04 22 10 0B 04 24
            10 0C 04 26 10 0D 04 28 10 0E 04 2A 10 0F 04 2C 10 10 04 2E 10 11
            04 30 10 12 04 32 10 13 04 34 10 14 04 36 10 15 04 38 10 16 04 3A
            10 17 04 3C 10 18 04 3E 10 19 04 40 10 1A 04 42 10 1B 04 44 10 1C
            04 46 10 1D 04 48 10 1E 04 4A 10 1F 04 4C 10 20 04 4E 10 21 66 71
            63 1B 10 87 01 00 14 66 70 31 80 65 22 66 70 31 87 83 01 AD 8D 91
            6C 16 02 12 1B 16 1A AE 32 74 3F 54 67 00 00 00 2F 23 55 F8 2D 03
            24 9E 19 03)
      :WM_COMMAND SYSTEM::*COMMON-LISP-USER-PACKAGE* 10. :UPCASE 1. 79.
      COMMON-LISP::SINGLE-FLOAT COMMON-LISP::*READTABLE* COMMON-LISP::*PACKAGE*
      COMMON-LISP::*PRINT-ARRAY* COMMON-LISP::*PRINT-BASE*
      COMMON-LISP::*PRINT-CASE* COMMON-LISP::*PRINT-CIRCLE*
      COMMON-LISP::*PRINT-ESCAPE* COMMON-LISP::*PRINT-GENSYM*
      COMMON-LISP::*PRINT-LENGTH* COMMON-LISP::*PRINT-LEVEL*
      COMMON-LISP::*PRINT-LINES* COMMON-LISP::*PRINT-MISER-WIDTH*
      COMMON-LISP::*PRINT-PPRINT-DISPATCH* COMMON-LISP::*PRINT-PRETTY*
      COMMON-LISP::*PRINT-RADIX* COMMON-LISP::*PRINT-READABLY*
      COMMON-LISP::*PRINT-RIGHT-MARGIN* CUSTOM::*PRINT-CLOSURE*
      CUSTOM::*PRINT-RPARS* CUSTOM::*PRINT-INDENT-LISTS* SYSTEM::*PRIN-STREAM*
      SYSTEM::*PRIN-LINELENGTH* SYSTEM::*PRIN-LINE-PREFIX*
      COMMON-LISP::*READ-BASE* COMMON-LISP::*READ-DEFAULT-FLOAT-FORMAT*
      COMMON-LISP::*READ-EVAL* COMMON-LISP::*READ-SUPPRESS*
      #.(XLIB::CARD8->CHAR 0.) COMMON-LISP::CLOSE XLIB::SET-STRING-PROPERTY))
#Y(#:|97|
   #22Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 6F 03 32 80 C5 19 01)
   XLIB::DECODE-TYPE SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::DECODE-TYPE
      #74Y(00 00 00 00 01 00 01 00 00 08 AE 72 45 DA 90 01 2F 26 9F 5C 78 A0 5C
           5C 78 AD 24 02 20 AD 24 05 20 9E 20 21 94 01 25 07 1C E2 E3 95 03 E4
           72 28 61 02 14 AE 61 03 19 05 AE 2F 01 19 03 DD C9 1B 71 E0 C9 1B 6D
           E5 AE 33 01 1E)
      3. SYSTEM::MACRO-CALL-ERROR XLIB::PIXMAP XLIB::LOOKUP-PIXMAP
      XLIB::%BUFFER XLIB::WINDOW XLIB::LOOKUP-WINDOW COMMON-LISP::MEMBER
      COMMON-LISP::AREF COMMON-LISP::QUOTE COMMON-LISP::VECTOR
      "Unknown type ~S.")
   SYSTEM::MAKE-MACRO)
#Y(#:|98|
   #22Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 6F 03 32 80 C5 19 01)
   XLIB::ENCODE-TYPE SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::ENCODE-TYPE
      #101Y(00 00 00 00 01 00 01 00 00 08 AE 72 45 DA 90 01 2F 1E 9F 5C 78 A0
            5C 5C 78 AD 24 02 18 AD 24 04 17 AD 24 06 16 AD 25 07 2B CD 14 AD
            61 02 19 05 AE 2F 01 19 03 C8 1B 72 CA 1B 6F 15 19 04 E4 E5 E3 AF
            7B 03 D1 62 02 19 05 E8 AD E9 95 04 7B 02 61 03 19 05 AD 24 09 66
            9E 20 05 94 01 24 0D 69 EA AE 33 01 1E)
      3. SYSTEM::MACRO-CALL-ERROR XLIB::PIXMAP XLIB::PIXMAP-ID XLIB::WINDOW
      XLIB::WINDOW-ID XLIB::CARD16 XLIB::COLORMAP XLIB::COLORMAP-ID
      XLIB::RGB-VAL COMMON-LISP::ROUND COMMON-LISP::THE
      ((COMMON-LISP::LOAD-TIME-VALUE (COMMON-LISP::/ 1.0s0 65535.)))
      COMMON-LISP::MEMBER COMMON-LISP::POSITION COMMON-LISP::QUOTE
      "Unknown type ~S.")
   SYSTEM::MAKE-MACRO)
#Y(#:|99|
   #666Y(00 00 00 00 00 00 00 00 00 01 00 2B 01 DA DB DC 38 01 72 82 C8 5F 5D
         0B 00 00 DE 2F 05 DE AD 6D 06 01 32 80 DA DC 68 02 00 64 DE E1 73 04
         00 32 86 16 01 DA 2F 08 E3 31 59 E4 2F 05 E4 E5 E6 32 86 E4 E7 32 80
         E8 31 59 E9 2F 05 E9 E5 EA 32 86 E9 EB 32 80 EC 31 59 ED 31 59 EE 2F
         05 EE E5 EF 32 86 EE F0 32 80 EE F1 DA 32 86 F2 31 59 F3 31 59 F4 2F
         05 F4 E5 F5 32 86 F4 F6 32 80 F4 F1 DA 32 86 F7 31 59 65 1E 31 59 65
         1F 2F 05 65 1F E5 65 20 32 86 65 1F 65 21 32 80 65 1F F1 DA 32 86 65
         22 31 59 65 23 31 59 65 24 2F 05 65 24 E5 65 25 32 86 65 24 65 26 32
         80 65 24 F1 DA 32 86 65 27 31 59 65 28 31 59 65 29 2F 05 65 29 E5 65
         2A 32 86 65 29 65 2B 32 80 65 29 F1 DA 32 86 65 2C 31 59 65 2D 31 59
         65 2E 2F 05 65 2E E5 65 2F 32 86 65 2E 65 30 32 80 65 2E F1 DA 32 86
         65 31 31 59 65 32 31 59 65 33 2F 05 65 33 E5 65 34 32 86 65 33 65 35
         32 80 65 33 F1 DA 32 86 65 36 31 59 65 37 31 59 65 38 2F 05 65 38 E5
         65 39 32 86 65 38 65 3A 32 80 65 38 F1 DA 32 86 65 3B 31 59 65 3C 31
         59 65 3D 2F 05 65 3D E5 65 3E 32 86 65 3D 65 3F 32 80 65 3D F1 DA 32
         86 EE 65 40 32 87 EE 65 41 65 42 65 43 03 44 7C 02 32 86 EE 65 45 63
         2D 03 46 EE 65 40 DA 32 86 F4 65 40 32 87 F4 65 41 65 42 65 43 03 47
         7C 02 32 86 F4 65 45 63 2D 03 46 F4 65 40 DA 32 86 65 1F 65 40 32 87
         65 1F 65 41 65 42 65 43 03 48 7C 02 32 86 65 1F 65 45 63 2D 03 46 65
         1F 65 40 DA 32 86 65 24 65 40 32 87 65 24 65 41 65 42 65 43 03 49 7C
         02 32 86 65 24 65 45 63 2D 03 46 65 24 65 40 DA 32 86 65 29 65 40 32
         87 65 29 65 41 65 42 65 43 03 4A 7C 02 32 86 65 29 65 45 63 2D 03 46
         65 29 65 40 DA 32 86 65 2E 65 40 32 87 65 2E 65 41 65 42 65 43 03 4B
         7C 02 32 86 65 2E 65 45 63 2D 03 46 65 2E 65 40 DA 32 86 65 33 65 40
         32 87 65 33 65 41 65 42 65 43 03 4C 7C 02 32 86 65 33 65 45 63 2D 03
         46 65 33 65 40 DA 32 86 65 38 65 40 32 87 65 38 65 41 65 42 65 43 03
         4D 7C 02 32 86 65 38 65 45 63 2D 03 46 65 38 65 40 DA 32 86 65 3D 65
         40 32 87 65 3D 65 41 65 42 65 43 03 4E 7C 02 32 86 65 3D 65 45 63 2D
         03 46 65 3D 65 40 DA 32 86 DA 65 4F 63 2D 03 46 DA 2F 50 C5 19 01)
   XLIB::WM-HINTS COMMON-LISP::STRUCTURE-OBJECT SYSTEM::DEFSTRUCT-DESCRIPTION
   0. XLIB::MAKE-WM-HINTS SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::MAKE-WM-HINTS
      #98Y(00 00 00 00 00 00 00 00 80 1B 09 00 01 00 3D 09 3D 08 3D 07 3D 06 3D
           05 3D 04 3D 03 3D 02 3B 01 02 CF F9 69 00 01 E5 72 2E E6 AD E7 B9 32
           2D E6 AD E8 B8 32 2D E6 AD E9 B7 32 2D E6 AD EA B6 32 2D E6 AD EB B5
           32 2D E6 AD EC B4 32 2D E6 AD ED B3 32 2D E6 AD EE B2 32 2D E6 AD EF
           B1 32 2D 15 19 0A)
      COMMON-LISP::NIL :INPUT :INITIAL-STATE :ICON-PIXMAP :ICON-WINDOW :ICON-X
      :ICON-Y :ICON-MASK :WINDOW-GROUP :FLAGS 0. 10. XLIB::WM-HINTS 1. 2. 3. 4.
      5. 6. 7. 8. 9.)
   (#(XLIB::INPUT (:INPUT) 1. (COMMON-LISP::NIL) COMMON-LISP::NIL
      COMMON-LISP::T COMMON-LISP::NIL)
    #(XLIB::INITIAL-STATE (:INITIAL-STATE) 2. (COMMON-LISP::NIL)
      COMMON-LISP::NIL COMMON-LISP::T COMMON-LISP::NIL)
    #(XLIB::ICON-PIXMAP (:ICON-PIXMAP) 3. (COMMON-LISP::NIL) COMMON-LISP::NIL
      COMMON-LISP::T COMMON-LISP::NIL)
    #(XLIB::ICON-WINDOW (:ICON-WINDOW) 4. (COMMON-LISP::NIL) COMMON-LISP::NIL
      COMMON-LISP::T COMMON-LISP::NIL)
    #(XLIB::ICON-X (:ICON-X) 5. (COMMON-LISP::NIL) COMMON-LISP::NIL
      COMMON-LISP::T COMMON-LISP::NIL)
    #(XLIB::ICON-Y (:ICON-Y) 6. (COMMON-LISP::NIL) COMMON-LISP::NIL
      COMMON-LISP::T COMMON-LISP::NIL)
    #(XLIB::ICON-MASK (:ICON-MASK) 7. (COMMON-LISP::NIL) COMMON-LISP::NIL
      COMMON-LISP::T COMMON-LISP::NIL)
    #(XLIB::WINDOW-GROUP (:WINDOW-GROUP) 8. (COMMON-LISP::NIL) COMMON-LISP::NIL
      COMMON-LISP::T COMMON-LISP::NIL)
    #(XLIB::FLAGS (:FLAGS) 9. (COMMON-LISP::NIL . 0.) 0. COMMON-LISP::T
      COMMON-LISP::NIL))
   CLOS::DEFINE-STRUCTURE-CLASS (COMMON-LISP::INLINE XLIB::WM-HINTS-P)
   XLIB::WM-HINTS-P SYSTEM::INLINE-EXPANSION
   ((SYSTEM::OBJECT) (COMMON-LISP::DECLARE (SYSTEM::IN-DEFUN XLIB::WM-HINTS-P))
    (COMMON-LISP::BLOCK XLIB::WM-HINTS-P
     (SYSTEM::%STRUCTURE-TYPE-P 'XLIB::WM-HINTS SYSTEM::OBJECT)))
   #Y(XLIB::WM-HINTS-P #16Y(00 00 00 00 01 00 00 00 00 02 DA AE 32 30 19 02)
      XLIB::WM-HINTS)
   (COMMON-LISP::INLINE XLIB::COPY-WM-HINTS) XLIB::COPY-WM-HINTS
   ((COMMON-LISP::STRUCTURE)
    (COMMON-LISP::DECLARE (SYSTEM::IN-DEFUN XLIB::COPY-WM-HINTS))
    (COMMON-LISP::BLOCK XLIB::COPY-WM-HINTS
     (COMMON-LISP::COPY-STRUCTURE COMMON-LISP::STRUCTURE)))
   #Y(XLIB::COPY-WM-HINTS #15Y(00 00 00 00 01 00 00 00 00 02 AD 32 2F 19 02))
   (COMMON-LISP::FUNCTION XLIB::WM-HINTS-INPUT (XLIB::WM-HINTS) COMMON-LISP::T)
   (COMMON-LISP::INLINE XLIB::WM-HINTS-INPUT) XLIB::WM-HINTS-INPUT
   (#1=(SYSTEM::OBJECT)
    (COMMON-LISP::DECLARE (SYSTEM::IN-DEFUN XLIB::WM-HINTS-INPUT))
    (COMMON-LISP::BLOCK XLIB::WM-HINTS-INPUT
     (COMMON-LISP::THE COMMON-LISP::T
      (SYSTEM::%STRUCTURE-REF 'XLIB::WM-HINTS SYSTEM::OBJECT 1.))))
   #Y(XLIB::WM-HINTS-INPUT
      #17Y(00 00 00 00 01 00 00 00 00 02 DA AE DB 32 2C 19 02) XLIB::WM-HINTS
      1.)
   SYSTEM::DEFSTRUCT-READER
   (COMMON-LISP::FUNCTION XLIB::WM-HINTS-INITIAL-STATE (XLIB::WM-HINTS)
    COMMON-LISP::T)
   (COMMON-LISP::INLINE XLIB::WM-HINTS-INITIAL-STATE)
   XLIB::WM-HINTS-INITIAL-STATE
   (#1# (COMMON-LISP::DECLARE (SYSTEM::IN-DEFUN XLIB::WM-HINTS-INITIAL-STATE))
    (COMMON-LISP::BLOCK XLIB::WM-HINTS-INITIAL-STATE
     (COMMON-LISP::THE COMMON-LISP::T
      (SYSTEM::%STRUCTURE-REF 'XLIB::WM-HINTS SYSTEM::OBJECT 2.))))
   #Y(XLIB::WM-HINTS-INITIAL-STATE
      #17Y(00 00 00 00 01 00 00 00 00 02 DA AE DB 32 2C 19 02) XLIB::WM-HINTS
      2.)
   (COMMON-LISP::FUNCTION XLIB::WM-HINTS-ICON-PIXMAP (XLIB::WM-HINTS)
    COMMON-LISP::T)
   (COMMON-LISP::INLINE XLIB::WM-HINTS-ICON-PIXMAP) XLIB::WM-HINTS-ICON-PIXMAP
   (#1# (COMMON-LISP::DECLARE (SYSTEM::IN-DEFUN XLIB::WM-HINTS-ICON-PIXMAP))
    (COMMON-LISP::BLOCK XLIB::WM-HINTS-ICON-PIXMAP
     (COMMON-LISP::THE COMMON-LISP::T
      (SYSTEM::%STRUCTURE-REF 'XLIB::WM-HINTS SYSTEM::OBJECT 3.))))
   #Y(XLIB::WM-HINTS-ICON-PIXMAP
      #17Y(00 00 00 00 01 00 00 00 00 02 DA AE DB 32 2C 19 02) XLIB::WM-HINTS
      3.)
   (COMMON-LISP::FUNCTION XLIB::WM-HINTS-ICON-WINDOW (XLIB::WM-HINTS)
    COMMON-LISP::T)
   (COMMON-LISP::INLINE XLIB::WM-HINTS-ICON-WINDOW) XLIB::WM-HINTS-ICON-WINDOW
   (#1# (COMMON-LISP::DECLARE (SYSTEM::IN-DEFUN XLIB::WM-HINTS-ICON-WINDOW))
    (COMMON-LISP::BLOCK XLIB::WM-HINTS-ICON-WINDOW
     (COMMON-LISP::THE COMMON-LISP::T
      (SYSTEM::%STRUCTURE-REF 'XLIB::WM-HINTS SYSTEM::OBJECT 4.))))
   #Y(XLIB::WM-HINTS-ICON-WINDOW
      #17Y(00 00 00 00 01 00 00 00 00 02 DA AE DB 32 2C 19 02) XLIB::WM-HINTS
      4.)
   (COMMON-LISP::FUNCTION XLIB::WM-HINTS-ICON-X (XLIB::WM-HINTS)
    COMMON-LISP::T)
   (COMMON-LISP::INLINE XLIB::WM-HINTS-ICON-X) XLIB::WM-HINTS-ICON-X
   (#1# (COMMON-LISP::DECLARE (SYSTEM::IN-DEFUN XLIB::WM-HINTS-ICON-X))
    (COMMON-LISP::BLOCK XLIB::WM-HINTS-ICON-X
     (COMMON-LISP::THE COMMON-LISP::T
      (SYSTEM::%STRUCTURE-REF 'XLIB::WM-HINTS SYSTEM::OBJECT 5.))))
   #Y(XLIB::WM-HINTS-ICON-X
      #17Y(00 00 00 00 01 00 00 00 00 02 DA AE DB 32 2C 19 02) XLIB::WM-HINTS
      5.)
   (COMMON-LISP::FUNCTION XLIB::WM-HINTS-ICON-Y (XLIB::WM-HINTS)
    COMMON-LISP::T)
   (COMMON-LISP::INLINE XLIB::WM-HINTS-ICON-Y) XLIB::WM-HINTS-ICON-Y
   (#1# (COMMON-LISP::DECLARE (SYSTEM::IN-DEFUN XLIB::WM-HINTS-ICON-Y))
    (COMMON-LISP::BLOCK XLIB::WM-HINTS-ICON-Y
     (COMMON-LISP::THE COMMON-LISP::T
      (SYSTEM::%STRUCTURE-REF 'XLIB::WM-HINTS SYSTEM::OBJECT 6.))))
   #Y(XLIB::WM-HINTS-ICON-Y
      #17Y(00 00 00 00 01 00 00 00 00 02 DA AE DB 32 2C 19 02) XLIB::WM-HINTS
      6.)
   (COMMON-LISP::FUNCTION XLIB::WM-HINTS-ICON-MASK (XLIB::WM-HINTS)
    COMMON-LISP::T)
   (COMMON-LISP::INLINE XLIB::WM-HINTS-ICON-MASK) XLIB::WM-HINTS-ICON-MASK
   (#1# (COMMON-LISP::DECLARE (SYSTEM::IN-DEFUN XLIB::WM-HINTS-ICON-MASK))
    (COMMON-LISP::BLOCK XLIB::WM-HINTS-ICON-MASK
     (COMMON-LISP::THE COMMON-LISP::T
      (SYSTEM::%STRUCTURE-REF 'XLIB::WM-HINTS SYSTEM::OBJECT 7.))))
   #Y(XLIB::WM-HINTS-ICON-MASK
      #17Y(00 00 00 00 01 00 00 00 00 02 DA AE DB 32 2C 19 02) XLIB::WM-HINTS
      7.)
   (COMMON-LISP::FUNCTION XLIB::WM-HINTS-WINDOW-GROUP (XLIB::WM-HINTS)
    COMMON-LISP::T)
   (COMMON-LISP::INLINE XLIB::WM-HINTS-WINDOW-GROUP)
   XLIB::WM-HINTS-WINDOW-GROUP
   (#1# (COMMON-LISP::DECLARE (SYSTEM::IN-DEFUN XLIB::WM-HINTS-WINDOW-GROUP))
    (COMMON-LISP::BLOCK XLIB::WM-HINTS-WINDOW-GROUP
     (COMMON-LISP::THE COMMON-LISP::T
      (SYSTEM::%STRUCTURE-REF 'XLIB::WM-HINTS SYSTEM::OBJECT 8.))))
   #Y(XLIB::WM-HINTS-WINDOW-GROUP
      #17Y(00 00 00 00 01 00 00 00 00 02 DA AE DB 32 2C 19 02) XLIB::WM-HINTS
      8.)
   (COMMON-LISP::FUNCTION XLIB::WM-HINTS-FLAGS (XLIB::WM-HINTS) COMMON-LISP::T)
   (COMMON-LISP::INLINE XLIB::WM-HINTS-FLAGS) XLIB::WM-HINTS-FLAGS
   (#1# (COMMON-LISP::DECLARE (SYSTEM::IN-DEFUN XLIB::WM-HINTS-FLAGS))
    (COMMON-LISP::BLOCK XLIB::WM-HINTS-FLAGS
     (COMMON-LISP::THE COMMON-LISP::T
      (SYSTEM::%STRUCTURE-REF 'XLIB::WM-HINTS SYSTEM::OBJECT 9.))))
   #Y(XLIB::WM-HINTS-FLAGS
      #17Y(00 00 00 00 01 00 00 00 00 02 DA AE DB 32 2C 19 02) XLIB::WM-HINTS
      9.)
   SYSTEM::DEFSTRUCT-WRITER SYSTEM::SETF-EXPANDER -1. 1.
   #Y(XLIB::SETF-WM-HINTS-INPUT
      #22Y(00 00 00 00 02 00 00 00 00 03 9F 5C 78 DA DB AE DC B2 61 05 19 04)
      SYSTEM::%STRUCTURE-STORE 'XLIB::WM-HINTS 1.)
   COMMON-LISP::SETF SYSTEM::%SET-DOCUMENTATION
   #Y(XLIB::SETF-WM-HINTS-INITIAL-STATE
      #22Y(00 00 00 00 02 00 00 00 00 03 9F 5C 78 DA DB AE DC B2 61 05 19 04)
      SYSTEM::%STRUCTURE-STORE 'XLIB::WM-HINTS 2.)
   #Y(XLIB::SETF-WM-HINTS-ICON-PIXMAP
      #22Y(00 00 00 00 02 00 00 00 00 03 9F 5C 78 DA DB AE DC B2 61 05 19 04)
      SYSTEM::%STRUCTURE-STORE 'XLIB::WM-HINTS 3.)
   #Y(XLIB::SETF-WM-HINTS-ICON-WINDOW
      #22Y(00 00 00 00 02 00 00 00 00 03 9F 5C 78 DA DB AE DC B2 61 05 19 04)
      SYSTEM::%STRUCTURE-STORE 'XLIB::WM-HINTS 4.)
   #Y(XLIB::SETF-WM-HINTS-ICON-X
      #22Y(00 00 00 00 02 00 00 00 00 03 9F 5C 78 DA DB AE DC B2 61 05 19 04)
      SYSTEM::%STRUCTURE-STORE 'XLIB::WM-HINTS 5.)
   #Y(XLIB::SETF-WM-HINTS-ICON-Y
      #22Y(00 00 00 00 02 00 00 00 00 03 9F 5C 78 DA DB AE DC B2 61 05 19 04)
      SYSTEM::%STRUCTURE-STORE 'XLIB::WM-HINTS 6.)
   #Y(XLIB::SETF-WM-HINTS-ICON-MASK
      #22Y(00 00 00 00 02 00 00 00 00 03 9F 5C 78 DA DB AE DC B2 61 05 19 04)
      SYSTEM::%STRUCTURE-STORE 'XLIB::WM-HINTS 7.)
   #Y(XLIB::SETF-WM-HINTS-WINDOW-GROUP
      #22Y(00 00 00 00 02 00 00 00 00 03 9F 5C 78 DA DB AE DC B2 61 05 19 04)
      SYSTEM::%STRUCTURE-STORE 'XLIB::WM-HINTS 8.)
   #Y(XLIB::SETF-WM-HINTS-FLAGS
      #22Y(00 00 00 00 02 00 00 00 00 03 9F 5C 78 DA DB AE DC B2 61 05 19 04)
      SYSTEM::%STRUCTURE-STORE 'XLIB::WM-HINTS 9.)
   COMMON-LISP::STRUCTURE CLOS::DEFSTRUCT-REMOVE-PRINT-OBJECT-METHOD)
#Y(#:|100| #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   XLIB::WM-HINTS SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::WM-HINTS
      #32Y(00 00 00 00 01 00 00 00 00 02 AD DA DB DA DC DD 6E 06 04 9D 1F 08 14
           AF 6F 05 30 06 19 03 19 03)
      :WM_HINTS :TYPE :RESULT-TYPE COMMON-LISP::VECTOR XLIB::GET-PROPERTY
      XLIB::WINDOW-DISPLAY XLIB::DECODE-WM-HINTS))
#Y(#:|101|
   #28Y(00 00 00 00 00 00 00 00 00 01 DA DB 32 87 DA DC DD 32 86 DA DE 63 2D 03
        05 C5 19 01)
   XLIB::WM-HINTS SYSTEM::DEFSTRUCT-WRITER SYSTEM::SETF-EXPANDER
   XLIB::SET-WM-HINTS COMMON-LISP::SETF SYSTEM::%SET-DOCUMENTATION)
#Y(#:|102| #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   XLIB::SET-WM-HINTS SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::SET-WM-HINTS
      #23Y(00 00 00 00 02 00 00 00 00 03 AE DA AF 6F 01 DA DC 2D 05 03 9E 19
           03)
      :WM_HINTS XLIB::ENCODE-WM-HINTS 32. XLIB::CHANGE-PROPERTY))
#Y(#:|103| #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   XLIB::DECODE-WM-HINTS SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::DECODE-WM-HINTS
      #191Y(00 00 00 00 02 00 00 00 00 03 AE DA 73 01 01 2E 01 14 DC AD DD B0
            32 2D DA AE 8F CF 11 DE B1 DF 73 01 01 73 01 01 DC AE DF AF 32 2D
            16 01 DF AE 8F CF 11 E0 B1 E1 73 01 01 73 01 01 DC AE E1 AF 32 2D
            16 01 E1 AE 8F CF 10 AF B1 E2 73 01 01 70 09 DC AE E2 AF 32 2D 16
            01 E2 AE 8F CF 10 AF B1 E4 73 01 01 70 0B DC AE E4 AF 32 2D 16 01
            E4 AE 8F CF 1A B0 E6 73 01 01 DC AE E6 AF 32 2D 16 01 B0 E7 73 01
            01 DC AE E7 AF 32 2D 16 01 E6 AE 8F CF 10 AF B1 E8 73 01 01 70 09
            DC AE E8 AF 32 2D 16 01 E7 AE 8F CF 15 B0 72 45 E8 91 01 31 0D B0
            E9 73 01 01 DC AE E9 AF 32 2D 16 01 15 19 04)
      0. XLIB::MAKE-WM-HINTS XLIB::WM-HINTS 9. #(:OFF :ON) 1.
      #(:DONT-CARE :NORMAL :ZOOM :ICONIC :INACTIVE) 2. 3. XLIB::LOOKUP-PIXMAP
      4. XLIB::LOOKUP-WINDOW 5. 6. 7. 8.))
#Y(#:|104| #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   XLIB::ENCODE-WM-HINTS SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::ENCODE-WM-HINTS
      #213Y(00 00 00 00 01 00 00 00 00 02 DA 38 07 C6 FC 71 1C DB AF 89 02 12
            C8 F8 AF 6F 02 DE 38 06 72 5D AE DD AE 33 01 02 16 01 AF 89 05 16
            AC E0 82 02 3C 00 AF 6F 05 E1 38 06 72 5D AE E0 AE 33 01 02 16 01
            AF 89 08 13 AC E3 82 02 3C 00 AF 6F 08 6F 0A AE E5 AE 33 01 02 16
            01 AF 89 0C 13 AC E7 82 02 3C 00 AF 6F 0C 6F 0E AE E3 AE 33 01 02
            16 01 AF 89 0F 20 AF 89 10 1C AC EB 82 02 3C 00 AF 6F 0F AE EC AE
            33 01 02 16 01 AF 6F 10 AE ED AE 33 01 02 16 01 AF 89 14 13 AC EF
            82 02 3C 00 AF 6F 14 6F 0A AE F0 AE 33 01 02 16 01 AF 89 17 11 AC
            F2 82 02 3C 00 AF 6F 17 AE E7 AE 33 01 02 16 01 AC B0 6F 19 F4 72
            C9 73 02 3C AE DB AE 33 01 02 16 01 9E 19 04)
      9. 0. XLIB::WM-HINTS-INPUT 1. (:OFF :ON) XLIB::WM-HINTS-INITIAL-STATE 2.
      (:DONT-CARE :NORMAL :ZOOM :ICONIC :INACTIVE) XLIB::WM-HINTS-ICON-PIXMAP
      4. XLIB::PIXMAP-ID 3. XLIB::WM-HINTS-ICON-WINDOW 8. XLIB::WINDOW-ID
      XLIB::WM-HINTS-ICON-X XLIB::WM-HINTS-ICON-Y 16. 5. 6.
      XLIB::WM-HINTS-ICON-MASK 32. 7. XLIB::WM-HINTS-WINDOW-GROUP 64.
      XLIB::WM-HINTS-FLAGS 127.))
#Y(#:|105|
   #1339Y(00 00 00 00 00 00 00 00 00 01 00 2B 01 DA DB DC 38 01 72 82 C8 5F 5D
          0B 00 00 DE 2F 05 DE AD 6D 06 01 32 80 DA DC 68 02 00 64 DE E1 73 04
          00 32 86 16 01 DA 2F 08 E3 31 59 E4 2F 05 E4 E5 E6 32 86 E4 E7 32 80
          E8 31 59 E9 2F 05 E9 E5 EA 32 86 E9 EB 32 80 EC 31 59 ED 31 59 EE 2F
          05 EE E5 EF 32 86 EE F0 32 80 EE F1 DA 32 86 F2 31 59 F3 31 59 F4 2F
          05 F4 E5 F5 32 86 F4 F6 32 80 F4 F1 DA 32 86 F7 31 59 65 1E 31 59 65
          1F 2F 05 65 1F E5 65 20 32 86 65 1F 65 21 32 80 65 1F F1 DA 32 86 65
          22 31 59 65 23 31 59 65 24 2F 05 65 24 E5 65 25 32 86 65 24 65 26 32
          80 65 24 F1 DA 32 86 65 27 31 59 65 28 31 59 65 29 2F 05 65 29 E5 65
          2A 32 86 65 29 65 2B 32 80 65 29 F1 DA 32 86 65 2C 31 59 65 2D 31 59
          65 2E 2F 05 65 2E E5 65 2F 32 86 65 2E 65 30 32 80 65 2E F1 DA 32 86
          65 31 31 59 65 32 31 59 65 33 2F 05 65 33 E5 65 34 32 86 65 33 65 35
          32 80 65 33 F1 DA 32 86 65 36 31 59 65 37 31 59 65 38 2F 05 65 38 E5
          65 39 32 86 65 38 65 3A 32 80 65 38 F1 DA 32 86 65 3B 31 59 65 3C 31
          59 65 3D 2F 05 65 3D E5 65 3E 32 86 65 3D 65 3F 32 80 65 3D F1 DA 32
          86 65 40 31 59 65 41 31 59 65 42 2F 05 65 42 E5 65 43 32 86 65 42 65
          44 32 80 65 42 F1 DA 32 86 65 45 31 59 65 46 31 59 65 47 2F 05 65 47
          E5 65 48 32 86 65 47 65 49 32 80 65 47 F1 DA 32 86 65 4A 31 59 65 4B
          31 59 65 4C 2F 05 65 4C E5 65 4D 32 86 65 4C 65 4E 32 80 65 4C F1 DA
          32 86 65 4F 31 59 65 50 31 59 65 51 2F 05 65 51 E5 65 52 32 86 65 51
          65 53 32 80 65 51 F1 DA 32 86 65 54 31 59 65 55 31 59 65 56 2F 05 65
          56 E5 65 57 32 86 65 56 65 58 32 80 65 56 F1 DA 32 86 65 59 31 59 65
          5A 31 59 65 5B 2F 05 65 5B E5 65 5C 32 86 65 5B 65 5D 32 80 65 5B F1
          DA 32 86 65 5E 31 59 65 5F 31 59 65 60 2F 05 65 60 E5 65 61 32 86 65
          60 65 62 32 80 65 60 F1 DA 32 86 65 63 31 59 65 64 31 59 65 65 2F 05
          65 65 E5 65 66 32 86 65 65 65 67 32 80 65 65 F1 DA 32 86 65 68 31 59
          65 69 31 59 65 6A 2F 05 65 6A E5 65 6B 32 86 65 6A 65 6C 32 80 65 6A
          F1 DA 32 86 65 6D 31 59 65 6E 31 59 65 6F 2F 05 65 6F E5 65 70 32 86
          65 6F 65 71 32 80 65 6F F1 DA 32 86 EE 65 72 32 87 EE 65 73 65 74 65
          75 03 76 7C 02 32 86 EE 65 77 63 2D 03 78 EE 65 72 DA 32 86 F4 65 72
          32 87 F4 65 73 65 74 65 75 03 79 7C 02 32 86 F4 65 77 63 2D 03 78 F4
          65 72 DA 32 86 65 1F 65 72 32 87 65 1F 65 73 65 74 65 75 03 7A 7C 02
          32 86 65 1F 65 77 63 2D 03 78 65 1F 65 72 DA 32 86 65 24 65 72 32 87
          65 24 65 73 65 74 65 75 03 7B 7C 02 32 86 65 24 65 77 63 2D 03 78 65
          24 65 72 DA 32 86 65 29 65 72 32 87 65 29 65 73 65 74 65 75 03 7C 7C
          02 32 86 65 29 65 77 63 2D 03 78 65 29 65 72 DA 32 86 65 2E 65 72 32
          87 65 2E 65 73 65 74 65 75 03 7D 7C 02 32 86 65 2E 65 77 63 2D 03 78
          65 2E 65 72 DA 32 86 65 33 65 72 32 87 65 33 65 73 65 74 65 75 03 7E
          7C 02 32 86 65 33 65 77 63 2D 03 78 65 33 65 72 DA 32 86 65 38 65 72
          32 87 65 38 65 73 65 74 65 75 03 7F 7C 02 32 86 65 38 65 77 63 2D 03
          78 65 38 65 72 DA 32 86 65 3D 65 72 32 87 65 3D 65 73 65 74 65 75 03
          80 80 7C 02 32 86 65 3D 65 77 63 2D 03 78 65 3D 65 72 DA 32 86 65 42
          65 72 32 87 65 42 65 73 65 74 65 75 03 80 81 7C 02 32 86 65 42 65 77
          63 2D 03 78 65 42 65 72 DA 32 86 65 47 65 72 32 87 65 47 65 73 65 74
          65 75 03 80 82 7C 02 32 86 65 47 65 77 63 2D 03 78 65 47 65 72 DA 32
          86 65 4C 65 72 32 87 65 4C 65 73 65 74 65 75 03 80 83 7C 02 32 86 65
          4C 65 77 63 2D 03 78 65 4C 65 72 DA 32 86 65 51 65 72 32 87 65 51 65
          73 65 74 65 75 03 80 84 7C 02 32 86 65 51 65 77 63 2D 03 78 65 51 65
          72 DA 32 86 65 56 65 72 32 87 65 56 65 73 65 74 65 75 03 80 85 7C 02
          32 86 65 56 65 77 63 2D 03 78 65 56 65 72 DA 32 86 65 5B 65 72 32 87
          65 5B 65 73 65 74 65 75 03 80 86 7C 02 32 86 65 5B 65 77 63 2D 03 78
          65 5B 65 72 DA 32 86 65 60 65 72 32 87 65 60 65 73 65 74 65 75 03 80
          87 7C 02 32 86 65 60 65 77 63 2D 03 78 65 60 65 72 DA 32 86 65 65 65
          72 32 87 65 65 65 73 65 74 65 75 03 80 88 7C 02 32 86 65 65 65 77 63
          2D 03 78 65 65 65 72 DA 32 86 65 6A 65 72 32 87 65 6A 65 73 65 74 65
          75 03 80 89 7C 02 32 86 65 6A 65 77 63 2D 03 78 65 6A 65 72 DA 32 86
          65 6F 65 72 32 87 65 6F 65 73 65 74 65 75 03 80 8A 7C 02 32 86 65 6F
          65 77 63 2D 03 78 65 6F 65 72 DA 32 86 DA 65 80 8B 63 2D 03 78 DA 2F
          80 8C C5 19 01)
   XLIB::WM-SIZE-HINTS COMMON-LISP::STRUCTURE-OBJECT
   SYSTEM::DEFSTRUCT-DESCRIPTION 0. XLIB::MAKE-WM-SIZE-HINTS
   SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::MAKE-WM-SIZE-HINTS
      #186Y(00 00 00 00 00 00 00 00 80 1B 13 00 01 00 3D 13 3D 12 3D 11 3D 10
            3D 0F 3D 0E 3D 0D 3D 0C 3D 0B 3D 0A 3D 09 3D 08 3D 07 3D 06 3D 05
            3D 04 3D 03 3D 02 3D 01 69 00 01 EE 72 2E EF AD F0 C3 32 2D EF AD
            F1 C2 32 2D EF AD F2 C1 32 2D EF AD F3 C0 32 2D EF AD F4 BF 32 2D
            EF AD F5 BE 32 2D EF AD F6 BD 32 2D EF AD F7 BC 32 2D EF AD 65 1E
            BB 32 2D EF AD 65 1F BA 32 2D EF AD 65 20 B9 32 2D EF AD 65 21 B8
            32 2D EF AD 65 22 B7 32 2D EF AD 65 23 B6 32 2D EF AD 65 24 B5 32
            2D EF AD 65 25 B4 32 2D EF AD 65 26 B3 32 2D EF AD 65 27 B2 32 2D
            EF AD 65 28 B1 32 2D 15 19 14)
      COMMON-LISP::NIL :USER-SPECIFIED-POSITION-P :USER-SPECIFIED-SIZE-P :X :Y
      :WIDTH :HEIGHT :MIN-WIDTH :MIN-HEIGHT :MAX-WIDTH :MAX-HEIGHT :WIDTH-INC
      :HEIGHT-INC :MIN-ASPECT :MAX-ASPECT :BASE-WIDTH :BASE-HEIGHT :WIN-GRAVITY
      :PROGRAM-SPECIFIED-POSITION-P :PROGRAM-SPECIFIED-SIZE-P 20.
      XLIB::WM-SIZE-HINTS 1. 2. 3. 4. 5. 6. 7. 8. 9. 10. 11. 12. 13. 14. 15.
      16. 17. 18. 19.)
   (#(XLIB::USER-SPECIFIED-POSITION-P (:USER-SPECIFIED-POSITION-P) 1.
      (COMMON-LISP::NIL) COMMON-LISP::NIL COMMON-LISP::BOOLEAN
      COMMON-LISP::NIL)
    #(XLIB::USER-SPECIFIED-SIZE-P (:USER-SPECIFIED-SIZE-P) 2.
      (COMMON-LISP::NIL) COMMON-LISP::NIL COMMON-LISP::BOOLEAN
      COMMON-LISP::NIL)
    #(XLIB::X (:X) 3. (COMMON-LISP::NIL) COMMON-LISP::NIL COMMON-LISP::T
      COMMON-LISP::NIL)
    #(XLIB::Y (:Y) 4. (COMMON-LISP::NIL) COMMON-LISP::NIL COMMON-LISP::T
      COMMON-LISP::NIL)
    #(XLIB::WIDTH (:WIDTH) 5. (COMMON-LISP::NIL) COMMON-LISP::NIL
      COMMON-LISP::T COMMON-LISP::NIL)
    #(XLIB::HEIGHT (:HEIGHT) 6. (COMMON-LISP::NIL) COMMON-LISP::NIL
      COMMON-LISP::T COMMON-LISP::NIL)
    #(XLIB::MIN-WIDTH (:MIN-WIDTH) 7. (COMMON-LISP::NIL) COMMON-LISP::NIL
      (COMMON-LISP::OR COMMON-LISP::NULL XLIB::CARD16) COMMON-LISP::NIL)
    #(XLIB::MIN-HEIGHT (:MIN-HEIGHT) 8. (COMMON-LISP::NIL) COMMON-LISP::NIL
      (COMMON-LISP::OR COMMON-LISP::NULL XLIB::CARD16) COMMON-LISP::NIL)
    #(XLIB::MAX-WIDTH (:MAX-WIDTH) 9. (COMMON-LISP::NIL) COMMON-LISP::NIL
      (COMMON-LISP::OR COMMON-LISP::NULL XLIB::CARD16) COMMON-LISP::NIL)
    #(XLIB::MAX-HEIGHT (:MAX-HEIGHT) 10. (COMMON-LISP::NIL) COMMON-LISP::NIL
      (COMMON-LISP::OR COMMON-LISP::NULL XLIB::CARD16) COMMON-LISP::NIL)
    #(XLIB::WIDTH-INC (:WIDTH-INC) 11. (COMMON-LISP::NIL) COMMON-LISP::NIL
      (COMMON-LISP::OR COMMON-LISP::NULL XLIB::CARD16) COMMON-LISP::NIL)
    #(XLIB::HEIGHT-INC (:HEIGHT-INC) 12. (COMMON-LISP::NIL) COMMON-LISP::NIL
      (COMMON-LISP::OR COMMON-LISP::NULL XLIB::CARD16) COMMON-LISP::NIL)
    #(XLIB::MIN-ASPECT (:MIN-ASPECT) 13. (COMMON-LISP::NIL) COMMON-LISP::NIL
      (COMMON-LISP::OR COMMON-LISP::NULL COMMON-LISP::NUMBER) COMMON-LISP::NIL)
    #(XLIB::MAX-ASPECT (:MAX-ASPECT) 14. (COMMON-LISP::NIL) COMMON-LISP::NIL
      (COMMON-LISP::OR COMMON-LISP::NULL COMMON-LISP::NUMBER) COMMON-LISP::NIL)
    #(XLIB::BASE-WIDTH (:BASE-WIDTH) 15. (COMMON-LISP::NIL) COMMON-LISP::NIL
      (COMMON-LISP::OR COMMON-LISP::NULL XLIB::CARD16) COMMON-LISP::NIL)
    #(XLIB::BASE-HEIGHT (:BASE-HEIGHT) 16. (COMMON-LISP::NIL) COMMON-LISP::NIL
      (COMMON-LISP::OR COMMON-LISP::NULL XLIB::CARD16) COMMON-LISP::NIL)
    #(XLIB::WIN-GRAVITY (:WIN-GRAVITY) 17. (COMMON-LISP::NIL) COMMON-LISP::NIL
      (COMMON-LISP::OR COMMON-LISP::NULL XLIB::WIN-GRAVITY) COMMON-LISP::NIL)
    #(XLIB::PROGRAM-SPECIFIED-POSITION-P (:PROGRAM-SPECIFIED-POSITION-P) 18.
      (COMMON-LISP::NIL) COMMON-LISP::NIL COMMON-LISP::BOOLEAN
      COMMON-LISP::NIL)
    #(XLIB::PROGRAM-SPECIFIED-SIZE-P (:PROGRAM-SPECIFIED-SIZE-P) 19.
      (COMMON-LISP::NIL) COMMON-LISP::NIL COMMON-LISP::BOOLEAN
      COMMON-LISP::NIL))
   CLOS::DEFINE-STRUCTURE-CLASS (COMMON-LISP::INLINE XLIB::WM-SIZE-HINTS-P)
   XLIB::WM-SIZE-HINTS-P SYSTEM::INLINE-EXPANSION
   ((SYSTEM::OBJECT)
    (COMMON-LISP::DECLARE (SYSTEM::IN-DEFUN XLIB::WM-SIZE-HINTS-P))
    (COMMON-LISP::BLOCK XLIB::WM-SIZE-HINTS-P
     (SYSTEM::%STRUCTURE-TYPE-P 'XLIB::WM-SIZE-HINTS SYSTEM::OBJECT)))
   #Y(XLIB::WM-SIZE-HINTS-P
      #16Y(00 00 00 00 01 00 00 00 00 02 DA AE 32 30 19 02)
      XLIB::WM-SIZE-HINTS)
   (COMMON-LISP::INLINE XLIB::COPY-WM-SIZE-HINTS) XLIB::COPY-WM-SIZE-HINTS
   ((COMMON-LISP::STRUCTURE)
    (COMMON-LISP::DECLARE (SYSTEM::IN-DEFUN XLIB::COPY-WM-SIZE-HINTS))
    (COMMON-LISP::BLOCK XLIB::COPY-WM-SIZE-HINTS
     (COMMON-LISP::COPY-STRUCTURE COMMON-LISP::STRUCTURE)))
   #Y(XLIB::COPY-WM-SIZE-HINTS
      #15Y(00 00 00 00 01 00 00 00 00 02 AD 32 2F 19 02))
   (COMMON-LISP::FUNCTION XLIB::WM-SIZE-HINTS-USER-SPECIFIED-POSITION-P
    (XLIB::WM-SIZE-HINTS) COMMON-LISP::BOOLEAN)
   (COMMON-LISP::INLINE XLIB::WM-SIZE-HINTS-USER-SPECIFIED-POSITION-P)
   XLIB::WM-SIZE-HINTS-USER-SPECIFIED-POSITION-P
   (#1=(SYSTEM::OBJECT)
    (COMMON-LISP::DECLARE
     (SYSTEM::IN-DEFUN XLIB::WM-SIZE-HINTS-USER-SPECIFIED-POSITION-P))
    (COMMON-LISP::BLOCK XLIB::WM-SIZE-HINTS-USER-SPECIFIED-POSITION-P
     (COMMON-LISP::THE COMMON-LISP::BOOLEAN
      (SYSTEM::%STRUCTURE-REF 'XLIB::WM-SIZE-HINTS SYSTEM::OBJECT 1.))))
   #Y(XLIB::WM-SIZE-HINTS-USER-SPECIFIED-POSITION-P
      #17Y(00 00 00 00 01 00 00 00 00 02 DA AE DB 32 2C 19 02)
      XLIB::WM-SIZE-HINTS 1.)
   SYSTEM::DEFSTRUCT-READER
   (COMMON-LISP::FUNCTION XLIB::WM-SIZE-HINTS-USER-SPECIFIED-SIZE-P
    (XLIB::WM-SIZE-HINTS) COMMON-LISP::BOOLEAN)
   (COMMON-LISP::INLINE XLIB::WM-SIZE-HINTS-USER-SPECIFIED-SIZE-P)
   XLIB::WM-SIZE-HINTS-USER-SPECIFIED-SIZE-P
   (#1#
    (COMMON-LISP::DECLARE
     (SYSTEM::IN-DEFUN XLIB::WM-SIZE-HINTS-USER-SPECIFIED-SIZE-P))
    (COMMON-LISP::BLOCK XLIB::WM-SIZE-HINTS-USER-SPECIFIED-SIZE-P
     (COMMON-LISP::THE COMMON-LISP::BOOLEAN
      (SYSTEM::%STRUCTURE-REF 'XLIB::WM-SIZE-HINTS SYSTEM::OBJECT 2.))))
   #Y(XLIB::WM-SIZE-HINTS-USER-SPECIFIED-SIZE-P
      #17Y(00 00 00 00 01 00 00 00 00 02 DA AE DB 32 2C 19 02)
      XLIB::WM-SIZE-HINTS 2.)
   (COMMON-LISP::FUNCTION XLIB::WM-SIZE-HINTS-X (XLIB::WM-SIZE-HINTS)
    COMMON-LISP::T)
   (COMMON-LISP::INLINE XLIB::WM-SIZE-HINTS-X) XLIB::WM-SIZE-HINTS-X
   (#1# (COMMON-LISP::DECLARE (SYSTEM::IN-DEFUN XLIB::WM-SIZE-HINTS-X))
    (COMMON-LISP::BLOCK XLIB::WM-SIZE-HINTS-X
     (COMMON-LISP::THE COMMON-LISP::T
      (SYSTEM::%STRUCTURE-REF 'XLIB::WM-SIZE-HINTS SYSTEM::OBJECT 3.))))
   #Y(XLIB::WM-SIZE-HINTS-X
      #17Y(00 00 00 00 01 00 00 00 00 02 DA AE DB 32 2C 19 02)
      XLIB::WM-SIZE-HINTS 3.)
   (COMMON-LISP::FUNCTION XLIB::WM-SIZE-HINTS-Y (XLIB::WM-SIZE-HINTS)
    COMMON-LISP::T)
   (COMMON-LISP::INLINE XLIB::WM-SIZE-HINTS-Y) XLIB::WM-SIZE-HINTS-Y
   (#1# (COMMON-LISP::DECLARE (SYSTEM::IN-DEFUN XLIB::WM-SIZE-HINTS-Y))
    (COMMON-LISP::BLOCK XLIB::WM-SIZE-HINTS-Y
     (COMMON-LISP::THE COMMON-LISP::T
      (SYSTEM::%STRUCTURE-REF 'XLIB::WM-SIZE-HINTS SYSTEM::OBJECT 4.))))
   #Y(XLIB::WM-SIZE-HINTS-Y
      #17Y(00 00 00 00 01 00 00 00 00 02 DA AE DB 32 2C 19 02)
      XLIB::WM-SIZE-HINTS 4.)
   (COMMON-LISP::FUNCTION XLIB::WM-SIZE-HINTS-WIDTH (XLIB::WM-SIZE-HINTS)
    COMMON-LISP::T)
   (COMMON-LISP::INLINE XLIB::WM-SIZE-HINTS-WIDTH) XLIB::WM-SIZE-HINTS-WIDTH
   (#1# (COMMON-LISP::DECLARE (SYSTEM::IN-DEFUN XLIB::WM-SIZE-HINTS-WIDTH))
    (COMMON-LISP::BLOCK XLIB::WM-SIZE-HINTS-WIDTH
     (COMMON-LISP::THE COMMON-LISP::T
      (SYSTEM::%STRUCTURE-REF 'XLIB::WM-SIZE-HINTS SYSTEM::OBJECT 5.))))
   #Y(XLIB::WM-SIZE-HINTS-WIDTH
      #17Y(00 00 00 00 01 00 00 00 00 02 DA AE DB 32 2C 19 02)
      XLIB::WM-SIZE-HINTS 5.)
   (COMMON-LISP::FUNCTION XLIB::WM-SIZE-HINTS-HEIGHT (XLIB::WM-SIZE-HINTS)
    COMMON-LISP::T)
   (COMMON-LISP::INLINE XLIB::WM-SIZE-HINTS-HEIGHT) XLIB::WM-SIZE-HINTS-HEIGHT
   (#1# (COMMON-LISP::DECLARE (SYSTEM::IN-DEFUN XLIB::WM-SIZE-HINTS-HEIGHT))
    (COMMON-LISP::BLOCK XLIB::WM-SIZE-HINTS-HEIGHT
     (COMMON-LISP::THE COMMON-LISP::T
      (SYSTEM::%STRUCTURE-REF 'XLIB::WM-SIZE-HINTS SYSTEM::OBJECT 6.))))
   #Y(XLIB::WM-SIZE-HINTS-HEIGHT
      #17Y(00 00 00 00 01 00 00 00 00 02 DA AE DB 32 2C 19 02)
      XLIB::WM-SIZE-HINTS 6.)
   (COMMON-LISP::FUNCTION XLIB::WM-SIZE-HINTS-MIN-WIDTH (XLIB::WM-SIZE-HINTS)
    #2=(COMMON-LISP::OR COMMON-LISP::NULL XLIB::CARD16))
   (COMMON-LISP::INLINE XLIB::WM-SIZE-HINTS-MIN-WIDTH)
   XLIB::WM-SIZE-HINTS-MIN-WIDTH
   (#1# (COMMON-LISP::DECLARE (SYSTEM::IN-DEFUN XLIB::WM-SIZE-HINTS-MIN-WIDTH))
    (COMMON-LISP::BLOCK XLIB::WM-SIZE-HINTS-MIN-WIDTH
     (COMMON-LISP::THE #2#
      (SYSTEM::%STRUCTURE-REF 'XLIB::WM-SIZE-HINTS SYSTEM::OBJECT 7.))))
   #Y(XLIB::WM-SIZE-HINTS-MIN-WIDTH
      #17Y(00 00 00 00 01 00 00 00 00 02 DA AE DB 32 2C 19 02)
      XLIB::WM-SIZE-HINTS 7.)
   (COMMON-LISP::FUNCTION XLIB::WM-SIZE-HINTS-MIN-HEIGHT (XLIB::WM-SIZE-HINTS)
    #3=(COMMON-LISP::OR COMMON-LISP::NULL XLIB::CARD16))
   (COMMON-LISP::INLINE XLIB::WM-SIZE-HINTS-MIN-HEIGHT)
   XLIB::WM-SIZE-HINTS-MIN-HEIGHT
   (#1#
    (COMMON-LISP::DECLARE (SYSTEM::IN-DEFUN XLIB::WM-SIZE-HINTS-MIN-HEIGHT))
    (COMMON-LISP::BLOCK XLIB::WM-SIZE-HINTS-MIN-HEIGHT
     (COMMON-LISP::THE #3#
      (SYSTEM::%STRUCTURE-REF 'XLIB::WM-SIZE-HINTS SYSTEM::OBJECT 8.))))
   #Y(XLIB::WM-SIZE-HINTS-MIN-HEIGHT
      #17Y(00 00 00 00 01 00 00 00 00 02 DA AE DB 32 2C 19 02)
      XLIB::WM-SIZE-HINTS 8.)
   (COMMON-LISP::FUNCTION XLIB::WM-SIZE-HINTS-MAX-WIDTH (XLIB::WM-SIZE-HINTS)
    #4=(COMMON-LISP::OR COMMON-LISP::NULL XLIB::CARD16))
   (COMMON-LISP::INLINE XLIB::WM-SIZE-HINTS-MAX-WIDTH)
   XLIB::WM-SIZE-HINTS-MAX-WIDTH
   (#1# (COMMON-LISP::DECLARE (SYSTEM::IN-DEFUN XLIB::WM-SIZE-HINTS-MAX-WIDTH))
    (COMMON-LISP::BLOCK XLIB::WM-SIZE-HINTS-MAX-WIDTH
     (COMMON-LISP::THE #4#
      (SYSTEM::%STRUCTURE-REF 'XLIB::WM-SIZE-HINTS SYSTEM::OBJECT 9.))))
   #Y(XLIB::WM-SIZE-HINTS-MAX-WIDTH
      #17Y(00 00 00 00 01 00 00 00 00 02 DA AE DB 32 2C 19 02)
      XLIB::WM-SIZE-HINTS 9.)
   (COMMON-LISP::FUNCTION XLIB::WM-SIZE-HINTS-MAX-HEIGHT (XLIB::WM-SIZE-HINTS)
    #5=(COMMON-LISP::OR COMMON-LISP::NULL XLIB::CARD16))
   (COMMON-LISP::INLINE XLIB::WM-SIZE-HINTS-MAX-HEIGHT)
   XLIB::WM-SIZE-HINTS-MAX-HEIGHT
   (#1#
    (COMMON-LISP::DECLARE (SYSTEM::IN-DEFUN XLIB::WM-SIZE-HINTS-MAX-HEIGHT))
    (COMMON-LISP::BLOCK XLIB::WM-SIZE-HINTS-MAX-HEIGHT
     (COMMON-LISP::THE #5#
      (SYSTEM::%STRUCTURE-REF 'XLIB::WM-SIZE-HINTS SYSTEM::OBJECT 10.))))
   #Y(XLIB::WM-SIZE-HINTS-MAX-HEIGHT
      #17Y(00 00 00 00 01 00 00 00 00 02 DA AE DB 32 2C 19 02)
      XLIB::WM-SIZE-HINTS 10.)
   (COMMON-LISP::FUNCTION XLIB::WM-SIZE-HINTS-WIDTH-INC (XLIB::WM-SIZE-HINTS)
    #6=(COMMON-LISP::OR COMMON-LISP::NULL XLIB::CARD16))
   (COMMON-LISP::INLINE XLIB::WM-SIZE-HINTS-WIDTH-INC)
   XLIB::WM-SIZE-HINTS-WIDTH-INC
   (#1# (COMMON-LISP::DECLARE (SYSTEM::IN-DEFUN XLIB::WM-SIZE-HINTS-WIDTH-INC))
    (COMMON-LISP::BLOCK XLIB::WM-SIZE-HINTS-WIDTH-INC
     (COMMON-LISP::THE #6#
      (SYSTEM::%STRUCTURE-REF 'XLIB::WM-SIZE-HINTS SYSTEM::OBJECT 11.))))
   #Y(XLIB::WM-SIZE-HINTS-WIDTH-INC
      #17Y(00 00 00 00 01 00 00 00 00 02 DA AE DB 32 2C 19 02)
      XLIB::WM-SIZE-HINTS 11.)
   (COMMON-LISP::FUNCTION XLIB::WM-SIZE-HINTS-HEIGHT-INC (XLIB::WM-SIZE-HINTS)
    #7=(COMMON-LISP::OR COMMON-LISP::NULL XLIB::CARD16))
   (COMMON-LISP::INLINE XLIB::WM-SIZE-HINTS-HEIGHT-INC)
   XLIB::WM-SIZE-HINTS-HEIGHT-INC
   (#1#
    (COMMON-LISP::DECLARE (SYSTEM::IN-DEFUN XLIB::WM-SIZE-HINTS-HEIGHT-INC))
    (COMMON-LISP::BLOCK XLIB::WM-SIZE-HINTS-HEIGHT-INC
     (COMMON-LISP::THE #7#
      (SYSTEM::%STRUCTURE-REF 'XLIB::WM-SIZE-HINTS SYSTEM::OBJECT 12.))))
   #Y(XLIB::WM-SIZE-HINTS-HEIGHT-INC
      #17Y(00 00 00 00 01 00 00 00 00 02 DA AE DB 32 2C 19 02)
      XLIB::WM-SIZE-HINTS 12.)
   (COMMON-LISP::FUNCTION XLIB::WM-SIZE-HINTS-MIN-ASPECT (XLIB::WM-SIZE-HINTS)
    #8=(COMMON-LISP::OR COMMON-LISP::NULL COMMON-LISP::NUMBER))
   (COMMON-LISP::INLINE XLIB::WM-SIZE-HINTS-MIN-ASPECT)
   XLIB::WM-SIZE-HINTS-MIN-ASPECT
   (#1#
    (COMMON-LISP::DECLARE (SYSTEM::IN-DEFUN XLIB::WM-SIZE-HINTS-MIN-ASPECT))
    (COMMON-LISP::BLOCK XLIB::WM-SIZE-HINTS-MIN-ASPECT
     (COMMON-LISP::THE #8#
      (SYSTEM::%STRUCTURE-REF 'XLIB::WM-SIZE-HINTS SYSTEM::OBJECT 13.))))
   #Y(XLIB::WM-SIZE-HINTS-MIN-ASPECT
      #17Y(00 00 00 00 01 00 00 00 00 02 DA AE DB 32 2C 19 02)
      XLIB::WM-SIZE-HINTS 13.)
   (COMMON-LISP::FUNCTION XLIB::WM-SIZE-HINTS-MAX-ASPECT (XLIB::WM-SIZE-HINTS)
    #9=(COMMON-LISP::OR COMMON-LISP::NULL COMMON-LISP::NUMBER))
   (COMMON-LISP::INLINE XLIB::WM-SIZE-HINTS-MAX-ASPECT)
   XLIB::WM-SIZE-HINTS-MAX-ASPECT
   (#1#
    (COMMON-LISP::DECLARE (SYSTEM::IN-DEFUN XLIB::WM-SIZE-HINTS-MAX-ASPECT))
    (COMMON-LISP::BLOCK XLIB::WM-SIZE-HINTS-MAX-ASPECT
     (COMMON-LISP::THE #9#
      (SYSTEM::%STRUCTURE-REF 'XLIB::WM-SIZE-HINTS SYSTEM::OBJECT 14.))))
   #Y(XLIB::WM-SIZE-HINTS-MAX-ASPECT
      #17Y(00 00 00 00 01 00 00 00 00 02 DA AE DB 32 2C 19 02)
      XLIB::WM-SIZE-HINTS 14.)
   (COMMON-LISP::FUNCTION XLIB::WM-SIZE-HINTS-BASE-WIDTH (XLIB::WM-SIZE-HINTS)
    #10=(COMMON-LISP::OR COMMON-LISP::NULL XLIB::CARD16))
   (COMMON-LISP::INLINE XLIB::WM-SIZE-HINTS-BASE-WIDTH)
   XLIB::WM-SIZE-HINTS-BASE-WIDTH
   (#1#
    (COMMON-LISP::DECLARE (SYSTEM::IN-DEFUN XLIB::WM-SIZE-HINTS-BASE-WIDTH))
    (COMMON-LISP::BLOCK XLIB::WM-SIZE-HINTS-BASE-WIDTH
     (COMMON-LISP::THE #10#
      (SYSTEM::%STRUCTURE-REF 'XLIB::WM-SIZE-HINTS SYSTEM::OBJECT 15.))))
   #Y(XLIB::WM-SIZE-HINTS-BASE-WIDTH
      #17Y(00 00 00 00 01 00 00 00 00 02 DA AE DB 32 2C 19 02)
      XLIB::WM-SIZE-HINTS 15.)
   (COMMON-LISP::FUNCTION XLIB::WM-SIZE-HINTS-BASE-HEIGHT (XLIB::WM-SIZE-HINTS)
    #11=(COMMON-LISP::OR COMMON-LISP::NULL XLIB::CARD16))
   (COMMON-LISP::INLINE XLIB::WM-SIZE-HINTS-BASE-HEIGHT)
   XLIB::WM-SIZE-HINTS-BASE-HEIGHT
   (#1#
    (COMMON-LISP::DECLARE (SYSTEM::IN-DEFUN XLIB::WM-SIZE-HINTS-BASE-HEIGHT))
    (COMMON-LISP::BLOCK XLIB::WM-SIZE-HINTS-BASE-HEIGHT
     (COMMON-LISP::THE #11#
      (SYSTEM::%STRUCTURE-REF 'XLIB::WM-SIZE-HINTS SYSTEM::OBJECT 16.))))
   #Y(XLIB::WM-SIZE-HINTS-BASE-HEIGHT
      #17Y(00 00 00 00 01 00 00 00 00 02 DA AE DB 32 2C 19 02)
      XLIB::WM-SIZE-HINTS 16.)
   (COMMON-LISP::FUNCTION XLIB::WM-SIZE-HINTS-WIN-GRAVITY (XLIB::WM-SIZE-HINTS)
    #12=(COMMON-LISP::OR COMMON-LISP::NULL XLIB::WIN-GRAVITY))
   (COMMON-LISP::INLINE XLIB::WM-SIZE-HINTS-WIN-GRAVITY)
   XLIB::WM-SIZE-HINTS-WIN-GRAVITY
   (#1#
    (COMMON-LISP::DECLARE (SYSTEM::IN-DEFUN XLIB::WM-SIZE-HINTS-WIN-GRAVITY))
    (COMMON-LISP::BLOCK XLIB::WM-SIZE-HINTS-WIN-GRAVITY
     (COMMON-LISP::THE #12#
      (SYSTEM::%STRUCTURE-REF 'XLIB::WM-SIZE-HINTS SYSTEM::OBJECT 17.))))
   #Y(XLIB::WM-SIZE-HINTS-WIN-GRAVITY
      #17Y(00 00 00 00 01 00 00 00 00 02 DA AE DB 32 2C 19 02)
      XLIB::WM-SIZE-HINTS 17.)
   (COMMON-LISP::FUNCTION XLIB::WM-SIZE-HINTS-PROGRAM-SPECIFIED-POSITION-P
    (XLIB::WM-SIZE-HINTS) COMMON-LISP::BOOLEAN)
   (COMMON-LISP::INLINE XLIB::WM-SIZE-HINTS-PROGRAM-SPECIFIED-POSITION-P)
   XLIB::WM-SIZE-HINTS-PROGRAM-SPECIFIED-POSITION-P
   (#1#
    (COMMON-LISP::DECLARE
     (SYSTEM::IN-DEFUN XLIB::WM-SIZE-HINTS-PROGRAM-SPECIFIED-POSITION-P))
    (COMMON-LISP::BLOCK XLIB::WM-SIZE-HINTS-PROGRAM-SPECIFIED-POSITION-P
     (COMMON-LISP::THE COMMON-LISP::BOOLEAN
      (SYSTEM::%STRUCTURE-REF 'XLIB::WM-SIZE-HINTS SYSTEM::OBJECT 18.))))
   #Y(XLIB::WM-SIZE-HINTS-PROGRAM-SPECIFIED-POSITION-P
      #17Y(00 00 00 00 01 00 00 00 00 02 DA AE DB 32 2C 19 02)
      XLIB::WM-SIZE-HINTS 18.)
   (COMMON-LISP::FUNCTION XLIB::WM-SIZE-HINTS-PROGRAM-SPECIFIED-SIZE-P
    (XLIB::WM-SIZE-HINTS) COMMON-LISP::BOOLEAN)
   (COMMON-LISP::INLINE XLIB::WM-SIZE-HINTS-PROGRAM-SPECIFIED-SIZE-P)
   XLIB::WM-SIZE-HINTS-PROGRAM-SPECIFIED-SIZE-P
   (#1#
    (COMMON-LISP::DECLARE
     (SYSTEM::IN-DEFUN XLIB::WM-SIZE-HINTS-PROGRAM-SPECIFIED-SIZE-P))
    (COMMON-LISP::BLOCK XLIB::WM-SIZE-HINTS-PROGRAM-SPECIFIED-SIZE-P
     (COMMON-LISP::THE COMMON-LISP::BOOLEAN
      (SYSTEM::%STRUCTURE-REF 'XLIB::WM-SIZE-HINTS SYSTEM::OBJECT 19.))))
   #Y(XLIB::WM-SIZE-HINTS-PROGRAM-SPECIFIED-SIZE-P
      #17Y(00 00 00 00 01 00 00 00 00 02 DA AE DB 32 2C 19 02)
      XLIB::WM-SIZE-HINTS 19.)
   SYSTEM::DEFSTRUCT-WRITER SYSTEM::SETF-EXPANDER -1. 1.
   #Y(XLIB::SETF-WM-SIZE-HINTS-USER-SPECIFIED-POSITION-P
      #26Y(00 00 00 00 02 00 00 00 00 03 9F 5C 78 DA DB AE DC DD DE B4 7B 03 61
           05 19 04)
      SYSTEM::%STRUCTURE-STORE 'XLIB::WM-SIZE-HINTS 1. COMMON-LISP::THE
      COMMON-LISP::BOOLEAN)
   COMMON-LISP::SETF SYSTEM::%SET-DOCUMENTATION
   #Y(XLIB::SETF-WM-SIZE-HINTS-USER-SPECIFIED-SIZE-P
      #26Y(00 00 00 00 02 00 00 00 00 03 9F 5C 78 DA DB AE DC DD DE B4 7B 03 61
           05 19 04)
      SYSTEM::%STRUCTURE-STORE 'XLIB::WM-SIZE-HINTS 2. COMMON-LISP::THE
      COMMON-LISP::BOOLEAN)
   #Y(XLIB::SETF-WM-SIZE-HINTS-X
      #22Y(00 00 00 00 02 00 00 00 00 03 9F 5C 78 DA DB AE DC B2 61 05 19 04)
      SYSTEM::%STRUCTURE-STORE 'XLIB::WM-SIZE-HINTS 3.)
   #Y(XLIB::SETF-WM-SIZE-HINTS-Y
      #22Y(00 00 00 00 02 00 00 00 00 03 9F 5C 78 DA DB AE DC B2 61 05 19 04)
      SYSTEM::%STRUCTURE-STORE 'XLIB::WM-SIZE-HINTS 4.)
   #Y(XLIB::SETF-WM-SIZE-HINTS-WIDTH
      #22Y(00 00 00 00 02 00 00 00 00 03 9F 5C 78 DA DB AE DC B2 61 05 19 04)
      SYSTEM::%STRUCTURE-STORE 'XLIB::WM-SIZE-HINTS 5.)
   #Y(XLIB::SETF-WM-SIZE-HINTS-HEIGHT
      #22Y(00 00 00 00 02 00 00 00 00 03 9F 5C 78 DA DB AE DC B2 61 05 19 04)
      SYSTEM::%STRUCTURE-STORE 'XLIB::WM-SIZE-HINTS 6.)
   #Y(XLIB::SETF-WM-SIZE-HINTS-MIN-WIDTH
      #26Y(00 00 00 00 02 00 00 00 00 03 9F 5C 78 DA DB AE DC DD DE B4 7B 03 61
           05 19 04)
      SYSTEM::%STRUCTURE-STORE 'XLIB::WM-SIZE-HINTS 7. COMMON-LISP::THE #2#)
   #Y(XLIB::SETF-WM-SIZE-HINTS-MIN-HEIGHT
      #26Y(00 00 00 00 02 00 00 00 00 03 9F 5C 78 DA DB AE DC DD DE B4 7B 03 61
           05 19 04)
      SYSTEM::%STRUCTURE-STORE 'XLIB::WM-SIZE-HINTS 8. COMMON-LISP::THE #3#)
   #Y(XLIB::SETF-WM-SIZE-HINTS-MAX-WIDTH
      #26Y(00 00 00 00 02 00 00 00 00 03 9F 5C 78 DA DB AE DC DD DE B4 7B 03 61
           05 19 04)
      SYSTEM::%STRUCTURE-STORE 'XLIB::WM-SIZE-HINTS 9. COMMON-LISP::THE #4#)
   #Y(XLIB::SETF-WM-SIZE-HINTS-MAX-HEIGHT
      #26Y(00 00 00 00 02 00 00 00 00 03 9F 5C 78 DA DB AE DC DD DE B4 7B 03 61
           05 19 04)
      SYSTEM::%STRUCTURE-STORE 'XLIB::WM-SIZE-HINTS 10. COMMON-LISP::THE #5#)
   #Y(XLIB::SETF-WM-SIZE-HINTS-WIDTH-INC
      #26Y(00 00 00 00 02 00 00 00 00 03 9F 5C 78 DA DB AE DC DD DE B4 7B 03 61
           05 19 04)
      SYSTEM::%STRUCTURE-STORE 'XLIB::WM-SIZE-HINTS 11. COMMON-LISP::THE #6#)
   #Y(XLIB::SETF-WM-SIZE-HINTS-HEIGHT-INC
      #26Y(00 00 00 00 02 00 00 00 00 03 9F 5C 78 DA DB AE DC DD DE B4 7B 03 61
           05 19 04)
      SYSTEM::%STRUCTURE-STORE 'XLIB::WM-SIZE-HINTS 12. COMMON-LISP::THE #7#)
   #Y(XLIB::SETF-WM-SIZE-HINTS-MIN-ASPECT
      #26Y(00 00 00 00 02 00 00 00 00 03 9F 5C 78 DA DB AE DC DD DE B4 7B 03 61
           05 19 04)
      SYSTEM::%STRUCTURE-STORE 'XLIB::WM-SIZE-HINTS 13. COMMON-LISP::THE #8#)
   #Y(XLIB::SETF-WM-SIZE-HINTS-MAX-ASPECT
      #26Y(00 00 00 00 02 00 00 00 00 03 9F 5C 78 DA DB AE DC DD DE B4 7B 03 61
           05 19 04)
      SYSTEM::%STRUCTURE-STORE 'XLIB::WM-SIZE-HINTS 14. COMMON-LISP::THE #9#)
   #Y(XLIB::SETF-WM-SIZE-HINTS-BASE-WIDTH
      #26Y(00 00 00 00 02 00 00 00 00 03 9F 5C 78 DA DB AE DC DD DE B4 7B 03 61
           05 19 04)
      SYSTEM::%STRUCTURE-STORE 'XLIB::WM-SIZE-HINTS 15. COMMON-LISP::THE #10#)
   #Y(XLIB::SETF-WM-SIZE-HINTS-BASE-HEIGHT
      #26Y(00 00 00 00 02 00 00 00 00 03 9F 5C 78 DA DB AE DC DD DE B4 7B 03 61
           05 19 04)
      SYSTEM::%STRUCTURE-STORE 'XLIB::WM-SIZE-HINTS 16. COMMON-LISP::THE #11#)
   #Y(XLIB::SETF-WM-SIZE-HINTS-WIN-GRAVITY
      #26Y(00 00 00 00 02 00 00 00 00 03 9F 5C 78 DA DB AE DC DD DE B4 7B 03 61
           05 19 04)
      SYSTEM::%STRUCTURE-STORE 'XLIB::WM-SIZE-HINTS 17. COMMON-LISP::THE #12#)
   #Y(XLIB::SETF-WM-SIZE-HINTS-PROGRAM-SPECIFIED-POSITION-P
      #26Y(00 00 00 00 02 00 00 00 00 03 9F 5C 78 DA DB AE DC DD DE B4 7B 03 61
           05 19 04)
      SYSTEM::%STRUCTURE-STORE 'XLIB::WM-SIZE-HINTS 18. COMMON-LISP::THE
      COMMON-LISP::BOOLEAN)
   #Y(XLIB::SETF-WM-SIZE-HINTS-PROGRAM-SPECIFIED-SIZE-P
      #26Y(00 00 00 00 02 00 00 00 00 03 9F 5C 78 DA DB AE DC DD DE B4 7B 03 61
           05 19 04)
      SYSTEM::%STRUCTURE-STORE 'XLIB::WM-SIZE-HINTS 19. COMMON-LISP::THE
      COMMON-LISP::BOOLEAN)
   COMMON-LISP::STRUCTURE CLOS::DEFSTRUCT-REMOVE-PRINT-OBJECT-METHOD)
#Y(#:|106| #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   XLIB::WM-NORMAL-HINTS SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::WM-NORMAL-HINTS
      #23Y(00 00 00 00 01 00 00 00 00 02 AD DA DB DC DD DE 6E 06 05 2F 06 19
           02)
      :WM_NORMAL_HINTS :TYPE :WM_SIZE_HINTS :RESULT-TYPE COMMON-LISP::VECTOR
      XLIB::GET-PROPERTY XLIB::DECODE-WM-SIZE-HINTS))
#Y(#:|107|
   #28Y(00 00 00 00 00 00 00 00 00 01 DA DB 32 87 DA DC DD 32 86 DA DE 63 2D 03
        05 C5 19 01)
   XLIB::WM-NORMAL-HINTS SYSTEM::DEFSTRUCT-WRITER SYSTEM::SETF-EXPANDER
   XLIB::SET-WM-NORMAL-HINTS COMMON-LISP::SETF SYSTEM::%SET-DOCUMENTATION)
#Y(#:|108| #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   XLIB::SET-WM-NORMAL-HINTS SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::SET-WM-NORMAL-HINTS
      #23Y(00 00 00 00 02 00 00 00 00 03 AE DA AF 6F 01 DC DD 2D 05 04 9E 19
           03)
      :WM_NORMAL_HINTS XLIB::ENCODE-WM-SIZE-HINTS :WM_SIZE_HINTS 32.
      XLIB::CHANGE-PROPERTY))
#Y(#:|109| #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   XLIB::WM-ZOOM-HINTS SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::WM-ZOOM-HINTS
      #23Y(00 00 00 00 01 00 00 00 00 02 AD DA DB DC DD DE 6E 06 05 2F 06 19
           02)
      :WM_ZOOM_HINTS :TYPE :WM_SIZE_HINTS :RESULT-TYPE COMMON-LISP::VECTOR
      XLIB::GET-PROPERTY XLIB::DECODE-WM-SIZE-HINTS))
#Y(#:|110|
   #28Y(00 00 00 00 00 00 00 00 00 01 DA DB 32 87 DA DC DD 32 86 DA DE 63 2D 03
        05 C5 19 01)
   XLIB::WM-ZOOM-HINTS SYSTEM::DEFSTRUCT-WRITER SYSTEM::SETF-EXPANDER
   XLIB::SET-WM-ZOOM-HINTS COMMON-LISP::SETF SYSTEM::%SET-DOCUMENTATION)
#Y(#:|111| #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   XLIB::SET-WM-ZOOM-HINTS SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::SET-WM-ZOOM-HINTS
      #23Y(00 00 00 00 02 00 00 00 00 03 AE DA AF 6F 01 DC DD 2D 05 04 9E 19
           03)
      :WM_ZOOM_HINTS XLIB::ENCODE-WM-SIZE-HINTS :WM_SIZE_HINTS 32.
      XLIB::CHANGE-PROPERTY))
#Y(#:|112| #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   XLIB::DECODE-WM-SIZE-HINTS SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::DECODE-WM-SIZE-HINTS
      #348Y(00 00 00 00 01 00 00 00 00 02 9E 1F 81 4C 14 DA 73 01 01 2E 01 14
            DA AE 72 CF DC AE DD AF 32 2D 16 01 DD AE 72 CF DC AE DE AF 32 2D
            16 01 DE AE 72 CF DC AE DF AF 32 2D 16 01 E0 AE 72 CF DC AE E1 AF
            32 2D 16 01 E2 AE 8F CF 1A AF E3 73 01 01 DC AE E4 AF 32 2D 16 01
            AF E5 73 01 01 DC AE E6 AF 32 2D 16 01 E3 AE 8F CF 1A AF E4 73 01
            01 DC AE E7 AF 32 2D 16 01 AF E6 73 01 01 DC AE E8 AF 32 2D 16 01
            E5 AE 8F CF 1A AF E7 73 01 01 DC AE E9 AF 32 2D 16 01 AF E8 73 01
            01 DC AE EA AF 32 2D 16 01 E4 AE 8F CF 2A AF E9 73 01 01 B0 EA 73
            01 01 73 01 39 DC AE EB AF 32 2D 16 01 AF EB 73 01 01 B0 EC 73 01
            01 73 01 39 DC AE EC AF 32 2D 16 01 AF 72 45 ED 91 01 31 35 E6 AE
            8F CF 1A AF ED 73 01 01 DC AE ED AF 32 2D 16 01 AF EE 73 01 01 DC
            AE EE AF 32 2D 16 01 E7 AE 8F CF 11 EF B0 F0 73 01 01 73 01 01 DC
            AE F0 AF 32 2D 16 01 DA AE 8E CF 05 DE AE 8F CF 1A AF DD 73 01 01
            DC AE E0 AF 32 2D 16 01 AF DE 73 01 01 DC AE E2 AF 32 2D 16 01 DD
            AE 8E CF 05 E0 AE 8F CF 1A AF E0 73 01 01 DC AE E3 AF 32 2D 16 01
            AF E2 73 01 01 DC AE E5 AF 32 2D 16 01 15 19 03 19 02)
      0. XLIB::MAKE-WM-SIZE-HINTS XLIB::WM-SIZE-HINTS 1. 2. 18. 3. 19. 4. 5. 7.
      6. 8. 9. 10. 11. 12. 13. 14. 15. 16.
      #(:UNMAP :NORTH-WEST :NORTH :NORTH-EAST :WEST :CENTER :EAST :SOUTH-WEST
        :SOUTH :SOUTH-EAST :STATIC)
      17.))
#Y(#:|113| #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   XLIB::ENCODE-WM-SIZE-HINTS SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::ENCODE-WM-SIZE-HINTS
      #479Y(00 00 00 00 01 00 00 00 00 02 DA 38 07 C6 FC 71 1C DB AF 89 02 0D
            DD DB 72 D3 DD AD AF 72 D9 9D FA 16 02 AF 89 04 0D DD DD 72 D3 DD
            AD AF 72 D9 9D FA 16 02 AF 89 05 0D DD E0 72 D3 DD AD AF 72 D9 9D
            FA 16 02 AF 89 07 0D DD E2 72 D3 DD AD AF 72 D9 9D FA 16 02 AF 89
            09 27 AF 89 0A 23 DD E5 72 D3 DD AD AF 72 D9 9D FA 16 02 AF 6F 09
            AE E6 AE 33 01 02 16 01 AF 6F 0A AE E7 AE 33 01 02 16 01 AF 89 0E
            27 AF 89 0F 23 DD E6 72 D3 DD AD AF 72 D9 9D FA 16 02 AF 6F 0E AE
            EA AE 33 01 02 16 01 AF 6F 0F AE EB AE 33 01 02 16 01 AF 89 12 27
            AF 89 13 23 DD E7 72 D3 DD AD AF 72 D9 9D FA 16 02 AF 6F 12 AE EE
            AE 33 01 02 16 01 AF 6F 13 AE EF AE 33 01 02 16 01 AF 6F 16 B0 6F
            17 93 01 80 45 93 00 80 41 DD EA 72 D3 DD AD B1 72 D9 9D FC 16 02
            AD 81 AF 01 AC 81 AF 00 AD 72 B0 B0 F2 AE 33 01 02 16 01 AD 72 B1
            B0 F3 AE 33 01 02 16 01 AC 72 B0 B0 F4 AE 33 01 02 16 01 AC 72 B1
            B0 F5 AE 33 01 02 16 01 16 02 AF 89 1C 29 AF 89 1D 25 DD EB 72 D3
            DD AD AF 72 D9 9D FA 16 02 AF 6F 1C AE 65 1E AE 33 01 02 16 01 AF
            6F 1D AE 65 1F AE 33 01 02 16 01 AF 89 20 1F DD EE 72 D3 DD AD AF
            72 D9 9D FA 16 02 AF 6F 20 65 21 38 06 72 5D AE 65 22 AE 33 01 02
            16 01 AF 89 23 2B AF 89 24 27 AF 88 02 0D DD E0 72 D3 DD AD AF 72
            D9 9D FA 16 02 AF 6F 23 AE DD AE 33 01 02 16 01 AF 6F 24 AE E0 AE
            33 01 02 16 01 AF 89 25 2B AF 89 26 27 AF 88 04 0D DD E2 72 D3 DD
            AD AF 72 D9 9D FA 16 02 AF 6F 25 AE E2 AE 33 01 02 16 01 AF 6F 26
            AE E5 AE 33 01 02 16 01 AD DB AE 33 01 02 9E 19 04)
      18. 0. XLIB::WM-SIZE-HINTS-USER-SPECIFIED-POSITION-P 1.
      XLIB::WM-SIZE-HINTS-USER-SPECIFIED-SIZE-P
      XLIB::WM-SIZE-HINTS-PROGRAM-SPECIFIED-POSITION-P 2.
      XLIB::WM-SIZE-HINTS-PROGRAM-SPECIFIED-SIZE-P 3.
      XLIB::WM-SIZE-HINTS-MIN-WIDTH XLIB::WM-SIZE-HINTS-MIN-HEIGHT 4. 5. 6.
      XLIB::WM-SIZE-HINTS-MAX-WIDTH XLIB::WM-SIZE-HINTS-MAX-HEIGHT 7. 8.
      XLIB::WM-SIZE-HINTS-WIDTH-INC XLIB::WM-SIZE-HINTS-HEIGHT-INC 9. 10.
      XLIB::WM-SIZE-HINTS-MIN-ASPECT XLIB::WM-SIZE-HINTS-MAX-ASPECT 11. 12. 13.
      14. XLIB::WM-SIZE-HINTS-BASE-WIDTH XLIB::WM-SIZE-HINTS-BASE-HEIGHT 15.
      16. XLIB::WM-SIZE-HINTS-WIN-GRAVITY
      (:UNMAP :NORTH-WEST :NORTH :NORTH-EAST :WEST :CENTER :EAST :SOUTH-WEST
       :SOUTH :SOUTH-EAST :STATIC)
      17. XLIB::WM-SIZE-HINTS-X XLIB::WM-SIZE-HINTS-Y XLIB::WM-SIZE-HINTS-WIDTH
      XLIB::WM-SIZE-HINTS-HEIGHT))
#Y(#:|114| #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   XLIB::ICON-SIZES SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::ICON-SIZES
      #65Y(00 00 00 00 01 00 00 00 00 02 AD DA DB DA DC DD 6E 06 04 9D 1F 29 DF
           AD E0 73 01 01 E1 AF E2 73 01 01 E3 B1 E4 73 01 01 E5 B3 E6 73 01 01
           E7 B5 E8 73 01 01 E9 B7 EA 73 01 01 2D 0C 11 19 03 19 03)
      :WM_ICON_SIZE :TYPE :RESULT-TYPE COMMON-LISP::VECTOR XLIB::GET-PROPERTY
      :MIN-WIDTH 0. :MIN-HEIGHT 1. :MAX-WIDTH 2. :MAX-HEIGHT 3. :WIDTH-INC 4.
      :HEIGHT-INC 5. XLIB::MAKE-WM-SIZE-HINTS))
#Y(#:|115|
   #28Y(00 00 00 00 00 00 00 00 00 01 DA DB 32 87 DA DC DD 32 86 DA DE 63 2D 03
        05 C5 19 01)
   XLIB::ICON-SIZES SYSTEM::DEFSTRUCT-WRITER SYSTEM::SETF-EXPANDER
   XLIB::SET-ICON-SIZES COMMON-LISP::SETF SYSTEM::%SET-DOCUMENTATION)
#Y(#:|116| #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   XLIB::SET-ICON-SIZES SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::SET-ICON-SIZES
      #42Y(00 00 00 00 02 00 00 00 00 03 AD 6F 00 AE 6F 01 AF 6F 02 B0 6F 03 B1
           6F 04 B2 6F 05 73 06 00 AF E0 AE E0 E1 2D 05 08 9F 19 04)
      XLIB::WM-SIZE-HINTS-MIN-WIDTH XLIB::WM-SIZE-HINTS-MIN-HEIGHT
      XLIB::WM-SIZE-HINTS-MAX-WIDTH XLIB::WM-SIZE-HINTS-MAX-HEIGHT
      XLIB::WM-SIZE-HINTS-WIDTH-INC XLIB::WM-SIZE-HINTS-HEIGHT-INC
      :WM_ICON_SIZE 32. XLIB::CHANGE-PROPERTY))
#Y(#:|117| #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   XLIB::WM-PROTOCOLS SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::WM-PROTOCOLS
      #36Y(00 00 00 00 01 00 00 00 00 02 00 2B 01 7F 02 00 00 DA AD 6D 01 01 68
           02 00 DC DD DE 6E 04 05 33 00 27 19 03)
      COMMON-LISP::LIST
      #Y(XLIB::WM-PROTOCOLS-1
         #20Y(00 00 00 00 01 00 00 00 00 02 69 00 01 6F 01 AE 30 02 19 02)
         COMMON-LISP::NIL XLIB::WINDOW-DISPLAY XLIB::ATOM-NAME)
      :WM_PROTOCOLS :TYPE :ATOM XLIB::GET-PROPERTY))
#Y(#:|118|
   #28Y(00 00 00 00 00 00 00 00 00 01 DA DB 32 87 DA DC DD 32 86 DA DE 63 2D 03
        05 C5 19 01)
   XLIB::WM-PROTOCOLS SYSTEM::DEFSTRUCT-WRITER SYSTEM::SETF-EXPANDER
   XLIB::SET-WM-PROTOCOLS COMMON-LISP::SETF SYSTEM::%SET-DOCUMENTATION)
#Y(#:|119| #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   XLIB::SET-WM-PROTOCOLS SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::SET-WM-PROTOCOLS
      #36Y(00 00 00 00 02 00 00 00 00 03 00 2B 01 7F 03 00 00 14 DA DB AF 6D 02
           01 B2 73 00 27 DD DE 2D 05 05 9F 19 04)
      :WM_PROTOCOLS COMMON-LISP::LIST
      #Y(XLIB::SET-WM-PROTOCOLS-1
         #20Y(00 00 00 00 01 00 00 00 00 02 69 00 01 6F 01 AE 30 02 19 02)
         COMMON-LISP::NIL XLIB::WINDOW-DISPLAY XLIB::INTERN-ATOM)
      :ATOM 32. XLIB::CHANGE-PROPERTY))
#Y(#:|120| #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   XLIB::WM-COLORMAP-WINDOWS SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::WM-COLORMAP-WINDOWS
      #32Y(00 00 00 00 01 00 00 00 00 02 00 2B 01 7F 02 00 00 14 DA DB DC DD B1
           6D 04 01 2D 06 05 3F 19 03)
      :WM_COLORMAP_WINDOWS :TYPE :WINDOW :TRANSFORM
      #Y(XLIB::WM-COLORMAP-WINDOWS-1
         #20Y(00 00 00 00 01 00 00 00 00 02 69 00 01 6F 01 AE 30 02 19 02)
         COMMON-LISP::NIL XLIB::WINDOW-DISPLAY XLIB::LOOKUP-WINDOW)
      XLIB::GET-PROPERTY))
#Y(#:|121|
   #28Y(00 00 00 00 00 00 00 00 00 01 DA DB 32 87 DA DC DD 32 86 DA DE 63 2D 03
        05 C5 19 01)
   XLIB::WM-COLORMAP-WINDOWS SYSTEM::DEFSTRUCT-WRITER SYSTEM::SETF-EXPANDER
   XLIB::SET-WM-COLORMAP-WINDOWS COMMON-LISP::SETF SYSTEM::%SET-DOCUMENTATION)
#Y(#:|122| #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   XLIB::SET-WM-COLORMAP-WINDOWS SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::SET-WM-COLORMAP-WINDOWS
      #24Y(00 00 00 00 02 00 00 00 00 03 AE DA AF DB DC DD 99 04 2D 07 05 9E 19
           03)
      :WM_COLORMAP_WINDOWS :WINDOW 32. :TRANSFORM XLIB::WINDOW-ID
      XLIB::CHANGE-PROPERTY))
#Y(#:|123| #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   XLIB::TRANSIENT-FOR SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::TRANSIENT-FOR
      #33Y(00 00 00 00 01 00 00 00 00 02 AD DA DB DC DD DE 6E 06 05 9D 1F 09 AE
           6F 06 94 01 30 07 19 03 19 03)
      :WM_TRANSIENT_FOR :TYPE :WINDOW :RESULT-TYPE COMMON-LISP::LIST
      XLIB::GET-PROPERTY XLIB::WINDOW-DISPLAY XLIB::LOOKUP-WINDOW))
#Y(#:|124|
   #28Y(00 00 00 00 00 00 00 00 00 01 DA DB 32 87 DA DC DD 32 86 DA DE 63 2D 03
        05 C5 19 01)
   XLIB::TRANSIENT-FOR SYSTEM::DEFSTRUCT-WRITER SYSTEM::SETF-EXPANDER
   XLIB::SET-TRANSIENT-FOR COMMON-LISP::SETF SYSTEM::%SET-DOCUMENTATION)
#Y(#:|125| #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   XLIB::SET-TRANSIENT-FOR SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::SET-TRANSIENT-FOR
      #25Y(00 00 00 00 02 00 00 00 00 03 AE DA AF 6F 01 7B 01 DC DD 2D 05 04 9E
           19 03)
      :WM_TRANSIENT_FOR XLIB::WINDOW-ID :WINDOW 32. XLIB::CHANGE-PROPERTY))
#Y(#:|126| #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   XLIB::SET-WM-PROPERTIES SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::SET-WM-PROPERTIES
      #751Y(00 00 00 00 01 00 00 00 81 00 24 00 00 00 3D 24 3D 23 3D 22 3D 21
            3D 20 3D 1F 3D 1E 3D 1D 3D 1C 3C 1B 14 3D 1C 3C 1B 14 3D 1C 3C 1B
            14 3D 1C 3C 1B 14 3D 1C 3D 1B 3D 1A 3D 19 3D 18 3D 17 3D 16 3D 15
            3D 14 3D 13 3D 12 3D 11 3D 10 3D 0F 3D 0E 3D 0D 3D 0C 3D 0B 3D 0A
            3D 09 3D 08 3D 07 3D 06 3B 05 37 7D 05 93 28 35 66 2A 65 24 66 2A
            2D 03 25 93 27 2C 66 2A 65 26 66 29 2D 03 25 93 23 23 66 2A 65 27
            66 25 2D 03 25 93 26 1A 66 2A 66 27 66 27 2D 03 28 93 24 1A 1B 12
            92 28 4B 92 27 54 92 23 5D 92 26 66 92 25 63 93 24 06 66 2A 66 25
            30 29 65 2A 63 1B 80 9C 14 2F 2B 1B 80 5A 65 2D AD 65 2E BC 32 2D
            93 0C 80 57 65 2D AD 65 2F BB 32 2D 93 0B 80 4F 65 2D AD 65 30 BA
            32 2D 93 0A 80 47 65 2D AD 65 31 B9 32 2D 93 09 3F 65 2D AD 65 32
            B8 32 2D 93 08 37 65 2D AD 65 33 B7 32 2D 93 07 2F 65 2D AD 65 34
            B6 32 2D 93 06 2F 1B 25 16 02 92 22 FF A2 2E 2C 14 92 0D FF A1 92
            0C FF A9 92 0B FF B1 92 0A FF B9 92 09 41 92 08 49 92 07 51 93 06
            08 65 2D AD 65 35 B5 32 2D 66 2B AD 30 36 16 01 1B 1D 87 01 00 66
            2B AD 38 01 8E 83 FF BE 83 01 AD 8D 91 6E 16 02 93 22 06 66 2A 66
            23 30 36 65 37 63 1B 81 6F 14 2F 38 1B 80 ED 65 3A AD 65 30 66 1F
            32 2D 93 1B 80 E9 65 3A AD 65 31 66 1E 32 2D 93 1A 80 E0 65 3A AD
            65 32 66 1D 32 2D 93 19 80 D7 65 3A AD 65 33 66 1C 32 2D 93 18 80
            CE 65 3A AD 65 34 66 1B 32 2D 93 17 80 C5 65 3A AD 65 35 66 1A 32
            2D 93 16 80 BC 65 3A AD 65 3B 66 19 32 2D 93 15 80 B3 65 3A AD 65
            3C C4 32 2D 93 14 80 AB 65 3A AD 65 3D C3 32 2D 93 13 80 A3 65 3A
            AD 65 3E C2 32 2D 93 12 80 9B 65 3A AD 65 3F C1 32 2D 93 11 80 93
            65 3A AD 65 40 C0 32 2D 93 10 80 8B 65 3A AD 65 41 BF 32 2D 93 0F
            80 83 65 3A AD 65 42 BE 32 2D 93 0E 80 7B 65 3A AD 65 43 BD 32 2D
            93 04 80 73 65 3A AD 65 2E 66 23 32 2D 93 03 80 6A 65 3A AD 65 2F
            66 22 32 2D 93 02 80 61 65 3A AD 65 44 66 21 32 2D 93 01 80 60 1B
            80 54 16 02 92 21 FF 0F 2E 39 14 92 1C FF 0E 92 1B FF 17 92 1A FF
            20 92 19 FF 29 92 18 FF 32 92 17 FF 3B 92 16 FF 44 92 15 FF 4D 92
            14 FF 55 92 13 FF 5D 92 12 FF 65 92 11 FF 6D 92 10 FF 75 92 0F FF
            7D 92 0E FF 85 92 04 FF 8D 92 03 FF 96 92 02 FF 9F 93 01 09 65 3A
            AD 65 45 66 20 32 2D 66 2B AD 30 46 16 01 04 20 1F 31 1B 27 66 2A
            66 22 30 46 04 20 1F 25 1B 1B 87 01 00 66 2B AD 38 01 8E 83 FF 7E
            83 01 AD 8D 91 6E 16 02 92 21 5D 04 20 1F 08 66 2A 66 21 30 47 19
            2B 19 2B)
      :NAME :ICON-NAME :RESOURCE-NAME :RESOURCE-CLASS :COMMAND :CLIENT-MACHINE
      :HINTS :NORMAL-HINTS :ZOOM-HINTS :USER-SPECIFIED-POSITION-P
      :USER-SPECIFIED-SIZE-P :PROGRAM-SPECIFIED-POSITION-P
      :PROGRAM-SPECIFIED-SIZE-P :X :Y :WIDTH :HEIGHT :MIN-WIDTH :MIN-HEIGHT
      :MAX-WIDTH :MAX-HEIGHT :WIDTH-INC :HEIGHT-INC :MIN-ASPECT :MAX-ASPECT
      :BASE-WIDTH :BASE-HEIGHT :WIN-GRAVITY :INPUT :INITIAL-STATE :ICON-PIXMAP
      :ICON-WINDOW :ICON-X :ICON-Y :ICON-MASK :WINDOW-GROUP :WM_NAME
      XLIB::SET-STRING-PROPERTY :WM_ICON_NAME :WM_CLIENT_MACHINE
      XLIB::SET-WM-CLASS XLIB::SET-WM-COMMAND
      (:INPUT :INITIAL-STATE :ICON-PIXMAP :ICON-WINDOW :ICON-X :ICON-Y
       :ICON-MASK :WINDOW-GROUP)
      XLIB::COPY-WM-HINTS XLIB::MAKE-WM-HINTS XLIB::WM-HINTS 1. 2. 3. 4. 5. 6.
      7. 8. XLIB::SET-WM-HINTS
      (:X :Y :WIDTH :HEIGHT :MIN-WIDTH :MIN-HEIGHT :MAX-WIDTH :MAX-HEIGHT
       :WIDTH-INC :HEIGHT-INC :MIN-ASPECT :MAX-ASPECT
       :USER-SPECIFIED-POSITION-P :USER-SPECIFIED-SIZE-P
       :PROGRAM-SPECIFIED-POSITION-P :PROGRAM-SPECIFIED-SIZE-P :BASE-WIDTH
       :BASE-HEIGHT :WIN-GRAVITY)
      XLIB::COPY-WM-SIZE-HINTS XLIB::MAKE-WM-SIZE-HINTS XLIB::WM-SIZE-HINTS 9.
      10. 11. 12. 13. 14. 15. 16. 17. 18. 19. XLIB::SET-WM-NORMAL-HINTS
      XLIB::SET-WM-ZOOM-HINTS))
#Y(#:|127| #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   XLIB::SET-STANDARD-PROPERTIES SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::SET-STANDARD-PROPERTIES
      #17Y(00 00 00 00 01 00 00 00 01 17 99 00 AF A0 9B 01 03)
      XLIB::SET-WM-PROPERTIES))
#Y(#:|128|
   #416Y(00 00 00 00 00 00 00 00 00 01 00 2B 01 DA DB DC 38 01 72 82 C8 5F 5D
         0B 00 00 DE 2F 05 DE AD 6D 06 01 32 80 DA DC 68 02 00 64 DE E1 73 04
         00 32 86 16 01 DA 2F 08 E3 31 59 E4 31 59 E5 2F 05 E5 E6 E7 32 86 E5
         E8 32 80 E5 E9 DA 32 86 EA 31 59 EB 31 59 EC 2F 05 EC E6 ED 32 86 EC
         EE 32 80 EC E9 DA 32 86 EF 31 59 F0 31 59 F1 2F 05 F1 E6 F2 32 86 F1
         F3 32 80 F1 E9 DA 32 86 F4 31 59 F5 31 59 F6 2F 05 F6 E6 F7 32 86 F6
         65 1E 32 80 F6 E9 DA 32 86 65 1F 31 59 65 20 31 59 65 21 2F 05 65 21
         E6 65 22 32 86 65 21 65 23 32 80 65 21 E9 DA 32 86 65 24 31 59 65 25
         31 59 65 26 2F 05 65 26 E6 65 27 32 86 65 26 65 28 32 80 65 26 E9 DA
         32 86 E5 65 29 32 87 E5 65 2A 65 2B 65 2C 03 2D 7C 02 32 86 E5 65 2E
         63 2D 03 2F E5 65 29 DA 32 86 EC 65 29 32 87 EC 65 2A 65 2B 65 2C 03
         30 7C 02 32 86 EC 65 2E 63 2D 03 2F EC 65 29 DA 32 86 F1 65 29 32 87
         F1 65 2A 65 2B 65 2C 03 31 7C 02 32 86 F1 65 2E 63 2D 03 2F F1 65 29
         DA 32 86 F6 65 29 32 87 F6 65 2A 65 2B 65 2C 03 32 7C 02 32 86 F6 65
         2E 63 2D 03 2F F6 65 29 DA 32 86 65 21 65 29 32 87 65 21 65 2A 65 2B
         65 2C 03 33 7C 02 32 86 65 21 65 2E 63 2D 03 2F 65 21 65 29 DA 32 86
         65 26 65 29 32 87 65 26 65 2A 65 2B 65 2C 03 34 7C 02 32 86 65 26 65
         2E 63 2D 03 2F 65 26 65 29 DA 32 86 DA 65 35 63 2D 03 2F DA 2F 36 C5
         19 01)
   XLIB::STANDARD-COLORMAP COMMON-LISP::STRUCTURE-OBJECT
   SYSTEM::DEFSTRUCT-DESCRIPTION 0. XLIB::MAKE-STANDARD-COLORMAP
   SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::MAKE-STANDARD-COLORMAP
      #74Y(00 00 00 00 00 00 00 00 80 1B 06 00 01 00 3D 06 3B 05 02 CC FD 3D 04
           3D 03 3D 02 3D 01 69 00 01 E2 72 2E E3 AD E4 B6 32 2D E3 AD E5 B5 32
           2D E3 AD E6 B4 32 2D E3 AD E7 B3 32 2D E3 AD E8 B2 32 2D E3 AD E9 B1
           32 2D 15 19 07)
      COMMON-LISP::NIL :COLORMAP :BASE-PIXEL :MAX-COLOR :MULT-COLOR :VISUAL
      :KILL 0. 7. XLIB::STANDARD-COLORMAP 1. 2. 3. 4. 5. 6.)
   (#(XLIB::COLORMAP (:COLORMAP) 1. (COMMON-LISP::NIL) COMMON-LISP::NIL
      (COMMON-LISP::OR COMMON-LISP::NULL XLIB::COLORMAP) COMMON-LISP::NIL)
    #(XLIB::BASE-PIXEL (:BASE-PIXEL) 2. (COMMON-LISP::NIL . 0.) 0. XLIB::PIXEL
      COMMON-LISP::NIL)
    #(XLIB::MAX-COLOR (:MAX-COLOR) 3. (COMMON-LISP::NIL) COMMON-LISP::NIL
      (COMMON-LISP::OR COMMON-LISP::NULL XLIB::COLOR) COMMON-LISP::NIL)
    #(XLIB::MULT-COLOR (:MULT-COLOR) 4. (COMMON-LISP::NIL) COMMON-LISP::NIL
      (COMMON-LISP::OR COMMON-LISP::NULL XLIB::COLOR) COMMON-LISP::NIL)
    #(XLIB::VISUAL (:VISUAL) 5. (COMMON-LISP::NIL) COMMON-LISP::NIL
      (COMMON-LISP::OR COMMON-LISP::NULL XLIB::VISUAL-INFO) COMMON-LISP::NIL)
    #(XLIB::KILL (:KILL) 6. (COMMON-LISP::NIL) COMMON-LISP::NIL
      (COMMON-LISP::OR
       (COMMON-LISP::MEMBER COMMON-LISP::NIL :RELEASE-BY-FREEING-COLORMAP)
       XLIB::DRAWABLE XLIB::GCONTEXT XLIB::CURSOR XLIB::COLORMAP XLIB::FONT)
      COMMON-LISP::NIL))
   CLOS::DEFINE-STRUCTURE-CLASS
   (COMMON-LISP::FUNCTION XLIB::STANDARD-COLORMAP-COLORMAP
    (XLIB::STANDARD-COLORMAP)
    #1=(COMMON-LISP::OR COMMON-LISP::NULL XLIB::COLORMAP))
   (COMMON-LISP::INLINE XLIB::STANDARD-COLORMAP-COLORMAP)
   XLIB::STANDARD-COLORMAP-COLORMAP SYSTEM::INLINE-EXPANSION
   (#2=(SYSTEM::OBJECT)
    (COMMON-LISP::DECLARE (SYSTEM::IN-DEFUN XLIB::STANDARD-COLORMAP-COLORMAP))
    (COMMON-LISP::BLOCK XLIB::STANDARD-COLORMAP-COLORMAP
     (COMMON-LISP::THE #1#
      (SYSTEM::%STRUCTURE-REF 'XLIB::STANDARD-COLORMAP SYSTEM::OBJECT 1.))))
   #Y(XLIB::STANDARD-COLORMAP-COLORMAP
      #17Y(00 00 00 00 01 00 00 00 00 02 DA AE DB 32 2C 19 02)
      XLIB::STANDARD-COLORMAP 1.)
   SYSTEM::DEFSTRUCT-READER
   (COMMON-LISP::FUNCTION XLIB::STANDARD-COLORMAP-BASE-PIXEL
    (XLIB::STANDARD-COLORMAP) XLIB::PIXEL)
   (COMMON-LISP::INLINE XLIB::STANDARD-COLORMAP-BASE-PIXEL)
   XLIB::STANDARD-COLORMAP-BASE-PIXEL
   (#2#
    (COMMON-LISP::DECLARE
     (SYSTEM::IN-DEFUN XLIB::STANDARD-COLORMAP-BASE-PIXEL))
    (COMMON-LISP::BLOCK XLIB::STANDARD-COLORMAP-BASE-PIXEL
     (COMMON-LISP::THE XLIB::PIXEL
      (SYSTEM::%STRUCTURE-REF 'XLIB::STANDARD-COLORMAP SYSTEM::OBJECT 2.))))
   #Y(XLIB::STANDARD-COLORMAP-BASE-PIXEL
      #17Y(00 00 00 00 01 00 00 00 00 02 DA AE DB 32 2C 19 02)
      XLIB::STANDARD-COLORMAP 2.)
   (COMMON-LISP::FUNCTION XLIB::STANDARD-COLORMAP-MAX-COLOR
    (XLIB::STANDARD-COLORMAP)
    #3=(COMMON-LISP::OR COMMON-LISP::NULL XLIB::COLOR))
   (COMMON-LISP::INLINE XLIB::STANDARD-COLORMAP-MAX-COLOR)
   XLIB::STANDARD-COLORMAP-MAX-COLOR
   (#2#
    (COMMON-LISP::DECLARE (SYSTEM::IN-DEFUN XLIB::STANDARD-COLORMAP-MAX-COLOR))
    (COMMON-LISP::BLOCK XLIB::STANDARD-COLORMAP-MAX-COLOR
     (COMMON-LISP::THE #3#
      (SYSTEM::%STRUCTURE-REF 'XLIB::STANDARD-COLORMAP SYSTEM::OBJECT 3.))))
   #Y(XLIB::STANDARD-COLORMAP-MAX-COLOR
      #17Y(00 00 00 00 01 00 00 00 00 02 DA AE DB 32 2C 19 02)
      XLIB::STANDARD-COLORMAP 3.)
   (COMMON-LISP::FUNCTION XLIB::STANDARD-COLORMAP-MULT-COLOR
    (XLIB::STANDARD-COLORMAP)
    #4=(COMMON-LISP::OR COMMON-LISP::NULL XLIB::COLOR))
   (COMMON-LISP::INLINE XLIB::STANDARD-COLORMAP-MULT-COLOR)
   XLIB::STANDARD-COLORMAP-MULT-COLOR
   (#2#
    (COMMON-LISP::DECLARE
     (SYSTEM::IN-DEFUN XLIB::STANDARD-COLORMAP-MULT-COLOR))
    (COMMON-LISP::BLOCK XLIB::STANDARD-COLORMAP-MULT-COLOR
     (COMMON-LISP::THE #4#
      (SYSTEM::%STRUCTURE-REF 'XLIB::STANDARD-COLORMAP SYSTEM::OBJECT 4.))))
   #Y(XLIB::STANDARD-COLORMAP-MULT-COLOR
      #17Y(00 00 00 00 01 00 00 00 00 02 DA AE DB 32 2C 19 02)
      XLIB::STANDARD-COLORMAP 4.)
   (COMMON-LISP::FUNCTION XLIB::STANDARD-COLORMAP-VISUAL
    (XLIB::STANDARD-COLORMAP)
    #5=(COMMON-LISP::OR COMMON-LISP::NULL XLIB::VISUAL-INFO))
   (COMMON-LISP::INLINE XLIB::STANDARD-COLORMAP-VISUAL)
   XLIB::STANDARD-COLORMAP-VISUAL
   (#2#
    (COMMON-LISP::DECLARE (SYSTEM::IN-DEFUN XLIB::STANDARD-COLORMAP-VISUAL))
    (COMMON-LISP::BLOCK XLIB::STANDARD-COLORMAP-VISUAL
     (COMMON-LISP::THE #5#
      (SYSTEM::%STRUCTURE-REF 'XLIB::STANDARD-COLORMAP SYSTEM::OBJECT 5.))))
   #Y(XLIB::STANDARD-COLORMAP-VISUAL
      #17Y(00 00 00 00 01 00 00 00 00 02 DA AE DB 32 2C 19 02)
      XLIB::STANDARD-COLORMAP 5.)
   (COMMON-LISP::FUNCTION XLIB::STANDARD-COLORMAP-KILL
    (XLIB::STANDARD-COLORMAP)
    #6=(COMMON-LISP::OR
        (COMMON-LISP::MEMBER COMMON-LISP::NIL :RELEASE-BY-FREEING-COLORMAP)
        XLIB::DRAWABLE XLIB::GCONTEXT XLIB::CURSOR XLIB::COLORMAP XLIB::FONT))
   (COMMON-LISP::INLINE XLIB::STANDARD-COLORMAP-KILL)
   XLIB::STANDARD-COLORMAP-KILL
   (#2# (COMMON-LISP::DECLARE (SYSTEM::IN-DEFUN XLIB::STANDARD-COLORMAP-KILL))
    (COMMON-LISP::BLOCK XLIB::STANDARD-COLORMAP-KILL
     (COMMON-LISP::THE #6#
      (SYSTEM::%STRUCTURE-REF 'XLIB::STANDARD-COLORMAP SYSTEM::OBJECT 6.))))
   #Y(XLIB::STANDARD-COLORMAP-KILL
      #17Y(00 00 00 00 01 00 00 00 00 02 DA AE DB 32 2C 19 02)
      XLIB::STANDARD-COLORMAP 6.)
   SYSTEM::DEFSTRUCT-WRITER SYSTEM::SETF-EXPANDER -1. 1.
   #Y(XLIB::SETF-STANDARD-COLORMAP-COLORMAP
      #26Y(00 00 00 00 02 00 00 00 00 03 9F 5C 78 DA DB AE DC DD DE B4 7B 03 61
           05 19 04)
      SYSTEM::%STRUCTURE-STORE 'XLIB::STANDARD-COLORMAP 1. COMMON-LISP::THE
      #1#)
   COMMON-LISP::SETF SYSTEM::%SET-DOCUMENTATION
   #Y(XLIB::SETF-STANDARD-COLORMAP-BASE-PIXEL
      #26Y(00 00 00 00 02 00 00 00 00 03 9F 5C 78 DA DB AE DC DD DE B4 7B 03 61
           05 19 04)
      SYSTEM::%STRUCTURE-STORE 'XLIB::STANDARD-COLORMAP 2. COMMON-LISP::THE
      XLIB::PIXEL)
   #Y(XLIB::SETF-STANDARD-COLORMAP-MAX-COLOR
      #26Y(00 00 00 00 02 00 00 00 00 03 9F 5C 78 DA DB AE DC DD DE B4 7B 03 61
           05 19 04)
      SYSTEM::%STRUCTURE-STORE 'XLIB::STANDARD-COLORMAP 3. COMMON-LISP::THE
      #3#)
   #Y(XLIB::SETF-STANDARD-COLORMAP-MULT-COLOR
      #26Y(00 00 00 00 02 00 00 00 00 03 9F 5C 78 DA DB AE DC DD DE B4 7B 03 61
           05 19 04)
      SYSTEM::%STRUCTURE-STORE 'XLIB::STANDARD-COLORMAP 4. COMMON-LISP::THE
      #4#)
   #Y(XLIB::SETF-STANDARD-COLORMAP-VISUAL
      #26Y(00 00 00 00 02 00 00 00 00 03 9F 5C 78 DA DB AE DC DD DE B4 7B 03 61
           05 19 04)
      SYSTEM::%STRUCTURE-STORE 'XLIB::STANDARD-COLORMAP 5. COMMON-LISP::THE
      #5#)
   #Y(XLIB::SETF-STANDARD-COLORMAP-KILL
      #26Y(00 00 00 00 02 00 00 00 00 03 9F 5C 78 DA DB AE DC DD DE B4 7B 03 61
           05 19 04)
      SYSTEM::%STRUCTURE-STORE 'XLIB::STANDARD-COLORMAP 6. COMMON-LISP::THE
      #6#)
   COMMON-LISP::STRUCTURE CLOS::DEFSTRUCT-REMOVE-PRINT-OBJECT-METHOD)
#Y(#:|129| #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   XLIB::CARD16->RGB-VAL SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::CARD16->RGB-VAL
      #17Y(00 00 00 00 01 00 00 00 00 02 AD DA 33 02 38 19 02)
      #.(COMMON-LISP::/ 1.0s0 65535.)))
#Y(#:|130| #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   XLIB::RGB-COLORMAPS SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::RGB-COLORMAPS
      #160Y(00 00 00 00 02 00 00 00 00 03 AE AE DA DB DC DD 6E 06 04 9D 1F 80
            87 DF B0 6F 06 AE E1 73 01 01 70 08 E3 AF E4 73 01 01 E5 E6 B2 E7
            73 01 01 6F 0E E9 B4 EA 73 01 01 6F 0E EB B6 EC 73 01 01 6F 0E 6E
            06 13 EE E6 B4 EF 73 01 01 6F 0E E9 B6 F0 73 01 01 6F 0E EB B8 F1
            73 01 01 6F 0E 6E 06 13 F2 F3 B6 72 45 91 01 32 0A B8 6F 06 B6 F4
            73 01 01 30 1B 14 F6 F7 B8 72 45 91 01 32 13 B7 F3 73 01 01 AC E7
            90 01 2E 10 BB 6F 06 AD 30 1F 16 01 14 6E 0C 20 61 01 19 04 03 1E
            16 01 1B 72 19 04)
      :TYPE :RGB_COLOR_MAP :RESULT-TYPE COMMON-LISP::VECTOR XLIB::GET-PROPERTY
      :COLORMAP XLIB::WINDOW-DISPLAY 0. XLIB::LOOKUP-COLORMAP :BASE-PIXEL 7.
      :MAX-COLOR :RED 1. XLIB::CARD16->RGB-VAL :GREEN 3. :BLUE 5.
      XLIB::MAKE-COLOR :MULT-COLOR 2. 4. 6. :VISUAL 9. 8. XLIB::VISUAL-INFO
      :KILL 10. :RELEASE-BY-FREEING-COLORMAP XLIB::LOOKUP-RESOURCE-ID
      XLIB::MAKE-STANDARD-COLORMAP))
#Y(#:|131|
   #28Y(00 00 00 00 00 00 00 00 00 01 DA DB 32 87 DA DC DD 32 86 DA DE 63 2D 03
        05 C5 19 01)
   XLIB::RGB-COLORMAPS SYSTEM::DEFSTRUCT-WRITER SYSTEM::SETF-EXPANDER
   XLIB::SET-RGB-COLORMAPS COMMON-LISP::SETF SYSTEM::%SET-DOCUMENTATION)
#Y(#:|132| #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   XLIB::SET-RGB-COLORMAPS SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::SET-RGB-COLORMAPS
      #345Y(00 00 00 00 03 00 00 00 00 04 DA AE 72 45 73 02 38 38 07 C6 FD 71
            1C DC AF 63 AD 8C 91 81 2C 87 01 00 85 02 14 AD 6F 03 6F 04 B1 AE
            AE 33 01 02 16 02 85 02 14 AD 6F 05 6F 06 E1 72 B5 B1 AE AE 33 01
            02 16 02 85 02 14 AD 6F 08 6F 06 E1 72 B5 B1 AE AE 33 01 02 16 02
            85 02 14 AD 6F 05 6F 09 E1 72 B5 B1 AE AE 33 01 02 16 02 85 02 14
            AD 6F 08 6F 09 E1 72 B5 B1 AE AE 33 01 02 16 02 85 02 14 AD 6F 05
            6F 0A E1 72 B5 B1 AE AE 33 01 02 16 02 85 02 14 AD 6F 08 6F 0A E1
            72 B5 B1 AE AE 33 01 02 16 02 85 02 14 AD 6F 0B B1 AE AE 33 01 02
            16 02 85 02 14 AD 6F 0C 6F 0D B1 AE AE 33 01 02 16 02 85 02 14 AD
            6F 0E AC 8E 04 80 44 AC 72 26 F4 8A 1B 80 51 AC 72 26 F7 8A 1B 80
            4E AC 72 26 65 1F 8A 1B 80 4A AC 72 26 65 21 8A 1B 80 46 AC 72 26
            65 22 8A 1B 80 42 EC ED AE EE 65 24 2E 16 14 F1 65 25 30 26 14 B3
            33 06 1F D4 1B 2F D6 1B 2C 93 00 77 AC 24 10 76 EC ED AE EE EF 2E
            16 14 F1 F2 30 19 1B 60 AC 2F 1C 1B 12 AC 2F 1E 1B 0D AC 2F 20 1B
            08 AC 2F 04 1B 03 AC 2F 23 F8 B1 AE AE 33 01 02 16 02 83 01 1B FE
            CF 16 02 B1 B1 AF 65 27 65 28 2D 05 29 19 06)
      10. XLIB::CARD32 -1. XLIB::STANDARD-COLORMAP-COLORMAP XLIB::COLORMAP-ID
      XLIB::STANDARD-COLORMAP-MAX-COLOR XLIB::COLOR-RED
      #.(COMMON-LISP::/ 1.0s0 65535.) XLIB::STANDARD-COLORMAP-MULT-COLOR
      XLIB::COLOR-GREEN XLIB::COLOR-BLUE XLIB::STANDARD-COLORMAP-BASE-PIXEL
      XLIB::STANDARD-COLORMAP-VISUAL XLIB::VISUAL-INFO-ID
      XLIB::STANDARD-COLORMAP-KILL 0. :RELEASE-BY-FREEING-COLORMAP 1.
      COMMON-LISP::TYPE-ERROR :DATUM :EXPECTED-TYPE
      (COMMON-LISP::MEMBER COMMON-LISP::NIL :RELEASE-BY-FREEING-COLORMAP)
      SYSTEM::TYPE-ERROR-STRING XLIB::KILL
      (COMMON-LISP::NIL :RELEASE-BY-FREEING-COLORMAP) SYSTEM::CASE-ERROR-STRING
      #.(CLOS::FIND-CLASS 'XLIB::DRAWABLE) CLOS::SUBCLASSP XLIB::DRAWABLE-ID
      #.(CLOS::FIND-CLASS 'XLIB::GCONTEXT) XLIB::GCONTEXT-ID
      #.(CLOS::FIND-CLASS 'XLIB::CURSOR) XLIB::CURSOR-ID
      #.(CLOS::FIND-CLASS 'XLIB::COLORMAP) #.(CLOS::FIND-CLASS 'XLIB::FONT)
      XLIB::FONT-ID
      (COMMON-LISP::OR COMMON-LISP::SYMBOL XLIB::DRAWABLE XLIB::GCONTEXT
       XLIB::CURSOR XLIB::COLORMAP XLIB::FONT)
      (COMMON-LISP::SYMBOL XLIB::DRAWABLE XLIB::GCONTEXT XLIB::CURSOR
       XLIB::COLORMAP XLIB::FONT)
      SYSTEM::TYPECASE-ERROR-STRING :RGB_COLOR_MAP 32. XLIB::CHANGE-PROPERTY))
#Y(#:|133| #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   XLIB::GET-STANDARD-COLORMAP SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::GET-STANDARD-COLORMAP
      #98Y(00 00 00 00 02 00 00 00 00 03 AE AE DA DB DC DD 6E 06 04 9D 1F 80 49
           AF 6F 05 AD E0 73 01 01 70 07 AD E2 73 01 01 E3 AF E4 73 01 01 6F 0B
           E6 B1 E7 73 01 01 6F 0B E8 B3 E9 73 01 01 6F 0B 6E 06 10 E3 B0 EB 73
           01 01 6F 0B E6 B2 EC 73 01 01 6F 0B E8 B4 ED 73 01 01 6F 0B 6E 06 10
           40 04 19 04 19 04)
      :TYPE :RGB_COLOR_MAP :RESULT-TYPE COMMON-LISP::VECTOR XLIB::GET-PROPERTY
      XLIB::WINDOW-DISPLAY 0. XLIB::LOOKUP-COLORMAP 7. :RED 1.
      XLIB::CARD16->RGB-VAL :GREEN 3. :BLUE 5. XLIB::MAKE-COLOR 2. 4. 6.))
#Y(#:|134| #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   XLIB::SET-STANDARD-COLORMAP SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::SET-STANDARD-COLORMAP
      #63Y(00 00 00 00 06 00 00 00 00 00 DA B1 6F 01 B0 6F 02 DD 72 B5 B0 6F 02
           DD 72 B5 B2 6F 04 DD 72 B5 B2 6F 04 DD 72 B5 B4 6F 05 DD 72 B5 B4 6F
           05 DD 72 B5 A8 77 07 B3 B3 AE E0 E1 2D 05 08 19 08)
      #.#'COMMON-LISP::VECTOR XLIB::COLORMAP-ID XLIB::COLOR-RED
      #.(COMMON-LISP::/ 1.0s0 65535.) XLIB::COLOR-GREEN XLIB::COLOR-BLUE
      :RGB_COLOR_MAP 32. XLIB::CHANGE-PROPERTY))
#Y(#:|135| #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   XLIB::CUT-BUFFER SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::CUT-BUFFER
      #70Y(00 00 00 00 01 00 00 00 80 1C 06 00 00 00 3B 06 02 CB FE 3B 05 02 CC
           FD 3B 04 02 CD FC 3B 03 03 9A 09 03 3B 02 02 CB FA 3D 01 B3 2F 0A 78
           6F 0B E6 B4 73 01 01 AD AD DB B6 DC B7 DE B7 DF B8 DD BC 2D 0C 0D 19
           0A)
      :BUFFER :TYPE :RESULT-TYPE :TRANSFORM :START :END 0. :STRING
      COMMON-LISP::STRING XLIB::CARD8->CHAR XLIB::DISPLAY-ROOTS
      XLIB::SCREEN-ROOT
      #(:CUT_BUFFER0 :CUT_BUFFER1 :CUT_BUFFER2 :CUT_BUFFER3 :CUT_BUFFER4
        :CUT_BUFFER5 :CUT_BUFFER6 :CUT_BUFFER7)
      XLIB::GET-PROPERTY))
#Y(#:|136| #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C8 19 01)
   #.(SYSTEM::GET-SETF-SYMBOL 'XLIB::CUT-BUFFER) SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(#1=(COMMON-LISP::SETF XLIB::CUT-BUFFER)
      #70Y(00 00 00 00 02 00 00 00 80 1D 06 00 00 00 3B 06 02 CB FE 3B 05 02 CC
           FD 3B 04 02 CD FC 3B 03 02 CB FB 3D 02 3B 01 03 9A 09 01 B3 2F 0A 78
           6F 0B E6 B4 73 01 01 AD AD B8 B6 B6 DF B5 DD B9 DE BA 2D 0B 0D A7 19
           0B)
      :BUFFER :TYPE :FORMAT :START :END :TRANSFORM 0. :STRING 8.
      XLIB::CHAR->CARD8 XLIB::DISPLAY-ROOTS XLIB::SCREEN-ROOT
      #(:CUT_BUFFER0 :CUT_BUFFER1 :CUT_BUFFER2 :CUT_BUFFER3 :CUT_BUFFER4
        :CUT_BUFFER5 :CUT_BUFFER6 :CUT_BUFFER7)
      XLIB::CHANGE-PROPERTY)
   #1#)
#Y(#:|137| #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   XLIB::ROTATE-CUT-BUFFERS SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::ROTATE-CUT-BUFFERS
      #71Y(00 00 00 00 01 00 02 00 00 0D 3B 02 02 C5 FA 3B 01 02 7E 01 AF 2F 01
           78 6F 02 93 02 22 AC 6F 03 DE 1B 14 E0 AD 73 01 01 AE 38 03 8C B2 07
           E1 B3 E2 AF 2D 04 09 85 00 AC DF 91 01 33 66 16 02 AC E0 B1 2D 03 0A
           19 05)
      1. XLIB::DISPLAY-ROOTS XLIB::SCREEN-ROOT XLIB::LIST-PROPERTIES 0. 8.
      #(:CUT_BUFFER0 :CUT_BUFFER1 :CUT_BUFFER2 :CUT_BUFFER3 :CUT_BUFFER4
        :CUT_BUFFER5 :CUT_BUFFER6 :CUT_BUFFER7)
      "" :BUFFER #.(SYSTEM::GET-SETF-SYMBOL 'XLIB::CUT-BUFFER)
      XLIB::ROTATE-PROPERTIES))
#Y(#:|138|
   #77Y(00 00 00 00 00 00 00 00 00 01 DA 99 01 32 80 DC 99 03 32 80 DE 99 05 32
        80 E0 99 07 32 80 E2 99 09 32 80 E4 99 0B 32 80 E6 99 0D 32 80 E8 99 0F
        32 80 EA 99 11 32 80 EC 99 13 32 80 EE 99 15 32 80 F0 99 17 32 80 F2 99
        19 32 80 19 01)
   XLIB::%UNTRACED-COLOR-BLUE XLIB::COLOR-BLUE XLIB::%UNTRACED-COLOR-GREEN
   XLIB::COLOR-GREEN XLIB::%UNTRACED-COLOR-RED XLIB::COLOR-RED
   XLIB::%UNTRACED-COLORMAP-VISUAL-INFO XLIB::COLORMAP-VISUAL-INFO
   XLIB::%UNTRACED-DISPLAY-DISPLAY XLIB::DISPLAY-DISPLAY
   XLIB::%UNTRACED-DISPLAY-HOST XLIB::DISPLAY-HOST
   XLIB::%UNTRACED-DISPLAY-PROTOCOL-MAJOR-VERSION
   XLIB::DISPLAY-PROTOCOL-MAJOR-VERSION
   XLIB::%UNTRACED-DISPLAY-PROTOCOL-MINOR-VERSION
   XLIB::DISPLAY-PROTOCOL-MINOR-VERSION XLIB::%UNTRACED-DISPLAY-RELEASE-NUMBER
   XLIB::DISPLAY-RELEASE-NUMBER XLIB::%UNTRACED-DISPLAY-VENDOR-NAME
   XLIB::DISPLAY-VENDOR-NAME XLIB::%UNTRACED-DRAWABLE-WIDTH
   XLIB::DRAWABLE-WIDTH XLIB::%UNTRACED-DRAWABLE-X XLIB::DRAWABLE-X
   XLIB::%UNTRACED-VISUAL-INFO-CLASS XLIB::VISUAL-INFO-CLASS)
#Y(#:|139| #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   XLIB::PRINT-COLOR SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::PRINT-COLOR
      #38Y(00 00 00 00 03 00 00 00 00 04 00 2B 02 7F 04 00 00 7F 03 00 01 AC 6D
           00 01 68 01 00 68 02 01 DB 64 2D 05 02 19 05)
      #Y(XLIB::PRINT-COLOR-1
         #58Y(00 00 00 00 00 00 00 00 00 01 69 00 01 6F 01 69 00 02 31 80 DC 69
              00 02 38 02 31 88 69 00 01 6F 03 69 00 02 31 80 DE 69 00 02 38 02
              31 88 69 00 01 6F 05 69 00 02 31 80 19 01)
         COMMON-LISP::NIL XLIB::%UNTRACED-COLOR-RED " "
         XLIB::%UNTRACED-COLOR-GREEN " " XLIB::%UNTRACED-COLOR-BLUE)
      :TYPE SYSTEM::WRITE-UNREADABLE))
#Y(#:|140| #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   XLIB::PRINT-DISPLAY SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::PRINT-DISPLAY
      #36Y(00 00 00 00 03 00 00 00 00 04 AE DA DB B2 6F 02 B3 6F 03 B4 6F 04 B5
           6F 05 B6 6F 06 B7 6F 07 2D 09 08 19 04)
      #Y(XLIB::PRINT-DISPLAY-1
         #95Y(00 00 00 00 08 00 00 00 01 00 DA B6 38 02 31 88 B4 B6 31 80 DB B6
              31 87 B3 B6 31 83 DC B6 31 87 B5 01 06 B9 2D 08 03 DE B6 38 02 31
              88 B1 B6 31 83 DF B6 38 02 31 88 B5 01 06 B7 2D 08 03 E0 B6 38 02
              31 88 B5 01 06 B6 2D 08 03 E1 B6 31 87 B5 01 06 B5 2D 08 03 E2 B6
              38 02 31 88 9E 19 0A)
         "#<" #\Space #\: SYSTEM::DO-FORMAT-DECIMAL " (" " R" ") X" #\.
         " protocol>")
      XLIB::DISPLAY XLIB::%UNTRACED-DISPLAY-HOST
      XLIB::%UNTRACED-DISPLAY-DISPLAY XLIB::%UNTRACED-DISPLAY-VENDOR-NAME
      XLIB::%UNTRACED-DISPLAY-RELEASE-NUMBER
      XLIB::%UNTRACED-DISPLAY-PROTOCOL-MAJOR-VERSION
      XLIB::%UNTRACED-DISPLAY-PROTOCOL-MINOR-VERSION COMMON-LISP::FORMAT))
#Y(#:|141|
   #39Y(00 00 00 00 00 00 00 00 00 01 DA DB DC DD 64 DE DF 38 02 72 27 64 38 02
        72 27 7B 02 E0 63 E1 E2 6E 0A 09 30 0A 19 01)
   CLOS::PRINT-OBJECT :INITFUNCTION
   #Y(#:|1| #15Y(00 00 00 00 01 00 00 00 00 02 DA C6 5D 19 02)
      #Y(#:|1|
         #30Y(00 00 00 00 02 00 00 00 00 03 AD DA B0 72 25 B1 DB 72 3B 6F 02 B2
              DD 72 3B 2D 05 04 19 03)
         #Y(#:|1|
            #52Y(00 00 00 00 04 00 00 00 01 1A DA B2 38 02 31 88 B0 B2 31 80 DB
                 B2 31 87 AF B2 31 83 DC B2 38 02 31 88 B1 01 02 DD DE 01 02 B5
                 2D 08 05 E0 B2 31 87 9E 19 06)
            "#<" #\Space " #x" 8. #\0 SYSTEM::DO-FORMAT-HEXADECIMAL #\>)
         XLIB::DISPLAY XLIB::%UNTRACED-DISPLAY-HOST XLIB::ID
         COMMON-LISP::FORMAT)
      (COMMON-LISP::T))
   :WANTS-NEXT-METHOD-P :PARAMETER-SPECIALIZERS XLIB::XID-OBJECT :QUALIFIERS
   :SIGNATURE
   #S(SYSTEM::SIGNATURE :REQ-NUM 2. :OPT-NUM 0. :REST-P COMMON-LISP::NIL
      :KEYS-P COMMON-LISP::NIL :KEYWORDS COMMON-LISP::NIL
      :ALLOW-P COMMON-LISP::NIL)
   CLOS::MAKE-STANDARD-METHOD CLOS::DO-DEFMETHOD)
#Y(#:|142|
   #39Y(00 00 00 00 00 00 00 00 00 01 DA DB DC DD 64 DE DF 38 02 72 27 64 38 02
        72 27 7B 02 E0 63 E1 E2 6E 0A 09 30 0A 19 01)
   CLOS::PRINT-OBJECT :INITFUNCTION
   #Y(#:|1| #15Y(00 00 00 00 01 00 00 00 00 02 DA C6 5D 19 02)
      #Y(#:|1|
         #44Y(00 00 00 00 02 00 00 00 00 03 AE 6F 00 92 00 17 C7 14 AF DD B2 72
              25 B3 DE 72 3B 6F 05 B4 E0 72 3B B1 2D 06 07 19 05 14 2F 01 1B
              65)
         XLIB::%UNTRACED-COLORMAP-VISUAL-INFO XLIB::%UNTRACED-VISUAL-INFO-CLASS
         "unknown visual class"
         #Y(#:|1|
            #60Y(00 00 00 00 05 00 00 00 01 00 DA B3 38 02 31 88 B1 B3 31 80 DB
                 B3 31 87 B0 B3 31 83 DC B3 38 02 31 88 B2 01 02 DD DE 01 02 B6
                 2D 08 05 DB B3 31 87 AE B3 31 83 E0 B3 31 87 9E 19 07)
            "#<" #\Space " #x" 8. #\0 SYSTEM::DO-FORMAT-HEXADECIMAL #\>)
         XLIB::DISPLAY XLIB::%UNTRACED-DISPLAY-HOST XLIB::ID
         COMMON-LISP::FORMAT)
      (COMMON-LISP::T))
   :WANTS-NEXT-METHOD-P :PARAMETER-SPECIALIZERS XLIB::COLORMAP :QUALIFIERS
   :SIGNATURE
   #S(SYSTEM::SIGNATURE :REQ-NUM 2. :OPT-NUM 0. :REST-P COMMON-LISP::NIL
      :KEYS-P COMMON-LISP::NIL :KEYWORDS COMMON-LISP::NIL
      :ALLOW-P COMMON-LISP::NIL)
   CLOS::MAKE-STANDARD-METHOD CLOS::DO-DEFMETHOD)
#Y(#:|143|
   #39Y(00 00 00 00 00 00 00 00 00 01 DA DB DC DD 64 DE DF 38 02 72 27 64 38 02
        72 27 7B 02 E0 63 E1 E2 6E 0A 09 30 0A 19 01)
   CLOS::PRINT-OBJECT :INITFUNCTION
   #Y(#:|1| #15Y(00 00 00 00 01 00 00 00 00 02 DA C6 5D 19 02)
      #Y(#:|1|
         #32Y(00 00 00 00 02 00 00 00 00 03 AD DA DB B1 DC 72 3B 6F 03 B2 DE 72
              3B B3 DF 72 3B 2D 06 06 19 03)
         #Y(#:|1|
            #60Y(00 00 00 00 05 00 00 00 01 00 DA B3 38 02 31 88 B1 B3 31 80 DB
                 B3 31 87 B0 B3 31 83 DB B3 31 87 AF B3 31 83 DC B3 38 02 31 88
                 B2 01 02 DD DE 01 02 B5 2D 08 05 E0 B3 31 87 9E 19 07)
            "#<" #\Space " #x" 8. #\0 SYSTEM::DO-FORMAT-HEXADECIMAL #\>)
         XLIB::FONT XLIB::DISPLAY XLIB::%UNTRACED-DISPLAY-HOST XLIB::NAME
         XLIB::ID COMMON-LISP::FORMAT)
      (COMMON-LISP::T))
   :WANTS-NEXT-METHOD-P :PARAMETER-SPECIALIZERS XLIB::FONT :QUALIFIERS
   :SIGNATURE
   #S(SYSTEM::SIGNATURE :REQ-NUM 2. :OPT-NUM 0. :REST-P COMMON-LISP::NIL
      :KEYS-P COMMON-LISP::NIL :KEYWORDS COMMON-LISP::NIL
      :ALLOW-P COMMON-LISP::NIL)
   CLOS::MAKE-STANDARD-METHOD CLOS::DO-DEFMETHOD)
#Y(#:|144| #13Y(00 00 00 00 00 00 00 00 00 01 C5 19 01)
   (CLOS::DEFMETHOD CLOS::PRINT-OBJECT ((XLIB::SELF XLIB::DRAWABLE) XLIB::SINK)
    (CLOS::WITH-SLOTS (XLIB::ID XLIB::DISPLAY) XLIB::SELF
     (COMMON-LISP::FORMAT XLIB::SINK "#<~S ~Dx~D+~D+~D ~A #x~8,'0X>"
      (COMMON-LISP::TYPE-OF XLIB::SELF)
      (XLIB::%UNTRACED-DRAWABLE-WIDTH XLIB::SELF)
      (XLIB::%UNTRACED-DRAWABLE-HEIGHT XLIB::SELF)
      (XLIB::%UNTRACED-DRAWABLE-X XLIB::SELF)
      (XLIB::%UNTRACED-DRAWABLE-Y XLIB::SELF)
      (XLIB::%UNTRACED-DISPLAY-HOST XLIB::DISPLAY) XLIB::ID))))
#Y(#:|145|
   #39Y(00 00 00 00 00 00 00 00 00 01 DA DB DC DD 64 DE DF 38 02 72 27 64 38 02
        72 27 7B 02 E0 63 E1 E2 6E 0A 09 30 0A 19 01)
   CLOS::PRINT-OBJECT :INITFUNCTION
   #Y(#:|1| #15Y(00 00 00 00 01 00 00 00 00 02 DA C6 5D 19 02)
      #Y(#:|1|
         #30Y(00 00 00 00 02 00 00 00 00 03 AD DA B0 72 25 B1 DB 72 3B 6F 02 B2
              DD 72 3B 2D 05 04 19 03)
         #Y(#:|1|
            #52Y(00 00 00 00 04 00 00 00 01 1A DA B2 38 02 31 88 B0 B2 31 80 DB
                 B2 31 87 AF B2 31 83 DC B2 38 02 31 88 B1 01 02 DD DE 01 02 B5
                 2D 08 05 E0 B2 31 87 9E 19 06)
            "#<" #\Space " #x" 8. #\0 SYSTEM::DO-FORMAT-HEXADECIMAL #\>)
         XLIB::DISPLAY XLIB::%UNTRACED-DISPLAY-HOST XLIB::ID
         COMMON-LISP::FORMAT)
      (COMMON-LISP::T))
   :WANTS-NEXT-METHOD-P :PARAMETER-SPECIALIZERS XLIB::DRAWABLE :QUALIFIERS
   :SIGNATURE
   #S(SYSTEM::SIGNATURE :REQ-NUM 2. :OPT-NUM 0. :REST-P COMMON-LISP::NIL
      :KEYS-P COMMON-LISP::NIL :KEYWORDS COMMON-LISP::NIL
      :ALLOW-P COMMON-LISP::NIL)
   CLOS::MAKE-STANDARD-METHOD CLOS::DO-DEFMETHOD)
#Y(#:|146|
   #34Y(00 00 00 00 00 00 00 00 00 01 DA 38 01 8D 5D 0B DB DA 71 4D 8C FF 04 DA
        DC 30 03 DA DB 32 81 C5 19 01)
   XLIB::*STATE-MASK-VECTOR*
   #1=#(:SHIFT :LOCK :CONTROL :MOD-1 :MOD-2 :MOD-3 :MOD-4 :MOD-5 :BUTTON-1
        :BUTTON-2 :BUTTON-3 :BUTTON-4 :BUTTON-5)
   (COMMON-LISP::DEFCONSTANT XLIB::*STATE-MASK-VECTOR* '#1#)
   SYSTEM::CONSTANT-WARNING)
#Y(#:|147|
   #22Y(00 00 00 00 00 00 00 00 00 01 DA 31 59 DB DC 71 CA 31 51 C6 19 01)
   (COMMON-LISP::SPECIAL XLIB::*KEYWORD-PACKAGE*) XLIB::*KEYWORD-PACKAGE*
   :KEYWORD)
#Y(#:|148| #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   XLIB::KINTERN SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::KINTERN
      #19Y(00 00 00 00 01 00 00 00 00 02 AD 71 4A 6B 00 31 D2 19 02)
      XLIB::*KEYWORD-PACKAGE*))
#Y(#:|149|
   #22Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 6F 03 32 80 C5 19 01)
   XLIB::INDEX+ SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::INDEX+ #17Y(00 00 00 00 01 00 01 00 00 08 95 02 DA 9E 5D 19 04)
      COMMON-LISP::+)
   SYSTEM::MAKE-MACRO)
#Y(#:|150|
   #22Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 6F 03 32 80 C5 19 01)
   XLIB::INDEX-LOGAND SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::INDEX-LOGAND
      #17Y(00 00 00 00 01 00 01 00 00 08 95 02 DA 9E 5D 19 04)
      COMMON-LISP::LOGAND)
   SYSTEM::MAKE-MACRO)
#Y(#:|151|
   #22Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 6F 03 32 80 C5 19 01)
   XLIB::INDEX-LOGIOR SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::INDEX-LOGIOR
      #17Y(00 00 00 00 01 00 01 00 00 08 95 02 DA 9E 5D 19 04)
      COMMON-LISP::LOGIOR)
   SYSTEM::MAKE-MACRO)
#Y(#:|152|
   #22Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 6F 03 32 80 C5 19 01)
   XLIB::INDEX- SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::INDEX- #17Y(00 00 00 00 01 00 01 00 00 08 95 02 DA 9E 5D 19 04)
      COMMON-LISP::-)
   SYSTEM::MAKE-MACRO)
#Y(#:|153|
   #22Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 6F 03 32 80 C5 19 01)
   XLIB::INDEX* SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::INDEX* #17Y(00 00 00 00 01 00 01 00 00 08 95 02 DA 9E 5D 19 04)
      COMMON-LISP::*)
   SYSTEM::MAKE-MACRO)
#Y(#:|154|
   #22Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 6F 03 32 80 C5 19 01)
   XLIB::INDEX1+ SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::INDEX1+
      #32Y(00 00 00 00 01 00 01 00 00 08 AE 72 45 DA 90 01 2F 09 9F 5C 78 DC AD
           61 02 19 04 AE 2F 01 19 03)
      2. SYSTEM::MACRO-CALL-ERROR COMMON-LISP::1+)
   SYSTEM::MAKE-MACRO)
#Y(#:|155|
   #22Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 6F 03 32 80 C5 19 01)
   XLIB::INDEX1- SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::INDEX1-
      #32Y(00 00 00 00 01 00 01 00 00 08 AE 72 45 DA 90 01 2F 09 9F 5C 78 DC AD
           61 02 19 04 AE 2F 01 19 03)
      2. SYSTEM::MACRO-CALL-ERROR COMMON-LISP::1-)
   SYSTEM::MAKE-MACRO)
#Y(#:|156|
   #22Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 6F 03 32 80 C5 19 01)
   XLIB::INDEX-INCF SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::INDEX-INCF
      #51Y(00 00 00 00 01 00 01 00 00 08 DA AF 72 45 DB 91 02 32 15 9F 5C 78 A0
           5C 5C 1C 12 C8 14 DE AE DF B0 B0 7B 03 61 03 19 05 AE 2F 02 19 03 A0
           5C 5C 5B 1B 69)
      2. 3. SYSTEM::MACRO-CALL-ERROR 1. COMMON-LISP::SETF XLIB::INDEX+)
   SYSTEM::MAKE-MACRO)
#Y(#:|157|
   #22Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 6F 03 32 80 C5 19 01)
   XLIB::INDEX-DECF SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::INDEX-DECF
      #51Y(00 00 00 00 01 00 01 00 00 08 DA AF 72 45 DB 91 02 32 15 9F 5C 78 A0
           5C 5C 1C 12 C8 14 DE AE DF B0 B0 7B 03 61 03 19 05 AE 2F 02 19 03 A0
           5C 5C 5B 1B 69)
      2. 3. SYSTEM::MACRO-CALL-ERROR 1. COMMON-LISP::SETF XLIB::INDEX-)
   SYSTEM::MAKE-MACRO)
#Y(#:|158|
   #22Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 6F 03 32 80 C5 19 01)
   XLIB::INDEX-MIN SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::INDEX-MIN #17Y(00 00 00 00 01 00 01 00 00 08 95 02 DA 9E 5D 19 04)
      COMMON-LISP::MIN)
   SYSTEM::MAKE-MACRO)
#Y(#:|159|
   #22Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 6F 03 32 80 C5 19 01)
   XLIB::INDEX-MAX SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::INDEX-MAX #17Y(00 00 00 00 01 00 01 00 00 08 95 02 DA 9E 5D 19 04)
      COMMON-LISP::MAX)
   SYSTEM::MAKE-MACRO)
#Y(#:|160|
   #22Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 6F 03 32 80 C5 19 01)
   XLIB::INDEX-FLOOR SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::INDEX-FLOOR
      #37Y(00 00 00 00 01 00 01 00 00 08 AE 72 45 DA 90 01 2F 0E 9F 5C 78 A0 5C
           5C 78 DC AE AE 61 03 19 05 AE 2F 01 19 03)
      3. SYSTEM::MACRO-CALL-ERROR COMMON-LISP::FLOOR)
   SYSTEM::MAKE-MACRO)
#Y(#:|161|
   #22Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 6F 03 32 80 C5 19 01)
   XLIB::INDEX-CEILING SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::INDEX-CEILING
      #37Y(00 00 00 00 01 00 01 00 00 08 AE 72 45 DA 90 01 2F 0E 9F 5C 78 A0 5C
           5C 78 DC AE AE 61 03 19 05 AE 2F 01 19 03)
      3. SYSTEM::MACRO-CALL-ERROR COMMON-LISP::CEILING)
   SYSTEM::MAKE-MACRO)
#Y(#:|162|
   #22Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 6F 03 32 80 C5 19 01)
   XLIB::INDEX-TRUNCATE SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::INDEX-TRUNCATE
      #37Y(00 00 00 00 01 00 01 00 00 08 AE 72 45 DA 90 01 2F 0E 9F 5C 78 A0 5C
           5C 78 DC AE AE 61 03 19 05 AE 2F 01 19 03)
      3. SYSTEM::MACRO-CALL-ERROR COMMON-LISP::TRUNCATE)
   SYSTEM::MAKE-MACRO)
#Y(#:|163|
   #22Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 6F 03 32 80 C5 19 01)
   XLIB::INDEX-MOD SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::INDEX-MOD
      #37Y(00 00 00 00 01 00 01 00 00 08 AE 72 45 DA 90 01 2F 0E 9F 5C 78 A0 5C
           5C 78 DC AE AE 61 03 19 05 AE 2F 01 19 03)
      3. SYSTEM::MACRO-CALL-ERROR COMMON-LISP::MOD)
   SYSTEM::MAKE-MACRO)
#Y(#:|164|
   #22Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 6F 03 32 80 C5 19 01)
   XLIB::INDEX-ASH SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::INDEX-ASH
      #37Y(00 00 00 00 01 00 01 00 00 08 AE 72 45 DA 90 01 2F 0E 9F 5C 78 A0 5C
           5C 78 DC AE AE 61 03 19 05 AE 2F 01 19 03)
      3. SYSTEM::MACRO-CALL-ERROR COMMON-LISP::ASH)
   SYSTEM::MAKE-MACRO)
#Y(#:|165|
   #22Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 6F 03 32 80 C5 19 01)
   XLIB::INDEX-PLUSP SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::INDEX-PLUSP
      #32Y(00 00 00 00 01 00 01 00 00 08 AE 72 45 DA 90 01 2F 09 9F 5C 78 DC AD
           61 02 19 04 AE 2F 01 19 03)
      2. SYSTEM::MACRO-CALL-ERROR COMMON-LISP::PLUSP)
   SYSTEM::MAKE-MACRO)
#Y(#:|166|
   #22Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 6F 03 32 80 C5 19 01)
   XLIB::INDEX-ZEROP SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::INDEX-ZEROP
      #32Y(00 00 00 00 01 00 01 00 00 08 AE 72 45 DA 90 01 2F 09 9F 5C 78 DC AD
           61 02 19 04 AE 2F 01 19 03)
      2. SYSTEM::MACRO-CALL-ERROR COMMON-LISP::ZEROP)
   SYSTEM::MAKE-MACRO)
#Y(#:|167|
   #22Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 6F 03 32 80 C5 19 01)
   XLIB::INDEX-EVENP SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::INDEX-EVENP
      #32Y(00 00 00 00 01 00 01 00 00 08 AE 72 45 DA 90 01 2F 09 9F 5C 78 DC AD
           61 02 19 04 AE 2F 01 19 03)
      2. SYSTEM::MACRO-CALL-ERROR COMMON-LISP::EVENP)
   SYSTEM::MAKE-MACRO)
#Y(#:|168|
   #22Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 6F 03 32 80 C5 19 01)
   XLIB::INDEX-ODDP SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::INDEX-ODDP
      #32Y(00 00 00 00 01 00 01 00 00 08 AE 72 45 DA 90 01 2F 09 9F 5C 78 DC AD
           61 02 19 04 AE 2F 01 19 03)
      2. SYSTEM::MACRO-CALL-ERROR COMMON-LISP::ODDP)
   SYSTEM::MAKE-MACRO)
#Y(#:|169|
   #22Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 6F 03 32 80 C5 19 01)
   XLIB::INDEX> SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::INDEX> #17Y(00 00 00 00 01 00 01 00 00 08 95 02 DA 9E 5D 19 04)
      COMMON-LISP::>)
   SYSTEM::MAKE-MACRO)
#Y(#:|170|
   #22Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 6F 03 32 80 C5 19 01)
   XLIB::INDEX= SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::INDEX= #17Y(00 00 00 00 01 00 01 00 00 08 95 02 DA 9E 5D 19 04)
      COMMON-LISP::=)
   SYSTEM::MAKE-MACRO)
#Y(#:|171|
   #22Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 6F 03 32 80 C5 19 01)
   XLIB::INDEX< SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::INDEX< #17Y(00 00 00 00 01 00 01 00 00 08 95 02 DA 9E 5D 19 04)
      COMMON-LISP::<)
   SYSTEM::MAKE-MACRO)
#Y(#:|172|
   #22Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 6F 03 32 80 C5 19 01)
   XLIB::INDEX>= SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::INDEX>= #17Y(00 00 00 00 01 00 01 00 00 08 95 02 DA 9E 5D 19 04)
      COMMON-LISP::>=)
   SYSTEM::MAKE-MACRO)
#Y(#:|173|
   #22Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 6F 03 32 80 C5 19 01)
   XLIB::INDEX<= SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::INDEX<= #17Y(00 00 00 00 01 00 01 00 00 08 95 02 DA 9E 5D 19 04)
      COMMON-LISP::<=)
   SYSTEM::MAKE-MACRO)
#Y(#:|174| #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   XLIB::READ-BITMAP-FILE SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::READ-BITMAP-FILE
      #499Y(03 00 01 00 01 00 00 00 00 02 AD DA 38 05 71 F7 53 81 D0 C6 45 00
            2B 01 DC 00 0B 01 00 14 63 1B 80 77 0B 04 00 16 01 1B 80 48 0B 09
            00 16 06 1B 80 67 ED 33 00 1E 03 15 1B 80 B9 D9 1B 80 B5 03 16 1B
            80 B0 CC 1B 80 AC 03 17 1B 80 A7 92 01 22 DF AF 64 38 05 CB F9 81
            5D 00 AE E1 AE CD 34 F9 14 24 09 0E 68 03 00 E4 AF 6E 03 0B 92 00
            FF B2 16 01 96 00 E6 B0 38 06 CB F9 A5 FC 72 5D B0 AE AE CD 74 96
            01 B2 AD 38 03 71 7E 68 08 00 AF AE 6E 03 0B 92 00 FF 93 16 06 B3
            38 03 80 76 02 14 DD 73 01 01 DE 90 01 07 FF A3 AF 6D 0D 01 E8 63
            9F 74 E9 63 A0 74 EA EB 7B 01 A1 74 EC DD 7B 01 A2 74 40 04 16 01
            42 04 93 03 FF 66 93 02 FF 62 AD EE 90 01 31 FF 5F AD F0 90 01 31
            FF 5D AD E1 90 01 31 FF 5A AD F1 90 01 31 FF 58 AD EB 90 01 31 FF
            55 D6 14 B0 AD 73 02 38 AC E1 72 B3 EF AE EF 72 B3 73 02 38 AC E1
            72 B3 AC B4 73 02 38 38 07 03 18 FD 71 1C DD DD DD 1B 80 4C DD 1B
            37 0B 11 00 16 02 1B 80 7E C1 38 03 71 77 25 19 78 AF AF 73 02 36
            C2 38 03 71 77 03 1A 74 F1 72 D0 C3 38 03 71 77 03 1A 74 73 02 36
            B2 AE AE 33 01 02 16 02 85 02 85 00 AC B4 91 01 33 4B 16 01 C8 F9
            AE B1 82 02 36 02 85 00 AC B8 91 01 33 FF AD 16 01 B7 B5 82 01 37
            0B 68 0F 00 F5 38 01 8F 83 25 68 0F 00 F5 38 01 72 83 8F 91 1A 68
            0F 00 F5 38 01 72 83 B5 73 01 37 68 10 00 F5 AE 6E 03 0B 92 00 FF
            7C 16 02 E8 B8 E9 B9 EA BA F6 BA F7 B7 65 1E 68 1A 00 65 1F 65 20
            65 21 BE 65 22 EF 65 23 EF EC 66 1D 65 24 64 65 25 64 2D 1A 26 16
            10 41 05 00 00 02 1D 03 14 2F 27 46 54 05 00 00 00 1D 0F 1B 06 05
            00 00 00 1D 07 14 65 28 64 2D 03 27 55 19 03)
      :INPUT #.#'COMMON-LISP::VALUES "" 0. #\# #\_ #.#'COMMON-LISP::CHAR= 8.
      #Y(XLIB::READ-BITMAP-FILE-READ-KEYWORD
         #31Y(00 00 00 00 03 00 00 00 00 04 DA DB B1 B1 B1 72 43 38 02 71 45 38
              07 C7 FA 72 54 2F 03 19 04)
         #\- #\_ #.#'COMMON-LISP::CHAR= XLIB::KINTERN)
      :IMAGE :NAME SYSTEM::%PUTF #\Space
      #Y(XLIB::READ-BITMAP-FILE-EXTRACT-PROPERTY
         #81Y(00 00 00 00 01 00 00 00 01 17 DB 69 00 01 B0 A1 77 02 69 00 01 AC
              63 1B 2E DC DD 6F 04 33 00 1F 79 9F 5C 79 31 A8 16 02 1B 22 92 00
              73 9F 5C 5C 0C 00 01 16 02 1B 15 9E 5C 20 5E 94 01 A4 22 6A 9E 5C
              79 9F F9 6A 01 9E 21 6D 16 02 16 01 15 19 03)
         COMMON-LISP::NIL #.#'COMMON-LISP::GETF COMMON-LISP::ERROR
         "REMF: property list with an odd length" SYSTEM::TEXT)
      :WIDTH :HEIGHT :DEPTH 1. :LEFT-PAD "Not a BITMAP file" 24. 32. 16. 4.
      XLIB::CARD8 #\x
      #Y(XLIB::READ-BITMAP-FILE-PARSE-HEX
         #21Y(00 00 00 00 01 00 00 00 00 02 AD DA DB 38 02 31 B9 5C 5B 19 02)
         ((#\0 0.) (#\1 1.) (#\2 2.) (#\3 3.) (#\4 4.) (#\5 5.) (#\6 6.)
          (#\7 7.) (#\8 8.) (#\9 9.) (#\a 10.) (#\b 11.) (#\c 12.) (#\d 13.)
          (#\e 14.) (#\f 15.))
         #.#'COMMON-LISP::CHAR-EQUAL)
      :X-HOT :BITS-PER-PIXEL :DATA :PLIST :FORMAT :Z-PIXMAP :BYTES-PER-LINE
      :UNIT :PAD :BYTE-LSB-FIRST-P :BIT-LSB-FIRST-P XLIB::CREATE-IMAGE
      COMMON-LISP::CLOSE :ABORT))
#Y(#:|175| #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   XLIB::ENCODE-EVENT-MASK SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::ENCODE-EVENT-MASK
      #16Y(00 00 00 00 01 00 00 00 00 02 99 00 9F 9B 00 02)
      XLIB::MAKE-EVENT-MASK))
#Y(#:|176| #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   XLIB::DEFAULT-ERROR-HANDLER SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(XLIB::DEFAULT-ERROR-HANDLER
      #71Y(00 00 00 00 02 00 00 00 80 1D 07 00 00 00 3D 07 3D 06 3D 05 3D 04 3D
           03 3D 02 3D 01 E1 E2 B6 B8 B6 B6 B6 BA 92 0B 0F 92 09 11 93 0A 13 63
           E6 A9 14 2D 03 0A 1B 0B 63 E3 AA 1B 75 63 E5 A8 1B 70 D2 14 2D 09 0E
           19 0A)
      :CURRENT-SEQUENCE :SEQUENCE :MAJOR :MINOR :RESOURCE-ID :ATOM-ID :VALUE
      "Just ignore this error and proceed."
      "Asynchronous ~A on display ~S, sequence ~D.~%Opcode is ~D.~D. Current sequence is ~D. ~A"
      #Y(XLIB::DEFAULT-ERROR-HANDLER-1
         #34Y(00 00 00 00 02 00 00 00 01 18 DA B0 38 02 31 88 AF 01 02 DB DC 01
              02 B5 2D 08 03 DE B0 31 87 9E 19 04)
         "Resource ID is #x" 8. #\0 SYSTEM::DO-FORMAT-HEXADECIMAL #\.)
      COMMON-LISP::FORMAT
      #Y(XLIB::DEFAULT-ERROR-HANDLER-2
         #26Y(00 00 00 00 02 00 00 00 01 18 DA B0 38 02 31 88 AF 01 06 B5 2D 08
              01 9E 19 04)
         "Bad value is " SYSTEM::DO-FORMAT-DECIMAL)
      #Y(XLIB::DEFAULT-ERROR-HANDLER-3
         #34Y(00 00 00 00 02 00 00 00 01 18 DA B0 38 02 31 88 AF 01 02 DB DC 01
              02 B5 2D 08 03 DE B0 31 87 9E 19 04)
         "Bad atom ID is #x" 8. #\0 SYSTEM::DO-FORMAT-HEXADECIMAL #\.)
      "" COMMON-LISP::CERROR))
