mcclim on sbcl-0.9.9-darwin-ppc - Details

Started at:2006-04-16 01:15:32
Ended at:2006-04-16 01:21:33
Elapsed time (seconds):361
Error:Timeout Error (360)
Most recent change:2006-03-26 15:06:01
Most recent file:/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/mcclim-0.9.2/ReleaseNotes/0-9-2-laetare-sunday

REPL Output

;;; ASDF-INSTALL: Downloading 2215950 bytes from http://common-lisp.net/project/mcclim/downloads/mcclim-0.9.2.tar.gz to /Users/gwking/temporary/asdf-test/MCCLIM.asdf-install-tmp ...

;;; ASDF-INSTALL: Installing /Users/gwking/temporary/asdf-test/MCCLIM.asdf-install-tmp in /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/, /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site-systems/
mcclim-0.9.2/
mcclim-0.9.2/Doc/
mcclim-0.9.2/Doc/manual.tex
mcclim-0.9.2/Doc/Makefile
mcclim-0.9.2/Doc/ex1.lisp
mcclim-0.9.2/Doc/Guided-Tour/
mcclim-0.9.2/Doc/Guided-Tour/Makefile
mcclim-0.9.2/Doc/Guided-Tour/file-browser.lisp
mcclim-0.9.2/Doc/Guided-Tour/simple-draw.lisp
mcclim-0.9.2/Doc/Guided-Tour/hello-world.lisp
mcclim-0.9.2/Doc/Guided-Tour/guided-tour.bib
mcclim-0.9.2/Doc/Guided-Tour/guided-tour.tex
mcclim-0.9.2/Doc/Guided-Tour/techno-dep.fig
mcclim-0.9.2/Doc/Guided-Tour/simple-spreadsheet.lisp
mcclim-0.9.2/Doc/Guided-Tour/draw-frame.lisp
mcclim-0.9.2/Doc/Guided-Tour/scheduler.lisp
mcclim-0.9.2/Doc/Guided-Tour/COPYING
mcclim-0.9.2/Doc/Guided-Tour/color-editor.lisp
mcclim-0.9.2/Doc/ex2.lisp
mcclim-0.9.2/Doc/ex3.lisp
mcclim-0.9.2/Doc/ex2.eps
mcclim-0.9.2/Doc/ex2.fig
mcclim-0.9.2/Doc/native.fig
mcclim-0.9.2/Doc/inspect-object-1.eps
mcclim-0.9.2/Doc/inspect-object-2.eps
mcclim-0.9.2/Doc/inspect-object-3.eps
mcclim-0.9.2/Doc/inspect-as-cells.eps
mcclim-0.9.2/Doc/tex-dependencies
mcclim-0.9.2/Doc/strip-dependence
mcclim-0.9.2/Doc/spec-macros.tex
mcclim-0.9.2/Doc/ex2b.lisp
mcclim-0.9.2/Doc/ex2c.lisp
mcclim-0.9.2/presentation-defs.lisp
mcclim-0.9.2/Apps/
mcclim-0.9.2/Apps/Scigraph/
mcclim-0.9.2/Apps/Scigraph/dwim/
mcclim-0.9.2/Apps/Scigraph/dwim/present.lisp
mcclim-0.9.2/Apps/Scigraph/dwim/wholine.lisp
mcclim-0.9.2/Apps/Scigraph/dwim/feature-case.lisp
mcclim-0.9.2/Apps/Scigraph/dwim/export.lisp
mcclim-0.9.2/Apps/Scigraph/dwim/macros.lisp
mcclim-0.9.2/Apps/Scigraph/dwim/tv.lisp
mcclim-0.9.2/Apps/Scigraph/dwim/extensions.lisp
mcclim-0.9.2/Apps/Scigraph/dwim/load-dwim.lisp
mcclim-0.9.2/Apps/Scigraph/dwim/dwim-system.lisp
mcclim-0.9.2/Apps/Scigraph/dwim/package.lisp
mcclim-0.9.2/Apps/Scigraph/dwim/draw.lisp
mcclim-0.9.2/Apps/Scigraph/README
mcclim-0.9.2/Apps/Scigraph/scigraph/
mcclim-0.9.2/Apps/Scigraph/scigraph/demo-frame.lisp
mcclim-0.9.2/Apps/Scigraph/scigraph/annotations.lisp
mcclim-0.9.2/Apps/Scigraph/scigraph/present.lisp
mcclim-0.9.2/Apps/Scigraph/scigraph/frame.lisp
mcclim-0.9.2/Apps/Scigraph/scigraph/graph-mixins.lisp
mcclim-0.9.2/Apps/Scigraph/scigraph/scigraph-system.lisp
mcclim-0.9.2/Apps/Scigraph/scigraph/duplicate.lisp
mcclim-0.9.2/Apps/Scigraph/scigraph/basic-graph.lisp
mcclim-0.9.2/Apps/Scigraph/scigraph/load-scigraph.lisp
mcclim-0.9.2/Apps/Scigraph/scigraph/popup-accept-methods.lisp
mcclim-0.9.2/Apps/Scigraph/scigraph/dump.lisp
mcclim-0.9.2/Apps/Scigraph/scigraph/export.lisp
mcclim-0.9.2/Apps/Scigraph/scigraph/moving-object.lisp
mcclim-0.9.2/Apps/Scigraph/scigraph/graph-classes.lisp
mcclim-0.9.2/Apps/Scigraph/scigraph/popup-accept.lisp
mcclim-0.9.2/Apps/Scigraph/scigraph/color.lisp
mcclim-0.9.2/Apps/Scigraph/scigraph/annotated-graph.lisp
mcclim-0.9.2/Apps/Scigraph/scigraph/basic-classes.lisp
mcclim-0.9.2/Apps/Scigraph/scigraph/copy.lisp
mcclim-0.9.2/Apps/Scigraph/scigraph/random.lisp
mcclim-0.9.2/Apps/Scigraph/scigraph/symbol.lisp
mcclim-0.9.2/Apps/Scigraph/scigraph/legend.lisp
mcclim-0.9.2/Apps/Scigraph/scigraph/contour.lisp
mcclim-0.9.2/Apps/Scigraph/scigraph/graph-data.lisp
mcclim-0.9.2/Apps/Scigraph/scigraph/axis.lisp
mcclim-0.9.2/Apps/Scigraph/scigraph/package.lisp
mcclim-0.9.2/Apps/Scigraph/scigraph/draw.lisp
mcclim-0.9.2/Apps/Scigraph/scigraph/duplicate-methods.lisp
mcclim-0.9.2/Apps/Scigraph/scigraph/equation.lisp
mcclim-0.9.2/Apps/Scigraph/scigraph/mouse.lisp
mcclim-0.9.2/Apps/Scigraph/scigraph/menu-tools.lisp
mcclim-0.9.2/Apps/Debugger/
mcclim-0.9.2/Apps/Debugger/clim-debugger.lisp
mcclim-0.9.2/Apps/Functional-Geometry/
mcclim-0.9.2/Apps/Functional-Geometry/functional-geometry.asd
mcclim-0.9.2/Apps/Functional-Geometry/package.lisp
mcclim-0.9.2/Apps/Functional-Geometry/geometry.lisp
mcclim-0.9.2/Apps/Inspector/
mcclim-0.9.2/Apps/Inspector/disassembly.lisp
mcclim-0.9.2/Apps/Inspector/inspector.lisp
mcclim-0.9.2/Apps/Inspector/clouseau.asd
mcclim-0.9.2/Apps/Inspector/INSTALL
mcclim-0.9.2/Apps/Inspector/test.lisp
mcclim-0.9.2/Apps/Inspector/package.lisp
mcclim-0.9.2/Apps/Listener/
mcclim-0.9.2/Apps/Listener/TODO
mcclim-0.9.2/Apps/Listener/icons/
mcclim-0.9.2/Apps/Listener/icons/video.xpm
mcclim-0.9.2/Apps/Listener/icons/simple-object.xpm
mcclim-0.9.2/Apps/Listener/icons/c.xpm
mcclim-0.9.2/Apps/Listener/icons/h.xpm
mcclim-0.9.2/Apps/Listener/icons/document.xpm
mcclim-0.9.2/Apps/Listener/icons/audio.xpm
mcclim-0.9.2/Apps/Listener/icons/text.xpm
mcclim-0.9.2/Apps/Listener/icons/object.xpm
mcclim-0.9.2/Apps/Listener/icons/lambda.xpm
mcclim-0.9.2/Apps/Listener/icons/design.xpm
mcclim-0.9.2/Apps/Listener/icons/deadobject.xpm
mcclim-0.9.2/Apps/Listener/icons/image.xpm
mcclim-0.9.2/Apps/Listener/icons/wild.xpm
mcclim-0.9.2/Apps/Listener/icons/folder.xpm
mcclim-0.9.2/Apps/Listener/icons/pyramid.xpm
mcclim-0.9.2/Apps/Listener/icons/script.xpm
mcclim-0.9.2/Apps/Listener/icons/up-folder.xpm
mcclim-0.9.2/Apps/Listener/icons/invalid.xpm
mcclim-0.9.2/Apps/Listener/README
mcclim-0.9.2/Apps/Listener/file-types.lisp
mcclim-0.9.2/Apps/Listener/listener.lisp
mcclim-0.9.2/Apps/Listener/dev-commands.lisp
mcclim-0.9.2/Apps/Listener/hotfixes.lisp
mcclim-0.9.2/Apps/Listener/.cvsignore
mcclim-0.9.2/Apps/Listener/util.lisp
mcclim-0.9.2/Apps/Listener/icons.lisp
mcclim-0.9.2/Apps/Listener/package.lisp
mcclim-0.9.2/Apps/Listener/cmu-hacks.lisp
mcclim-0.9.2/TODO
mcclim-0.9.2/Spec/
mcclim-0.9.2/Spec/src/
mcclim-0.9.2/Spec/src/region-structure.epsi
mcclim-0.9.2/Spec/src/graph-example.epsi
mcclim-0.9.2/Spec/src/transforms.tex
mcclim-0.9.2/Spec/src/table-formatting.tex
mcclim-0.9.2/Spec/src/commands.tex
mcclim-0.9.2/Spec/src/extended-output.tex
mcclim-0.9.2/Spec/src/redisplay.tex
mcclim-0.9.2/Spec/src/output-recording.tex
mcclim-0.9.2/Spec/src/acknowledgments.tex
mcclim-0.9.2/Spec/src/rendering-conventions.lisp
mcclim-0.9.2/Spec/src/horizontal-lines.epsi
mcclim-0.9.2/Spec/src/menus.tex
mcclim-0.9.2/Spec/src/frames.tex
mcclim-0.9.2/Spec/src/line-joint-shapes.epsi
mcclim-0.9.2/Spec/src/region-composition.epsi
mcclim-0.9.2/Spec/src/silica.tex
mcclim-0.9.2/Spec/src/clim-partial.tex
mcclim-0.9.2/Spec/src/line-cap-shapes.epsi
mcclim-0.9.2/Spec/src/input-editing.tex
mcclim-0.9.2/Spec/src/overview.tex
mcclim-0.9.2/Spec/src/drawing-options.tex
mcclim-0.9.2/Spec/src/panes.tex
mcclim-0.9.2/Spec/src/partial.tex
mcclim-0.9.2/Spec/src/clim-sys.tex
mcclim-0.9.2/Spec/src/bounding-box.epsi
mcclim-0.9.2/Spec/src/extended-input.tex
mcclim-0.9.2/Spec/src/designs.tex
mcclim-0.9.2/Spec/src/glossary.tex
mcclim-0.9.2/Spec/src/inscribed-circle.epsi
mcclim-0.9.2/Spec/src/foo.tex
mcclim-0.9.2/Spec/src/graph-formatting.tex
mcclim-0.9.2/Spec/src/thin-lines.epsi
mcclim-0.9.2/Spec/src/region-normalization.epsi
mcclim-0.9.2/Spec/src/text-formatting.tex
mcclim-0.9.2/Spec/src/presentation-types.tex
mcclim-0.9.2/Spec/src/gadgets.tex
mcclim-0.9.2/Spec/src/corner-circle.epsi
mcclim-0.9.2/Spec/src/border-example.epsi
mcclim-0.9.2/Spec/src/psfig+.tex
mcclim-0.9.2/Spec/src/clim-spec.lisp
mcclim-0.9.2/Spec/src/colors.tex
mcclim-0.9.2/Spec/src/pane-types.tex
mcclim-0.9.2/Spec/src/design-classes.epsi
mcclim-0.9.2/Spec/src/design-classes.lisp
mcclim-0.9.2/Spec/src/extensions.tex
mcclim-0.9.2/Spec/src/table-example.epsi
mcclim-0.9.2/Spec/src/text-styles.tex
mcclim-0.9.2/Spec/src/graphics.tex
mcclim-0.9.2/Spec/src/bordered-output.tex
mcclim-0.9.2/Spec/src/correct-circle.epsi
mcclim-0.9.2/Spec/src/regions.tex
mcclim-0.9.2/Spec/src/thick-lines.epsi
mcclim-0.9.2/Spec/src/conventions.tex
mcclim-0.9.2/Spec/src/spec-macros.tex
mcclim-0.9.2/Spec/src/encapsulating-streams.tex
mcclim-0.9.2/Spec/src/gray-streams.tex
mcclim-0.9.2/Spec/src/two-triangles.epsi
mcclim-0.9.2/Spec/src/formatted-output-examples.lisp
mcclim-0.9.2/Spec/src/different-ellipses.epsi
mcclim-0.9.2/Spec/src/bboxes.tex
mcclim-0.9.2/Spec/src/dialogs.tex
mcclim-0.9.2/Spec/src/clim.tex
mcclim-0.9.2/Spec/src/changes.tex
mcclim-0.9.2/stream-input.lisp
mcclim-0.9.2/stream-output.lisp
mcclim-0.9.2/menu.lisp
mcclim-0.9.2/clim1-compat.lisp
mcclim-0.9.2/Goatee/
mcclim-0.9.2/Goatee/conditions.lisp
mcclim-0.9.2/Goatee/goatee-test.lisp
mcclim-0.9.2/Goatee/editable-area.lisp
mcclim-0.9.2/Goatee/goatee-command.lisp
mcclim-0.9.2/Goatee/editable-buffer.lisp
mcclim-0.9.2/Goatee/presentation-history.lisp
mcclim-0.9.2/Goatee/buffer.lisp
mcclim-0.9.2/Goatee/clim-area.lisp
mcclim-0.9.2/Goatee/flexivector.lisp
mcclim-0.9.2/Goatee/dbl-list.lisp
mcclim-0.9.2/Goatee/.cvsignore
mcclim-0.9.2/Goatee/editing-stream.lisp
mcclim-0.9.2/Goatee/kill-ring.lisp
mcclim-0.9.2/Looks/
mcclim-0.9.2/Looks/pixie.lisp
mcclim-0.9.2/Looks/.cvsignore
mcclim-0.9.2/Images/
mcclim-0.9.2/Images/green-apple-mask.ppm
mcclim-0.9.2/Images/green-apple.ppm
mcclim-0.9.2/Tests/
mcclim-0.9.2/Tests/postscript.lisp
mcclim-0.9.2/Tests/bounding-rectangles.lisp
mcclim-0.9.2/Tests/regions.lisp
mcclim-0.9.2/Tests/commands.lisp
mcclim-0.9.2/Tests/transformations.lisp
mcclim-0.9.2/Tools/
mcclim-0.9.2/Tools/apd/
mcclim-0.9.2/Tools/apd/undefined-symbols.lisp
mcclim-0.9.2/Tools/Emacs/
mcclim-0.9.2/Tools/Emacs/indent-clim.el
mcclim-0.9.2/Tools/Emacs/hyperclim.el
mcclim-0.9.2/Tools/gilbert/
mcclim-0.9.2/Tools/gilbert/clim-doc-convert.lisp
mcclim-0.9.2/Tools/unimplemented.lisp
mcclim-0.9.2/setf-star.lisp
mcclim-0.9.2/text-selection.lisp
mcclim-0.9.2/Webpage/
mcclim-0.9.2/Webpage/McCLIM-3.png
mcclim-0.9.2/Webpage/downloads/
mcclim-0.9.2/Webpage/downloads/index.html
mcclim-0.9.2/Webpage/index.html
mcclim-0.9.2/Webpage/mcclim.css
mcclim-0.9.2/Webpage/images/
mcclim-0.9.2/Webpage/images/addressbook-small.jpg
mcclim-0.9.2/Webpage/images/addressbook.jpg
mcclim-0.9.2/Webpage/images/index.html
mcclim-0.9.2/Webpage/images/calc.jpg
mcclim-0.9.2/Webpage/images/listener1-small.jpg
mcclim-0.9.2/Webpage/images/colorslider.jpg
mcclim-0.9.2/Webpage/images/bach262-small.jpg
mcclim-0.9.2/Webpage/images/bach262.jpg
mcclim-0.9.2/Webpage/images/listener1.jpg
mcclim-0.9.2/Webpage/images/colorslider-small.jpg
mcclim-0.9.2/Webpage/License
mcclim-0.9.2/Webpage/clim-paper.pdf
mcclim-0.9.2/menu-choose.lisp
mcclim-0.9.2/Experimental/
mcclim-0.9.2/Experimental/png.lisp
mcclim-0.9.2/Experimental/unzip/
mcclim-0.9.2/Experimental/unzip/binary-io.lisp
mcclim-0.9.2/Experimental/unzip/interface.lisp
mcclim-0.9.2/Experimental/unzip/inflate.lisp
mcclim-0.9.2/Experimental/unzip/octet-streams.lisp
mcclim-0.9.2/Experimental/unzip/unzip.system
mcclim-0.9.2/Experimental/unzip/package.lisp
mcclim-0.9.2/Experimental/menu-choose.lisp
mcclim-0.9.2/Experimental/xpm.lisp
mcclim-0.9.2/Experimental/pointer-doc-hack.lisp
mcclim-0.9.2/Experimental/freetype/
mcclim-0.9.2/Experimental/freetype/mcclim-freetype.asd
mcclim-0.9.2/Experimental/freetype/freetype-ffi.lisp
mcclim-0.9.2/Experimental/freetype/freetype-package.lisp
mcclim-0.9.2/Experimental/freetype/freetype-fonts.lisp
mcclim-0.9.2/Experimental/freetype/mcclim-freetype.system
mcclim-0.9.2/Experimental/pprint/
mcclim-0.9.2/Experimental/pprint/sbcl-0.8alpha.0.patch
mcclim-0.9.2/Experimental/pprint/pprint.lisp
mcclim-0.9.2/Experimental/pixel-format.lisp
mcclim-0.9.2/Experimental/.cvsignore
mcclim-0.9.2/system-opengl.lisp
mcclim-0.9.2/graphics.lisp
mcclim-0.9.2/README
mcclim-0.9.2/ReleaseNotes/
mcclim-0.9.2/ReleaseNotes/0-9-2-laetare-sunday
mcclim-0.9.2/ReleaseNotes/0-9-armistice
mcclim-0.9.2/ReleaseNotes/0-9-1-mothering-sunday
mcclim-0.9.2/transforms.lisp
mcclim-0.9.2/graph-formatting.lisp
mcclim-0.9.2/incremental-redisplay.lisp
mcclim-0.9.2/defresource.lisp
mcclim-0.9.2/bordered-output.lisp
mcclim-0.9.2/events.lisp
mcclim-0.9.2/pointer-tracking.lisp
mcclim-0.9.2/input-editing.lisp
mcclim-0.9.2/ports.lisp
mcclim-0.9.2/text-formatting.lisp
mcclim-0.9.2/decls.lisp
mcclim-0.9.2/design.lisp
mcclim-0.9.2/dialog-views.lisp
mcclim-0.9.2/mcclim.asd
mcclim-0.9.2/Backends/
mcclim-0.9.2/Backends/CLX/
mcclim-0.9.2/Backends/CLX/image.lisp
mcclim-0.9.2/Backends/CLX/frame-manager.lisp
mcclim-0.9.2/Backends/CLX/medium.lisp
mcclim-0.9.2/Backends/CLX/port.lisp
mcclim-0.9.2/Backends/CLX/graft.lisp
mcclim-0.9.2/Backends/CLX/keysyms.lisp
mcclim-0.9.2/Backends/CLX/clim-extensions.lisp
mcclim-0.9.2/Backends/CLX/keysyms-common.lisp
mcclim-0.9.2/Backends/CLX/system.lisp
mcclim-0.9.2/Backends/CLX/.cvsignore
mcclim-0.9.2/Backends/CLX/package.lisp
mcclim-0.9.2/Backends/CLX/keysymdef.lisp
mcclim-0.9.2/Backends/Null/
mcclim-0.9.2/Backends/Null/frame-manager.lisp
mcclim-0.9.2/Backends/Null/medium.lisp
mcclim-0.9.2/Backends/Null/port.lisp
mcclim-0.9.2/Backends/Null/graft.lisp
mcclim-0.9.2/Backends/Null/package.lisp
mcclim-0.9.2/Backends/OpenGL/
mcclim-0.9.2/Backends/OpenGL/opengl-medium.lisp
mcclim-0.9.2/Backends/OpenGL/opengl-frame-manager.lisp
mcclim-0.9.2/Backends/OpenGL/opengl-x-frame-manager.lisp
mcclim-0.9.2/Backends/OpenGL/README
mcclim-0.9.2/Backends/OpenGL/opengl-x-port-before.lisp
mcclim-0.9.2/Backends/OpenGL/opengl-port.lisp
mcclim-0.9.2/Backends/OpenGL/system.lisp
mcclim-0.9.2/Backends/OpenGL/opengl-x-port-after.lisp
mcclim-0.9.2/Backends/OpenGL/opengl-x-graft.lisp
mcclim-0.9.2/Backends/beagle/
mcclim-0.9.2/Backends/beagle/windowing/
mcclim-0.9.2/Backends/beagle/windowing/mirror.lisp
mcclim-0.9.2/Backends/beagle/windowing/frame-manager.lisp
mcclim-0.9.2/Backends/beagle/windowing/port.lisp
mcclim-0.9.2/Backends/beagle/windowing/graft.lisp
mcclim-0.9.2/Backends/beagle/windowing/.cvsignore
mcclim-0.9.2/Backends/beagle/native-panes/
mcclim-0.9.2/Backends/beagle/native-panes/beagle-scroll-bar-pane.lisp
mcclim-0.9.2/Backends/beagle/native-panes/scroller-pane-fix.lisp
mcclim-0.9.2/Backends/beagle/native-panes/beagle-slider-pane.lisp
mcclim-0.9.2/Backends/beagle/native-panes/.cvsignore
mcclim-0.9.2/Backends/beagle/native-panes/beagle-fundamental-button-pane.lisp
mcclim-0.9.2/Backends/beagle/input/
mcclim-0.9.2/Backends/beagle/input/events.lisp
mcclim-0.9.2/Backends/beagle/input/.cvsignore
mcclim-0.9.2/Backends/beagle/input/keysymdef.lisp
mcclim-0.9.2/Backends/beagle/tests/
mcclim-0.9.2/Backends/beagle/tests/graft-tests.lisp
mcclim-0.9.2/Backends/beagle/tests/drawing-tests.lisp
mcclim-0.9.2/Backends/beagle/tests/hello.lisp
mcclim-0.9.2/Backends/beagle/tests/.cvsignore
mcclim-0.9.2/Backends/beagle/load-clx.lisp
mcclim-0.9.2/Backends/beagle/beagle-backend.asd
mcclim-0.9.2/Backends/beagle/load-clim.lisp
mcclim-0.9.2/Backends/beagle/glimpse/
mcclim-0.9.2/Backends/beagle/glimpse/glimpse-present-process.lisp
mcclim-0.9.2/Backends/beagle/glimpse/glimpse.lisp
mcclim-0.9.2/Backends/beagle/glimpse/glimpse-present-window.lisp
mcclim-0.9.2/Backends/beagle/glimpse/glimpse-modeless-commands.lisp
mcclim-0.9.2/Backends/beagle/glimpse/README
mcclim-0.9.2/Backends/beagle/glimpse/glimpse-process-commands.lisp
mcclim-0.9.2/Backends/beagle/glimpse/glimpse-support.lisp
mcclim-0.9.2/Backends/beagle/glimpse/glimpse-window-commands.lisp
mcclim-0.9.2/Backends/beagle/glimpse/glimpse-command-tables.lisp
mcclim-0.9.2/Backends/beagle/glimpse/.cvsignore
mcclim-0.9.2/Backends/beagle/native/
mcclim-0.9.2/Backends/beagle/native/lisp-slider.lisp
mcclim-0.9.2/Backends/beagle/native/lisp-view-additional.lisp
mcclim-0.9.2/Backends/beagle/native/lisp-image.lisp
mcclim-0.9.2/Backends/beagle/native/lisp-scroller.lisp
mcclim-0.9.2/Backends/beagle/native/lisp-bezier-path.lisp
mcclim-0.9.2/Backends/beagle/native/lisp-button.lisp
mcclim-0.9.2/Backends/beagle/native/lisp-window.lisp
mcclim-0.9.2/Backends/beagle/native/lisp-window-delegate.lisp
mcclim-0.9.2/Backends/beagle/native/.cvsignore
mcclim-0.9.2/Backends/beagle/native/lisp-view.lisp
mcclim-0.9.2/Backends/beagle/README.txt
mcclim-0.9.2/Backends/beagle/output/
mcclim-0.9.2/Backends/beagle/output/fonts.lisp
mcclim-0.9.2/Backends/beagle/output/medium.lisp
mcclim-0.9.2/Backends/beagle/output/.cvsignore
mcclim-0.9.2/Backends/beagle/cocoa-util.lisp
mcclim-0.9.2/Backends/beagle/.cvsignore
mcclim-0.9.2/Backends/beagle/package.lisp
mcclim-0.9.2/Backends/beagle/profile/
mcclim-0.9.2/Backends/beagle/profile/README
mcclim-0.9.2/Backends/beagle/profile/.cvsignore
mcclim-0.9.2/Backends/beagle/profile/profile.lisp
mcclim-0.9.2/Backends/beagle/load-beagle.lisp
mcclim-0.9.2/Backends/PostScript/
mcclim-0.9.2/Backends/PostScript/font.lisp
mcclim-0.9.2/Backends/PostScript/sheet.lisp
mcclim-0.9.2/Backends/PostScript/standard-metrics.lisp
mcclim-0.9.2/Backends/PostScript/encoding.lisp
mcclim-0.9.2/Backends/PostScript/generate-metrics.lisp
mcclim-0.9.2/Backends/PostScript/graphics.lisp
mcclim-0.9.2/Backends/PostScript/.cvsignore
mcclim-0.9.2/Backends/PostScript/afm.lisp
mcclim-0.9.2/Backends/PostScript/class.lisp
mcclim-0.9.2/Backends/PostScript/package.lisp
mcclim-0.9.2/Backends/PostScript/paper.lisp
mcclim-0.9.2/encapsulate.lisp
mcclim-0.9.2/medium.lisp
mcclim-0.9.2/Copyright
mcclim-0.9.2/coordinates.lisp
mcclim-0.9.2/table-formatting.lisp
mcclim-0.9.2/pixmap.lisp
mcclim-0.9.2/debian/
mcclim-0.9.2/debian/control
mcclim-0.9.2/debian/prerm
mcclim-0.9.2/debian/rules
mcclim-0.9.2/debian/changelog
mcclim-0.9.2/debian/postinst
mcclim-0.9.2/debian/copyright
mcclim-0.9.2/output.lisp
mcclim-0.9.2/Examples/
mcclim-0.9.2/Examples/presentation-test.lisp
mcclim-0.9.2/Examples/clim-fig.lisp
mcclim-0.9.2/Examples/dragndrop.lisp
mcclim-0.9.2/Examples/gadget-test-kr.lisp
mcclim-0.9.2/Examples/colorslider.lisp
mcclim-0.9.2/Examples/method-browser.lisp
mcclim-0.9.2/Examples/dragndrop-translator.lisp
mcclim-0.9.2/Examples/calculator.lisp
mcclim-0.9.2/Examples/stream-test.lisp
mcclim-0.9.2/Examples/sliderdemo.lisp
mcclim-0.9.2/Examples/menutest.lisp
mcclim-0.9.2/Examples/stopwatch.lisp
mcclim-0.9.2/Examples/accepting-values.lisp
mcclim-0.9.2/Examples/postscript-test.lisp
mcclim-0.9.2/Examples/demodemo.lisp
mcclim-0.9.2/Examples/traffic-lights.lisp
mcclim-0.9.2/Examples/town-example.lisp
mcclim-0.9.2/Examples/address-book.lisp
mcclim-0.9.2/Examples/fire.lisp
mcclim-0.9.2/Examples/transformations-test.lisp
mcclim-0.9.2/Examples/.cvsignore
mcclim-0.9.2/Examples/gadget-test.lisp
mcclim-0.9.2/Examples/puzzle.lisp
mcclim-0.9.2/regions.lisp
mcclim-0.9.2/sheets.lisp
mcclim-0.9.2/commands.lisp
mcclim-0.9.2/protocol-classes.lisp
mcclim-0.9.2/Extensions/
mcclim-0.9.2/Extensions/conditional-commands/
mcclim-0.9.2/Extensions/conditional-commands/README
mcclim-0.9.2/Extensions/conditional-commands/creating-assoc.lisp
mcclim-0.9.2/Extensions/conditional-commands/entity-enabledness-handling.lisp
mcclim-0.9.2/Extensions/conditional-commands/conditional-commands.asd
mcclim-0.9.2/Extensions/conditional-commands/conditional-commands-example.lisp
mcclim-0.9.2/Extensions/conditional-commands/command-and-command-table-utilities.lisp
mcclim-0.9.2/Extensions/conditional-commands/package.lisp
mcclim-0.9.2/recording.lisp
mcclim-0.9.2/system.lisp
mcclim-0.9.2/panes.lisp
mcclim-0.9.2/grafts.lisp
mcclim-0.9.2/Lisp-Dep/
mcclim-0.9.2/Lisp-Dep/mp-scl.lisp
mcclim-0.9.2/Lisp-Dep/mp-sbcl.lisp
mcclim-0.9.2/Lisp-Dep/mp-acl.lisp
mcclim-0.9.2/Lisp-Dep/fix-cmu.lisp
mcclim-0.9.2/Lisp-Dep/fix-clisp.lisp
mcclim-0.9.2/Lisp-Dep/fix-sbcl.lisp
mcclim-0.9.2/Lisp-Dep/fix-openmcl.lisp
mcclim-0.9.2/Lisp-Dep/fix-scl.lisp
mcclim-0.9.2/Lisp-Dep/mp-lw.lisp
mcclim-0.9.2/Lisp-Dep/fix-acl.lisp
mcclim-0.9.2/Lisp-Dep/fix-lispworks.lisp
mcclim-0.9.2/Lisp-Dep/foreign-openmcl.lisp
mcclim-0.9.2/Lisp-Dep/mp-openmcl.lisp
mcclim-0.9.2/Lisp-Dep/mp-nil.lisp
mcclim-0.9.2/Lisp-Dep/.cvsignore
mcclim-0.9.2/Lisp-Dep/mp-cmu.lisp
mcclim-0.9.2/repaint.lisp
mcclim-0.9.2/X11-colors.lisp
mcclim-0.9.2/INSTALL
mcclim-0.9.2/describe.lisp
mcclim-0.9.2/builtin-commands.lisp
mcclim-0.9.2/blank.lisp
mcclim-0.9.2/test.lisp
mcclim-0.9.2/utils.lisp
mcclim-0.9.2/presentations.lisp
mcclim-0.9.2/.cvsignore
mcclim-0.9.2/dialog.lisp
mcclim-0.9.2/input.lisp
mcclim-0.9.2/gadgets.lisp
mcclim-0.9.2/package.lisp
mcclim-0.9.2/patch.lisp
mcclim-0.9.2/views.lisp
mcclim-0.9.2/frames.lisp

#P"/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/mcclim-0.9.2/" 
#P"/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/mcclim-0.9.2/" ;;; ASDF-INSTALL: Downloading package SPATIAL-TREES, required by clim-core

;;; ASDF-INSTALL: Downloading 15635 bytes from http://ftp.linux.org.uk/pub/lisp/cclan/spatial-trees.tar.gz to /Users/gwking/temporary/asdf-test/spatial-trees.asdf-install-tmp ...

;;; ASDF-INSTALL: Installing /Users/gwking/temporary/asdf-test/spatial-trees.asdf-install-tmp in /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/, /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site-systems/
spatial-trees-0.1/
spatial-trees-0.1/spatial-trees.asd
spatial-trees-0.1/rstar-trees.lisp
spatial-trees-0.1/basedefs.lisp
spatial-trees-0.1/rplus-trees.lisp
spatial-trees-0.1/r-trees.lisp
spatial-trees-0.1/TODO
spatial-trees-0.1/greene-trees.lisp
spatial-trees-0.1/x-trees.lisp
spatial-trees-0.1/rectangles.lisp
spatial-trees-0.1/package.lisp
spatial-trees-0.1/LICENCE
spatial-trees-0.1/spatial-tree-viz.lisp
spatial-trees-0.1/spatial-tree-test.lisp

#P"/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/spatial-trees-0.1/" 
#P"/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/spatial-trees-0.1/" 
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/spatial-trees-0.1/package.lisp" (written 30 NOV 2004 11:26:17 AM):
; compiling (DEFPACKAGE "SPATIAL-TREES" ...)
; compiling (DEFPACKAGE "SPATIAL-TREES-PROTOCOL" ...)
; compiling (DEFPACKAGE "RECTANGLES" ...)
; compiling (DEFPACKAGE "SPATIAL-TREES-IMPL" ...)

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/spatial-trees-0.1/package.fasl written
; compilation finished in 0:00:00
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/spatial-trees-0.1/basedefs.lisp" (written 30 NOV 2004 07:57:41 AM):
; compiling (IN-PACKAGE "SPATIAL-TREES-IMPL")
; compiling (DEFCLASS SPATIAL-TREE ...)
; compiling (DEFMETHOD PRINT-OBJECT ...)
; compiling (DEFCLASS SPATIAL-TREE-NODE ...)
; compiling (DEFMETHOD PRINT-OBJECT ...)
; compiling (DEFCLASS SPATIAL-TREE-LEAF-NODE ...)
; compiling (DEFINE-CONDITION INTERNAL-ERROR ...)
; compiling (DEFMACRO CHECK ...)
; compiling (DEFINE-CONDITION PROTOCOL-ERROR ...)
; compiling (DEFMACRO DEFINE-PROTOCOL-FUNCTION ...)
; compiling (DEFINE-PROTOCOL-FUNCTION SEARCH ...)
; compiling (DEFINE-PROTOCOL-FUNCTION INSERT ...)
; compiling (DEFINE-PROTOCOL-FUNCTION DELETE ...)
; compiling (DEFINE-PROTOCOL-FUNCTION CHOOSE-LEAF ...)
; compiling (DEFINE-PROTOCOL-FUNCTION SPLIT-NODE ...)
; compiling (DEFGENERIC MAKE-SPATIAL-TREE ...)
; compiling (DEFGENERIC CHECK-CONSISTENCY ...)

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/spatial-trees-0.1/basedefs.fasl written
; compilation finished in 0:00:02
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/spatial-trees-0.1/rectangles.lisp" (written 24 NOV 2004 07:36:58 AM):
; compiling (IN-PACKAGE "SPATIAL-TREES-IMPL")
; compiling (DEFUN BOUND= ...)
; compiling (DEFUN BOUND< ...)
; compiling (DEFUN BOUND<= ...)
; compiling (DEFUN BOUNDMAX ...)
; compiling (DEFUN BOUNDMIN ...)
; compiling (DEFSTRUCT (RECTANGLE # ...) ...)
; compiling (DEFUN MAKE-RECTANGLE ...)
; compiling (DEFMETHOD PRINT-OBJECT ...)
; compiling (DEFINE-CONDITION RECTANGLE-INFINITE ...)
; compiling (DEFUN %INTERSECTION/1D ...)
; compiling (DEFGENERIC INTERSECTP ...)
; compiling (DEFMETHOD INTERSECTP ...)
; compiling (DEFGENERIC INTERSECTION ...)
; compiling (DEFMETHOD INTERSECTION ...)
; compiling (DEFGENERIC MINIMUM-BOUND ...)
; compiling (DEFMETHOD MINIMUM-BOUND ...)
; compiling (DEFGENERIC AREA ...)
; compiling (DEFMETHOD AREA ...)

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/spatial-trees-0.1/rectangles.fasl written
; compilation finished in 0:00:01
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/spatial-trees-0.1/r-trees.lisp" (written 30 NOV 2004 09:31:13 AM):
; compiling (IN-PACKAGE "SPATIAL-TREES-IMPL")
; compiling (DEFGENERIC MBR ...)
; compiling (DEFMETHOD MBR ...)
; compiling (DEFUN MINIMUM-BOUND-OF ...)
; compiling (DEFSTRUCT LEAF-NODE-ENTRY ...)
; compiling (DEFMETHOD MBR ...)
; compiling (DEFCLASS R-TREE ...)
; compiling (DEFMETHOD MAKE-SPATIAL-TREE ...)
; compiling (DEFMETHOD SEARCH ...)
; compiling (DEFMETHOD SEARCH ...)
; compiling (DEFMETHOD CHOOSE-LEAF ...)
; compiling (DEFMETHOD INSERT ...)
; compiling (DEFGENERIC ADJUST-TREE ...)
; compiling (DEFMETHOD ADJUST-TREE ...)
; compiling (DEFMETHOD DELETE ...)
; compiling (DEFUN FIND-LEAF ...)
; compiling (DEFUN CONDENSE-TREE ...)
; compiling (DEFUN D ...)
; compiling (DEFUN PICK-SEEDS ...)
; compiling (DEFUN PICK-NEXT ...)
; compiling (DEFUN MAKE-NODE-LIKE ...)
; compiling (DEFMETHOD SPLIT-NODE ...)

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/spatial-trees-0.1/r-trees.fasl written
; compilation finished in 0:00:03
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/spatial-trees-0.1/greene-trees.lisp" (written 23 NOV 2004 10:42:18 AM):
; compiling (IN-PACKAGE "SPATIAL-TREES-IMPL")
; compiling (DEFCLASS GREENE-TREE ...)
; compiling (DEFMETHOD MAKE-SPATIAL-TREE ...)
; compiling (DEFUN CHOOSE-AXIS ...)
; compiling (DEFUN DISTRIBUTE ...)
; compiling (DEFMETHOD SPLIT-NODE ...)

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/spatial-trees-0.1/greene-trees.fasl written
; compilation finished in 0:00:01
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/spatial-trees-0.1/rstar-trees.lisp" (written 23 NOV 2004 10:42:18 AM):
; compiling (IN-PACKAGE "SPATIAL-TREES-IMPL")
; compiling (DEFCLASS R*-TREE ...)
; compiling (DEFMETHOD INITIALIZE-INSTANCE ...)
; compiling (DEFMETHOD MAKE-SPATIAL-TREE ...)
; compiling (DEFUN OVERLAP ...)
; compiling (DEFUN HEIGHT ...)
; compiling (DEFUN CHOOSE-SUBTREE ...)
; compiling (DEFMETHOD CHOOSE-LEAF ...)
; compiling (DEFUN MARGIN ...)
; compiling (DEFUN CHOOSE-SPLIT-AXIS ...)
; compiling (DEFUN CHOOSE-SPLIT-INDEX ...)
; compiling (DEFMETHOD SPLIT-NODE ...)
; compiling (DEFVAR *DATA-RECTANGLE*)
; compiling (DEFVAR *OVERFLOWED-LEVELS* ...)
; compiling (DEFUN REINSERT ...)
; compiling (DEFUN OVERFLOW-TREATMENT ...)
; compiling (DEFUN %INSERT ...)
; compiling (DEFMETHOD INSERT ...)

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/spatial-trees-0.1/rstar-trees.fasl written
; compilation finished in 0:00:02
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/spatial-trees-0.1/rplus-trees.lisp" (written 30 NOV 2004 08:05:15 AM):
; compiling (IN-PACKAGE "SPATIAL-TREES-IMPL")
; compiling (DEFCLASS R+-TREE ...)
; compiling (DEFMETHOD MAKE-SPATIAL-TREE ...)
; compiling (DEFMETHOD MAKE-SPATIAL-TREE ...)
; compiling (DEFMETHOD INITIALIZE-INSTANCE ...)
; compiling (DEFMETHOD SEARCH ...)
; compiling (DEFMETHOD INSERT ...)
; compiling (DEFUN UNLINK-NODE ...)
; compiling (DEFMETHOD DELETE ...)
; compiling (DEFUN COST ...)
; compiling (DEFUN GENERATE-PARTITION-RECTANGLES ...)
; compiling (DEFUN SPLIT-NODE-BY ...)
; compiling (DEFMETHOD SPLIT-NODE ...)

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/spatial-trees-0.1/rplus-trees.fasl written
; compilation finished in 0:00:02
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/spatial-trees-0.1/x-trees.lisp" (written 30 NOV 2004 07:58:13 AM):
; compiling (IN-PACKAGE "SPATIAL-TREES-IMPL")
; compiling (DEFCLASS X-TREE ...)
; compiling (DEFMETHOD INITIALIZE-INSTANCE ...)
; compiling (DEFMETHOD MAKE-SPATIAL-TREE ...)
; compiling (DEFCLASS X-TREE-NODE ...)
; compiling (DEFCLASS X-TREE-SUPERNODE ...)
; compiling (DEFCLASS X-TREE-LEAF-SUPERNODE ...)
; compiling (DEFUN FIND-CONS-WITH-LEAF ...)
; compiling (DEFUN LEAVES-OF-SPLIT-TREE ...)
; compiling (DEFUN SPLIT-TREE-FROM-SET ...)
; compiling (DEFVAR *SPLIT*)
; compiling (DEFMETHOD ADJUST-TREE ...)
; compiling (DEFMETHOD INSERT ...)
; compiling (DEFMETHOD SPLIT-NODE ...)
; compiling (DEFMETHOD CHECK-CONSISTENCY ...)

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/spatial-trees-0.1/x-trees.fasl written
; compilation finished in 0:00:02
;;; ASDF-INSTALL: Downloading package CLX, required by clim-clx

;;; ASDF-INSTALL: Downloading 438168 bytes from http://ftp.linux.org.uk/pub/lisp/sbcl/clx_0.7.3.tar.gz to /Users/gwking/temporary/asdf-test/clx.asdf-install-tmp ...

;;; ASDF-INSTALL: Installing /Users/gwking/temporary/asdf-test/clx.asdf-install-tmp in /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/, /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site-systems/
clx_0.7.3/
clx_0.7.3/debug/
clx_0.7.3/debug/util.lisp
clx_0.7.3/debug/trace.lisp
clx_0.7.3/debug/debug.lisp
clx_0.7.3/debug/event-test.lisp
clx_0.7.3/debug/keytrans.lisp
clx_0.7.3/debug/describe.lisp
clx_0.7.3/demo/
clx_0.7.3/demo/beziertest.lisp
clx_0.7.3/demo/bezier.lisp
clx_0.7.3/demo/zoid.lisp
clx_0.7.3/demo/menu.lisp
clx_0.7.3/demo/hello.lisp
clx_0.7.3/demo/clx-demos.lisp
clx_0.7.3/demo/mandel.lisp
clx_0.7.3/demo/clclock.lisp
clx_0.7.3/demo/clipboard.lisp
clx_0.7.3/demo/gl-test.lisp
clx_0.7.3/test/
clx_0.7.3/test/trapezoid.lisp
clx_0.7.3/test/image.lisp
clx_0.7.3/sockcl.lisp
clx_0.7.3/CHANGES
clx_0.7.3/NEWS
clx_0.7.3/text.lisp
clx_0.7.3/generalock.lisp
clx_0.7.3/translate.lisp
clx_0.7.3/socket.c
clx_0.7.3/excldefsys.lisp
clx_0.7.3/resource.lisp
clx_0.7.3/requests.lisp
clx_0.7.3/provide.lisp
clx_0.7.3/package.lisp
clx_0.7.3/xrender.lisp
clx_0.7.3/manager.lisp
clx_0.7.3/keysyms.lisp
clx_0.7.3/input.lisp
clx_0.7.3/graphics.lisp
clx_0.7.3/excldep.lisp
clx_0.7.3/fonts.lisp
clx_0.7.3/exclMakefile
clx_0.7.3/excldep.c
clx_0.7.3/exclREADME
clx_0.7.3/manual/
clx_0.7.3/manual/clx.texinfo
clx_0.7.3/exclcmac.lisp
clx_0.7.3/display.lisp
clx_0.7.3/attributes.lisp
clx_0.7.3/cmudep.lisp
clx_0.7.3/bufmac.lisp
clx_0.7.3/buffer.lisp
clx_0.7.3/README
clx_0.7.3/clx-module.lisp
clx_0.7.3/defsystem.lisp
clx_0.7.3/macros.lisp
clx_0.7.3/dep-openmcl.lisp
clx_0.7.3/build-clx.lisp
clx_0.7.3/depdefs.lisp
clx_0.7.3/clx.lisp
clx_0.7.3/gcontext.lisp
clx_0.7.3/image.lisp
clx_0.7.3/dependent.lisp
clx_0.7.3/README-R5
clx_0.7.3/clx.asd
clx_0.7.3/shape.lisp
clx_0.7.3/xvidmode.lisp
clx_0.7.3/glx.lisp
clx_0.7.3/gl.lisp
clx_0.7.3/dpms.lisp
clx_0.7.3/dep-allegro.lisp

#P"/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/" 
#P"/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/" 
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/package.lisp" (written 14 JUL 2005 09:24:44 AM):
; compiling (IN-PACKAGE :COMMON-LISP-USER)
; compiling (DEFPACKAGE XLIB ...)

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/package.fasl written
; compilation finished in 0:00:01
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/depdefs.lisp" (written 27 MAR 2006 07:17:43 PM):
; compiling (IN-PACKAGE :XLIB)
; compiling (DECLAIM (DECLARATION CLX-VALUES))
; compiling (DECLAIM (DECLARATION ARGLIST))
; compiling (DECLAIM (DECLARATION INDENTATION))
; compiling (DEFMACRO WITH-VECTOR ...)
; compiling (DEFMACRO WITHIN-DEFINITION ...)
; compiling (DEFCONSTANT +CLX-CACHED-TYPES+ ...)
; compiling (DEFMACRO RESOURCE-ID-MAP-TEST ...)
; compiling (DEFMACRO ATOM-CACHE-MAP-TEST ...)
; compiling (DEFMACRO KEYSYM->CHARACTER-MAP-TEST ...)
; compiling (ECASE SB-C:*BACKEND-BYTE-ORDER* ...)
; compiling (DEFTYPE BUFFER-BYTES ...)
; compiling (DEFTYPE ARRAY-INDEX ...)
; compiling (DEFUN MAKE-INDEX-TYPED ...)
; compiling (DEFUN MAKE-INDEX-OP ...)
; compiling (DEFMACRO INDEX+ ...)
; compiling (DEFMACRO INDEX-LOGAND ...)
; compiling (DEFMACRO INDEX-LOGIOR ...)
; compiling (DEFMACRO INDEX- ...)
; compiling (DEFMACRO INDEX* ...)
; compiling (DEFMACRO INDEX1+ ...)
; compiling (DEFMACRO INDEX1- ...)
; compiling (DEFMACRO INDEX-INCF ...)
; compiling (DEFMACRO INDEX-DECF ...)
; compiling (DEFMACRO INDEX-MIN ...)
; compiling (DEFMACRO INDEX-MAX ...)
; compiling (DEFMACRO INDEX-FLOOR ...)
; compiling (DEFMACRO INDEX-CEILING ...)
; compiling (DEFMACRO INDEX-TRUNCATE ...)
; compiling (DEFMACRO INDEX-MOD ...)
; compiling (DEFMACRO INDEX-ASH ...)
; compiling (DEFMACRO INDEX-PLUSP ...)
; compiling (DEFMACRO INDEX-ZEROP ...)
; compiling (DEFMACRO INDEX-EVENP ...)
; compiling (DEFMACRO INDEX-ODDP ...)
; compiling (DEFMACRO INDEX> ...)
; compiling (DEFMACRO INDEX= ...)
; compiling (DEFMACRO INDEX< ...)
; compiling (DEFMACRO INDEX>= ...)
; compiling (DEFMACRO INDEX<= ...)
; compiling (DEFCONSTANT +REPLYSIZE+ ...)
; compiling (DEFVAR *EMPTY-BYTES* ...)
; compiling (DECLAIM (TYPE BUFFER-BYTES ...))
; compiling (DEFSTRUCT (REPLY-BUFFER # ...) ...)
; compiling (DEFCONSTANT +BUFFER-TEXT16-SIZE+ ...)
; compiling (DEFTYPE BUFFER-TEXT16 ...)
; compiling (DEFPARAMETER *XLIB-PACKAGE* ...)
; compiling (DEFUN XINTERN ...)
; compiling (DEFPARAMETER *KEYWORD-PACKAGE* ...)
; compiling (DEFUN KINTERN ...)
; compiling (DEFVAR *DEF-CLX-CLASS-USE-DEFCLASS* ...)
; compiling (DEFMACRO DEF-CLX-CLASS ...)
; compiling (DEF-CLX-CLASS (BUFFER # ...) ...)
; compiling (DEFCONSTANT +IMAGE-BIT-LSB-FIRST-P+ ...)
; compiling (DEFCONSTANT +IMAGE-BYTE-LSB-FIRST-P+ ...)
; compiling (DEFCONSTANT +IMAGE-UNIT+ ...)
; compiling (DEFCONSTANT +IMAGE-PAD+ ...)

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/depdefs.fasl written
; compilation finished in 0:00:02
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/clx.lisp" (written 26 AUG 2005 05:36:12 AM):
; compiling (IN-PACKAGE :XLIB)
; compiling (PUSHNEW :CLX ...)
; compiling (PUSHNEW :XLIB ...)
; compiling (DEFPARAMETER *VERSION* ...)
; compiling (PUSHNEW :CLX-MIT-R4 ...)
; compiling (PUSHNEW :CLX-MIT-R5 ...)
; compiling (DEFPARAMETER *PROTOCOL-MAJOR-VERSION* ...)
; compiling (DEFPARAMETER *PROTOCOL-MINOR-VERSION* ...)
; compiling (DEFPARAMETER *X-TCP-PORT* ...)
; compiling (DEFTYPE GENERALIZED-BOOLEAN ...)
; compiling (DEFTYPE CARD32 ...)
; compiling (DEFTYPE CARD29 ...)
; compiling (DEFTYPE CARD24 ...)
; compiling (DEFTYPE INT32 ...)
; compiling (DEFTYPE CARD16 ...)
; compiling (DEFTYPE INT16 ...)
; compiling (DEFTYPE CARD8 ...)
; compiling (DEFTYPE INT8 ...)
; compiling (DEFTYPE CARD4 ...)
; compiling (DEFTYPE RGB-VAL ...)
; compiling (DEFTYPE ANGLE ...)
; compiling (DEFTYPE MASK32 ...)
; compiling (DEFTYPE MASK16 ...)
; compiling (DEFTYPE PIXEL ...)
; compiling (DEFTYPE IMAGE-DEPTH ...)
; compiling (DEFTYPE RESOURCE-ID ...)
; compiling (DEFTYPE KEYSYM ...)
; compiling (DEF-CLX-CLASS (COLOR # ...) ...)
; compiling (DEFUN PRINT-COLOR ...)
; compiling (DEFUN MAKE-COLOR ...)
; compiling (DEFUN COLOR-RGB ...)
; compiling (DEF-CLX-CLASS (BITMAP-FORMAT # ...) ...)
; compiling (DEFUN PRINT-BITMAP-FORMAT ...)
; compiling (DEF-CLX-CLASS (PIXMAP-FORMAT # ...) ...)
; compiling (DEFUN PRINT-PIXMAP-FORMAT ...)
; compiling (DEFPARAMETER *ATOM-CACHE-SIZE* ...)
; compiling (DEFPARAMETER *RESOURCE-ID-MAP-SIZE* ...)
; compiling (DEF-CLX-CLASS (DISPLAY # ...) ...)
; compiling (DEFUN PRINT-DISPLAY-NAME ...)
; compiling (DEFUN PRINT-DISPLAY ...)
; compiling (DEF-CLX-CLASS (DRAWABLE # ...) ...)
; compiling (DEFUN PRINT-DRAWABLE ...)
; compiling (DEF-CLX-CLASS (WINDOW # ...))
; compiling (DEF-CLX-CLASS (PIXMAP # ...))
; compiling (DEF-CLX-CLASS (VISUAL-INFO # ...) ...)
; compiling (DEFUN PRINT-VISUAL-INFO ...)
; compiling (DEF-CLX-CLASS (COLORMAP # ...) ...)
; compiling (DEFUN PRINT-COLORMAP ...)
; compiling (DEF-CLX-CLASS (CURSOR # ...) ...)
; compiling (DEFUN PRINT-CURSOR ...)
; compiling (DEFTYPE XATOM ...)
; compiling (DEFCONSTANT +PREDEFINED-ATOMS+ ...)
; compiling (DEFTYPE STRINGABLE ...)
; compiling (DEFTYPE FONTABLE ...)
; compiling (DEFTYPE TIMESTAMP ...)
; compiling (DEFCONSTANT +BIT-GRAVITY-VECTOR+ ...)
; compiling (DEFTYPE BIT-GRAVITY ...)
; compiling (DEFCONSTANT +WIN-GRAVITY-VECTOR+ ...)
; compiling (DEFPARAMETER *PROTOCOL-FAMILIES* ...)
; compiling (DEFTYPE WIN-GRAVITY ...)
; compiling (DEFTYPE GRAB-STATUS ...)
; compiling (DEFTYPE ALIST ...)
; compiling (DEFTYPE CLX-LIST ...)
; compiling (DEFTYPE CLX-SEQUENCE ...)
; compiling (DEFTYPE REPEAT-SEQ ...)
; compiling (DEFTYPE POINT-SEQ ...)
; compiling (DEFTYPE SEG-SEQ ...)
; compiling (DEFTYPE RECT-SEQ ...)
; compiling (DEFTYPE ARC-SEQ ...)
; compiling (DEFTYPE GCONTEXT-STATE ...)
; compiling (DEF-CLX-CLASS (GCONTEXT # ...) ...)
; compiling (DEFUN PRINT-GCONTEXT ...)
; compiling (DEFCONSTANT +EVENT-MASK-VECTOR+ ...)
; compiling (DEFTYPE EVENT-MASK-CLASS ...)
; compiling (DEFTYPE EVENT-MASK ...)
; compiling (DEFCONSTANT +POINTER-EVENT-MASK-VECTOR+ ...)
; compiling (DEFTYPE POINTER-EVENT-MASK-CLASS ...)
; compiling (DEFTYPE POINTER-EVENT-MASK ...)
; compiling (DEFCONSTANT +DEVICE-EVENT-MASK-VECTOR+ ...)
; compiling (DEFTYPE DEVICE-EVENT-MASK-CLASS ...)
; compiling (DEFTYPE DEVICE-EVENT-MASK ...)
; compiling (DEFCONSTANT +STATE-MASK-VECTOR+ ...)
; compiling (DEFTYPE MODIFIER-KEY ...)
; compiling (DEFTYPE MODIFIER-MASK ...)
; compiling (DEFTYPE STATE-MASK-KEY ...)
; compiling (DEFCONSTANT +GCONTEXT-COMPONENTS+ ...)
; compiling (DEFTYPE GCONTEXT-KEY ...)
; compiling (DEFTYPE EVENT-KEY ...)
; compiling (DEFTYPE ERROR-KEY ...)
; compiling (DEFTYPE DRAW-DIRECTION ...)
; compiling (DEFCONSTANT +BOOLE-VECTOR+ ...)
; compiling (DEFTYPE BOOLE-CONSTANT ...)
; compiling (DEF-CLX-CLASS (SCREEN # ...) ...)
; compiling (DEFUN PRINT-SCREEN ...)
; compiling (DEFUN SCREEN-ROOT-VISUAL ...)
; compiling (DEFTYPE FONT-PROPS ...)
; compiling (DEF-CLX-CLASS (FONT-INFO # ...) ...)
; compiling (DEF-CLX-CLASS (FONT # ...) ...)
; compiling (DEFUN PRINT-FONT ...)
; compiling (DEFUN FONT-ID ...)
; compiling (DEFUN FONT-FONT-INFO ...)
; compiling (DEFUN FONT-CHAR-INFOS ...)
; compiling (DEFUN MAKE-FONT ...)
; compiling (MAKE-FONT-INFO-ACCESSORS IGNORE ...)
; compiling (DEFUN FONT-PROPERTY ...)
; compiling (MAKE-MUMBLE-EQUAL WINDOW)
; compiling (MAKE-MUMBLE-EQUAL PIXMAP)
; compiling (MAKE-MUMBLE-EQUAL CURSOR)
; compiling (MAKE-MUMBLE-EQUAL FONT)
; compiling (MAKE-MUMBLE-EQUAL GCONTEXT)
; compiling (MAKE-MUMBLE-EQUAL COLORMAP)
; compiling (MAKE-MUMBLE-EQUAL DRAWABLE)
; compiling (DEFUN ENCODE-MASK ...)
; compiling (DEFUN DECODE-MASK ...)
; compiling (DEFUN ENCODE-EVENT-MASK ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/clx.lisp
; in: DEFUN ENCODE-EVENT-MASK
;     (XLIB::X-TYPE-ERROR XLIB:EVENT-MASK 'XLIB:EVENT-MASK)
; ==>
;   XLIB:EVENT-MASK
; 
; note: deleting unreachable code

; compiling (DEFUN MAKE-EVENT-MASK ...)
; compiling (DEFUN MAKE-EVENT-KEYS ...)
; compiling (DEFUN ENCODE-DEVICE-EVENT-MASK ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/clx.lisp
; in: DEFUN ENCODE-DEVICE-EVENT-MASK
;     (XLIB::X-TYPE-ERROR XLIB:DEVICE-EVENT-MASK 'XLIB:DEVICE-EVENT-MASK)
; ==>
;   XLIB:DEVICE-EVENT-MASK
; 
; note: deleting unreachable code

; compiling (DEFUN ENCODE-MODIFIER-MASK ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/clx.lisp
; in: DEFUN ENCODE-MODIFIER-MASK
;     (XLIB::X-TYPE-ERROR XLIB:MODIFIER-MASK 'XLIB:MODIFIER-MASK)
; ==>
;   XLIB:MODIFIER-MASK
; 
; note: deleting unreachable code

; compiling (DEFUN ENCODE-STATE-MASK ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/clx.lisp
; in: DEFUN ENCODE-STATE-MASK
;     (XLIB::X-TYPE-ERROR XLIB::STATE-MASK
;                       '(OR XLIB:MASK16 (XLIB::CLX-LIST XLIB:STATE-MASK-KEY)))
; ==>
;   XLIB::STATE-MASK
; 
; note: deleting unreachable code

; compiling (DEFUN MAKE-STATE-MASK ...)
; compiling (DEFUN MAKE-STATE-KEYS ...)
; compiling (DEFUN ENCODE-POINTER-EVENT-MASK ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/clx.lisp
; in: DEFUN ENCODE-POINTER-EVENT-MASK
;     (XLIB::X-TYPE-ERROR XLIB:POINTER-EVENT-MASK 'XLIB:POINTER-EVENT-MASK)
; ==>
;   XLIB:POINTER-EVENT-MASK
; 
; note: deleting unreachable code

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/clx.fasl written
; compilation finished in 0:00:08
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/dependent.lisp" (written 14 JUL 2005 10:11:42 AM):
; compiling (IN-PACKAGE :XLIB)
; compiling (PROCLAIM (QUOTE #))
; compiling (DEFPARAMETER *OUTPUT-BUFFER-SIZE* ...)
; compiling (DEFPARAMETER *REPLY-TIMEOUT* ...)
; compiling (DEFCONSTANT +WORD-0+ ...)
; compiling (DEFCONSTANT +WORD-1+ ...)
; compiling (DEFCONSTANT +LONG-0+ ...)
; compiling (DEFCONSTANT +LONG-1+ ...)
; compiling (DEFCONSTANT +LONG-2+ ...)
; compiling (DEFCONSTANT +LONG-3+ ...)
; compiling (DEFCONSTANT +BUFFER-SPEED+ ...)
; compiling (DEFCONSTANT +BUFFER-SAFETY+ ...)
; compiling (DEFCONSTANT +BUFFER-DEBUG+ ...)
; compiling (DEFUN DECLARE-BUFMAC ...)
; compiling (DEFUN DECLARE-BUFFUN ...)
; compiling (DECLAIM (INLINE CARD8->INT8 ...))
; compiling (DEFUN CARD8->INT8 ...)
; compiling (DEFUN INT8->CARD8 ...)
; compiling (DEFUN CARD16->INT16 ...)
; compiling (DEFUN INT16->CARD16 ...)
; compiling (DEFUN CARD32->INT32 ...)
; compiling (DEFUN INT32->CARD32 ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/dependent.lisp
; in: DEFUN INT32->CARD32
;     (LDB (BYTE 32 0) XLIB::X)
; --> SB-KERNEL:%LDB 
; ==>
;   (LOGAND (ASH INT (- SB-C::POSN)) (ASH 4294967295 (- SB-C::SIZE 32)))
; 
; note: forced to do static-fun Two-arg-and (cost 53)
;       unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
;       The first argument is a (SIGNED-BYTE 32), not a (UNSIGNED-BYTE 32).

; compiling (DECLAIM (INLINE AREF-CARD8 ...))
; compiling (DEFUN AREF-CARD8 ...)
; compiling (DEFUN ASET-CARD8 ...)
; compiling (DEFUN AREF-INT8 ...)
; compiling (DEFUN ASET-INT8 ...)
; compiling (DEFUN AREF-CARD16 ...)
; compiling (DEFUN ASET-CARD16 ...)
; compiling (DEFUN AREF-INT16 ...)
; compiling (DEFUN ASET-INT16 ...)
; compiling (DEFUN AREF-CARD32 ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/dependent.lisp
; in: DEFUN AREF-CARD32
;     (DEFUN XLIB::AREF-CARD32 (XLIB::A XLIB::I)
;     (DECLARE (TYPE XLIB::BUFFER-BYTES XLIB::A) (TYPE XLIB:ARRAY-INDEX XLIB::I))
;     (DECLARE (XLIB::CLX-VALUES XLIB:CARD32))
;     (DECLARE (OPTIMIZE (SPEED 3) (SAFETY 0) (DEBUG 1)))
;     (THE XLIB:CARD32
;          (LOGIOR (THE XLIB:CARD32 (ASH # 24))
;                  (THE XLIB:CARD29 (ASH # 16))
;                  (THE XLIB:CARD16 (ASH # 8))
;                  (THE XLIB:CARD8 (AREF XLIB::A #)))))
; --> PROGN EVAL-WHEN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA 
; ==>
;   #'(SB-INT:NAMED-LAMBDA XLIB::AREF-CARD32
;                          (XLIB::A XLIB::I)
;                          (DECLARE (TYPE XLIB::BUFFER-BYTES XLIB::A)
;                                   (TYPE XLIB:ARRAY-INDEX XLIB::I))
;                          (DECLARE (XLIB::CLX-VALUES XLIB:CARD32))
;                          (DECLARE (OPTIMIZE (SPEED 3) (SAFETY 0) (DEBUG 1)))
;                          (BLOCK XLIB::AREF-CARD32
;                            (THE XLIB:CARD32
;                                 (LOGIOR (THE XLIB:CARD32 #)
;                                         (THE XLIB:CARD29 #)
;                                         (THE XLIB:CARD16 #)
;                                         (THE XLIB:CARD8 #)))))
; 
; note: doing unsigned word to integer coercion (cost 20) to "<return value>"

; compiling (DEFUN ASET-CARD32 ...)
; compiling (DEFUN AREF-INT32 ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/dependent.lisp
; in: DEFUN AREF-INT32
;     (DEFUN XLIB::AREF-INT32 (XLIB::A XLIB::I)
;     (DECLARE (TYPE XLIB::BUFFER-BYTES XLIB::A) (TYPE XLIB:ARRAY-INDEX XLIB::I))
;     (DECLARE (XLIB::CLX-VALUES XLIB:INT32))
;     (DECLARE (OPTIMIZE (SPEED 3) (SAFETY 0) (DEBUG 1)))
;     (THE XLIB:INT32
;          (LOGIOR (THE XLIB:INT32 (ASH # 24))
;                  (THE XLIB:CARD29 (ASH # 16))
;                  (THE XLIB:CARD16 (ASH # 8))
;                  (THE XLIB:CARD8 (AREF XLIB::A #)))))
; --> PROGN EVAL-WHEN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA 
; ==>
;   #'(SB-INT:NAMED-LAMBDA XLIB::AREF-INT32
;                          (XLIB::A XLIB::I)
;                          (DECLARE (TYPE XLIB::BUFFER-BYTES XLIB::A)
;                                   (TYPE XLIB:ARRAY-INDEX XLIB::I))
;                          (DECLARE (XLIB::CLX-VALUES XLIB:INT32))
;                          (DECLARE (OPTIMIZE (SPEED 3) (SAFETY 0) (DEBUG 1)))
;                          (BLOCK XLIB::AREF-INT32
;                            (THE XLIB:INT32
;                                 (LOGIOR (THE XLIB:INT32 #)
;                                         (THE XLIB:CARD29 #)
;                                         (THE XLIB:CARD16 #)
;                                         (THE XLIB:CARD8 #)))))
; 
; note: doing signed word to integer coercion (cost 20) to "<return value>"

; compiling (DEFUN ASET-INT32 ...)
; compiling (DEFUN AREF-CARD29 ...)
; compiling (DEFUN ASET-CARD29 ...)
; compiling (DEFSETF AREF-CARD8 ...)
; compiling (DEFSETF AREF-INT8 ...)
; compiling (DEFSETF AREF-CARD16 ...)
; compiling (DEFSETF AREF-INT16 ...)
; compiling (DEFSETF AREF-CARD32 ...)
; compiling (DEFSETF AREF-INT32 ...)
; compiling (DEFSETF AREF-CARD29 ...)
; compiling (DEFUN RGB-VAL->CARD16 ...)
; compiling (DEFUN CARD16->RGB-VAL ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/dependent.lisp
; in: DEFUN CARD16->RGB-VAL
;     (DEFUN XLIB::CARD16->RGB-VAL (XLIB::VALUE)
;     (DECLARE (TYPE XLIB:CARD16 XLIB::VALUE))
;     (DECLARE (XLIB::CLX-VALUES SHORT-FLOAT))
;     (DECLARE (OPTIMIZE (SPEED 3) (SAFETY 0) (DEBUG 1)))
;     (THE SHORT-FLOAT (* (THE XLIB:CARD16 XLIB::VALUE) 1.5259022e-5)))
; --> PROGN EVAL-WHEN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA 
; ==>
;   #'(SB-INT:NAMED-LAMBDA XLIB::CARD16->RGB-VAL
;                          (XLIB::VALUE)
;                          (DECLARE (TYPE XLIB:CARD16 XLIB::VALUE))
;                          (DECLARE (XLIB::CLX-VALUES SHORT-FLOAT))
;                          (DECLARE (OPTIMIZE (SPEED 3) (SAFETY 0) (DEBUG 1)))
;                          (BLOCK XLIB::CARD16->RGB-VAL
;                            (THE SHORT-FLOAT
;                                 (* (THE XLIB:CARD16 XLIB::VALUE)
;                                    1.5259022e-5))))
; 
; note: doing float to pointer coercion (cost 13) to "<return value>"

; compiling (DEFUN RADIANS->INT16 ...)
; compiling (DEFUN INT16->RADIANS ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/dependent.lisp
; in: DEFUN INT16->RADIANS
;     (DEFUN XLIB::INT16->RADIANS (XLIB::VALUE)
;     (DECLARE (TYPE XLIB:INT16 XLIB::VALUE))
;     (DECLARE (XLIB::CLX-VALUES SHORT-FLOAT))
;     (DECLARE (OPTIMIZE (SPEED 3) (SAFETY 0) (DEBUG 1)))
;     (THE SHORT-FLOAT (* (THE XLIB:INT16 XLIB::VALUE) 2.727077e-4)))
; --> PROGN EVAL-WHEN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA 
; ==>
;   #'(SB-INT:NAMED-LAMBDA XLIB::INT16->RADIANS
;                          (XLIB::VALUE)
;                          (DECLARE (TYPE XLIB:INT16 XLIB::VALUE))
;                          (DECLARE (XLIB::CLX-VALUES SHORT-FLOAT))
;                          (DECLARE (OPTIMIZE (SPEED 3) (SAFETY 0) (DEBUG 1)))
;                          (BLOCK XLIB::INT16->RADIANS
;                            (THE SHORT-FLOAT
;                                 (* (THE XLIB:INT16 XLIB::VALUE) 2.727077e-4))))
; 
; note: doing float to pointer coercion (cost 13) to "<return value>"

; compiling (DEFTYPE ANGLE ...)
; compiling (DEFUN ANGLEP ...)
; compiling (DECLAIM (INLINE CHAR->CARD8 ...))
; compiling (CHAR-TRANSLATORS)
; compiling (DEFUN MAKE-PROCESS-LOCK ...)
; compiling (DEFMACRO HOLDING-LOCK ...)
; compiling (DEFMACRO WITHOUT-ABORTS ...)
; compiling (DEFUN PROCESS-BLOCK ...)
; compiling (DECLAIM (INLINE PROCESS-WAKEUP))
; compiling (DEFUN PROCESS-WAKEUP ...)
; compiling (DECLAIM (INLINE CURRENT-PROCESS))
; compiling (DEFUN CURRENT-PROCESS ...)
; compiling (DEFMACRO WITHOUT-INTERRUPTS ...)
; compiling (DEFVAR *WITHOUT-INTERRUPTS-SIC-LOCK* ...)
; compiling (DEFMACRO WITHOUT-INTERRUPTS ...)
; compiling (DEFVAR *CONDITIONAL-STORE-LOCK* ...)
; compiling (DEFMACRO CONDITIONAL-STORE ...)
; compiling (DEFMACRO WRAP-BUF-OUTPUT ...)
; compiling (DEFMACRO WRAP-BUF-INPUT ...)
; compiling (DEFCONSTANT +X-UNIX-SOCKET-PATH+ ...)
; compiling (DEFUN OPEN-X-STREAM ...)
; compiling (DEFUN BUFFER-READ-DEFAULT ...)
; compiling (DEFUN BUFFER-WRITE-DEFAULT ...)
; compiling (DEFUN BUFFER-FORCE-OUTPUT-DEFAULT ...)
; compiling (DEFUN BUFFER-CLOSE-DEFAULT ...)
; compiling (DEFUN BUFFER-INPUT-WAIT-DEFAULT ...)
; compiling (DEFUN BUFFER-LISTEN-DEFAULT ...)
; compiling (DEFMACRO WITH-STACK-LIST ...)
; compiling (DEFMACRO WITH-STACK-LIST* ...)
; compiling (DECLAIM (INLINE BUFFER-REPLACE))
; compiling (DEFUN BUFFER-REPLACE ...)
; compiling (DEFMACRO WITH-GCONTEXT-BINDINGS ...)
; compiling (DEFCONSTANT +TYPE-CHECK?+ ...)
; compiling (DEFMACRO TYPE? ...)
; compiling (DEFUN X-TYPE-ERROR ...)
; compiling (DEFUN DEFAULT-ERROR-HANDLER ...)
; compiling (DEFUN X-ERROR ...)
; compiling (DEFUN X-CERROR ...)
; compiling (DEFINE-CONDITION X-ERROR ...)
; compiling (DEFUN HOST-ADDRESS ...)
; compiling (DEFMACRO USE-CLOSURES ...)
; compiling (DEFUN CLX-MACROEXPAND ...)
; compiling (DEFUN GETENV ...)
; compiling (DEFUN GET-HOST-NAME ...)
; compiling (DEFUN HOMEDIR-FILE-PATHNAME ...)
; compiling (DEFUN DEFAULT-RESOURCES-PATHNAME ...)
; compiling (DEFUN RESOURCES-PATHNAME ...)
; compiling (DEFUN AUTHORITY-PATHNAME ...)
; compiling (DEFUN GET-DEFAULT-DISPLAY ...)
; compiling (DEFUN GC-CLEANUP ...)
; compiling (DEFUN DEFAULT-KEYSYM-TRANSLATE ...)
; compiling (DEFTYPE PIXARRAY-1-ELEMENT-TYPE ...)
; compiling (DEFTYPE PIXARRAY-4-ELEMENT-TYPE ...)
; compiling (DEFTYPE PIXARRAY-8-ELEMENT-TYPE ...)
; compiling (DEFTYPE PIXARRAY-16-ELEMENT-TYPE ...)
; compiling (DEFTYPE PIXARRAY-24-ELEMENT-TYPE ...)
; compiling (DEFTYPE PIXARRAY-32-ELEMENT-TYPE ...)
; compiling (DEFTYPE PIXARRAY-1 ...)
; compiling (DEFTYPE PIXARRAY-4 ...)
; compiling (DEFTYPE PIXARRAY-8 ...)
; compiling (DEFTYPE PIXARRAY-16 ...)
; compiling (DEFTYPE PIXARRAY-24 ...)
; compiling (DEFTYPE PIXARRAY-32 ...)
; compiling (DEFTYPE PIXARRAY ...)
; compiling (DEFTYPE BITMAP ...)
; compiling (DEFMACRO WITH-UNDERLYING-SIMPLE-VECTOR ...)
; compiling (DEFMACRO READ-IMAGE-LOAD-BYTE ...)
; compiling (DEFMACRO READ-IMAGE-ASSEMBLE-BYTES ...)
; compiling (DEFMACRO WRITE-IMAGE-LOAD-BYTE ...)
; compiling (DEFMACRO WRITE-IMAGE-ASSEMBLE-BYTES ...)
; compiling (DEFUN FAST-READ-PIXARRAY-24 ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/dependent.lisp
; in: DEFUN FAST-READ-PIXARRAY-24
;     (XLIB::READ-IMAGE-ASSEMBLE-BYTES
;    (AREF XLIB::BUFFER-BBUF (XLIB::INDEX+ XLIB::I 0))
;    (AREF XLIB::BUFFER-BBUF (XLIB::INDEX+ XLIB::I 1))
;    (AREF XLIB::BUFFER-BBUF (XLIB::INDEX+ XLIB::I 2)))
; --> THE DPB SB-KERNEL:%DPB LET LOGIOR 
; ==>
;   (LOGAND INT (LOGNOT (ASH SB-C::MASK SB-C::POSN)))
; 
; note: forced to do static-fun Two-arg-and (cost 53)
;       unable to do inline fixnum arithmetic (cost 2) because:
;       The first argument is a (UNSIGNED-BYTE 32), not a FIXNUM.
;       unable to do inline (signed-byte 32) arithmetic (cost 3) because:
;       The first argument is a (UNSIGNED-BYTE 32), not a (SIGNED-BYTE 32).
; 
; note: doing unsigned word to integer coercion (cost 20), for:
;       the first argument of static-fun Two-arg-and

; compiling (DEFUN PIXARRAY-ELEMENT-SIZE ...)
; compiling (DEFUN COPY-BIT-RECT ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/dependent.lisp
; in: DEFUN COPY-BIT-RECT
;     (SB-KERNEL:WITH-ARRAY-DATA
;    ((XLIB::SDATA XLIB::SOURCE) (XLIB::SSTART) (XLIB::SEND))
;    (DECLARE (IGNORE XLIB::SEND))
;    (SB-KERNEL:WITH-ARRAY-DATA
;     ((XLIB::DDATA XLIB::DEST) (XLIB::DSTART) (XLIB::DEND))
;     (DECLARE (IGNORE XLIB::DEND))
;     (ASSERT (AND (ZEROP XLIB::SSTART) (ZEROP XLIB::DSTART)))
;     (DO ((XLIB::SRC-IDX # #)
;          (XLIB::DEST-IDX # #)
;          (COUNT XLIB::HEIGHT #))
;         ((ZEROP COUNT))
;       (DECLARE (TYPE XLIB:ARRAY-INDEX XLIB::SRC-IDX XLIB::DEST-IDX COUNT))
;       (SB-KERNEL:UB1-BASH-COPY XLIB::SDATA
;                                XLIB::SRC-IDX
;                                XLIB::DDATA
;                                XLIB::DEST-IDX
;                                XLIB::WIDTH))))
; --> LET LET LET MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL IF 
; ==>
;   (SB-KERNEL:%WITH-ARRAY-DATA #:ONCE-ONLY-1069
;                               #:ONCE-ONLY-1070
;                               #:ONCE-ONLY-1071)
; 
; note: unable to
;   inline non-SIMPLE-vector-handling logic
; due to type uncertainty:
;   The first argument is a ARRAY, not a (OR VECTOR SIMPLE-ARRAY).

;     (SB-KERNEL:WITH-ARRAY-DATA
;    ((XLIB::DDATA XLIB::DEST) (XLIB::DSTART) (XLIB::DEND))
;    (DECLARE (IGNORE XLIB::DEND))
;    (ASSERT (AND (ZEROP XLIB::SSTART) (ZEROP XLIB::DSTART)))
;    (DO ((XLIB::SRC-IDX (XLIB::INDEX+ # XLIB::SX #)
;                        (XLIB::INDEX+ XLIB::SRC-IDX XLIB::SOURCE-WIDTH))
;         (XLIB::DEST-IDX (XLIB::INDEX+ # XLIB::DX #)
;                         (XLIB::INDEX+ XLIB::DEST-IDX XLIB::DEST-WIDTH))
;         (COUNT XLIB::HEIGHT (1- COUNT)))
;        ((ZEROP COUNT))
;      (DECLARE (TYPE XLIB:ARRAY-INDEX XLIB::SRC-IDX XLIB::DEST-IDX COUNT))
;      (SB-KERNEL:UB1-BASH-COPY XLIB::SDATA
;                               XLIB::SRC-IDX
;                               XLIB::DDATA
;                               XLIB::DEST-IDX
;                               XLIB::WIDTH)))
; --> LET LET LET MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL IF 
; ==>
;   (SB-KERNEL:%WITH-ARRAY-DATA #:ONCE-ONLY-1075
;                               #:ONCE-ONLY-1076
;                               #:ONCE-ONLY-1077)
; 
; note: unable to
;   inline non-SIMPLE-vector-handling logic
; due to type uncertainty:
;   The first argument is a ARRAY, not a (OR VECTOR SIMPLE-ARRAY).

; compiling (DEFUN FAST-READ-PIXARRAY-USING-BITBLT ...)
; compiling (DEFUN FAST-READ-PIXARRAY ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/dependent.lisp
; in: DEFUN FAST-READ-PIXARRAY
;     (XLIB::READ-PIXARRAY-INTERNAL XLIB::BBUF
;                                 XLIB::BOFFSET
;                                 XLIB:PIXARRAY
;                                 XLIB::X
;                                 XLIB::Y
;                                 XLIB::WIDTH
;                                 XLIB::HEIGHT
;                                 XLIB::PADDED-BYTES-PER-LINE
;                                 XLIB::BITS-PER-PIXEL
;                                 FUNCTION
;                                 XLIB::UNIT
;                                 ...)
; ==>
;   XLIB::BBUF
; 
; note: deleting unreachable code

; compiling (DEFUN FAST-WRITE-PIXARRAY-24 ...)
; compiling (DEFUN FAST-WRITE-PIXARRAY-USING-BITBLT ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/dependent.lisp
; in: DEFUN FAST-WRITE-PIXARRAY-USING-BITBLT
;     (ARRAY-DIMENSION XLIB:PIXARRAY 1)
; 
; note: unable to
;   optimize
; because:
;   The array dimensions are unknown; must call ARRAY-DIMENSION at runtime.

; compiling (DEFUN FAST-WRITE-PIXARRAY ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/dependent.lisp
; in: DEFUN FAST-WRITE-PIXARRAY
;     (XLIB::WRITE-PIXARRAY-INTERNAL XLIB::BBUF
;                                  XLIB::BOFFSET
;                                  XLIB:PIXARRAY
;                                  XLIB::X
;                                  XLIB::Y
;                                  XLIB::WIDTH
;                                  XLIB::HEIGHT
;                                  XLIB::PADDED-BYTES-PER-LINE
;                                  XLIB::BITS-PER-PIXEL
;                                  FUNCTION
;                                  XLIB::+IMAGE-UNIT+
;                                  ...)
; ==>
;   XLIB::BBUF
; 
; note: deleting unreachable code

; compiling (DEFUN FAST-COPY-PIXARRAY ...)

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/dependent.fasl written
; compilation finished in 0:00:03
STYLE-WARNING: redefining DECLARE-BUFMAC in DEFUN
STYLE-WARNING: redefining DECLARE-BUFFUN in DEFUN
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/macros.lisp" (written 14 JUL 2005 09:24:44 AM):
; compiling (IN-PACKAGE :XLIB)
; compiling (DEFMACRO TYPE-CHECK ...); in: LAMBDA NIL
;     'UNLESS
; 
; note: deleting unreachable code

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/macros.lisp
; in: DEFMACRO TYPE-CHECK
;     'UNLESS
; 
; note: deleting unreachable code

; compiling (DEFVAR *REQUIRED-ARG-DUMMY*)
; compiling (DEFMACRO REQUIRED-ARG ...)
; compiling (DEFMACRO LROUND ...)
; compiling (DEFMACRO WROUND ...)
; compiling (DEFUN INDEX-INCREMENT ...)
; compiling (DEFUN GETIFY ...)
; compiling (DEFUN PUTIFY ...)
; compiling (DEFMACRO DEFINE-ACCESSOR ...); in: LAMBDA NIL
;     (LET ((XLIB::PREDICATING-PUT (THIRD XLIB::GET-PUT-MACROS)))
;     (WHEN XLIB::PREDICATING-PUT
;       `((SETF (GET ',XLIB::NAME 'XLIB::PREDICATING-PUT) T)
;         (DEFMACRO ,(XLIB::PUTIFY XLIB::NAME T) ,(CAR XLIB::PREDICATING-PUT)
;           ,@(CDR XLIB::PREDICATING-PUT)))))
; 
; note: deleting unreachable code

;     'SETF
; 
; note: deleting unreachable code

;     (LET ((XLIB::PREDICATING-PUT (THIRD XLIB::GET-PUT-MACROS)))
;     (WHEN XLIB::PREDICATING-PUT
;       `((SETF (GET ',XLIB::NAME 'XLIB::PREDICATING-PUT) T)
;         (DEFMACRO ,(XLIB::PUTIFY XLIB::NAME T) ,(CAR XLIB::PREDICATING-PUT)
;           ,@(CDR XLIB::PREDICATING-PUT)))))
; 
; note: deleting unreachable code

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/macros.lisp
; in: DEFMACRO DEFINE-ACCESSOR
;     (LET ((XLIB::PREDICATING-PUT (THIRD XLIB::GET-PUT-MACROS)))
;     (WHEN XLIB::PREDICATING-PUT
;       `((SETF (GET ',XLIB::NAME 'XLIB::PREDICATING-PUT) T)
;         (DEFMACRO ,(XLIB::PUTIFY XLIB::NAME T) ,(CAR XLIB::PREDICATING-PUT)
;           ,@(CDR XLIB::PREDICATING-PUT)))))
; 
; note: deleting unreachable code

;     'SETF
; 
; note: deleting unreachable code

;     (LET ((XLIB::PREDICATING-PUT (THIRD XLIB::GET-PUT-MACROS)))
;     (WHEN XLIB::PREDICATING-PUT
;       `((SETF (GET ',XLIB::NAME 'XLIB::PREDICATING-PUT) T)
;         (DEFMACRO ,(XLIB::PUTIFY XLIB::NAME T) ,(CAR XLIB::PREDICATING-PUT)
;           ,@(CDR XLIB::PREDICATING-PUT)))))
; 
; note: deleting unreachable code

; compiling (DEFINE-ACCESSOR CARD32 ...)
; compiling (DEFINE-ACCESSOR CARD29 ...)
; compiling (DEFINE-ACCESSOR CARD16 ...)
; compiling (DEFINE-ACCESSOR CARD8 ...)
; compiling (DEFINE-ACCESSOR INTEGER ...)
; compiling (DEFINE-ACCESSOR INT16 ...)
; compiling (DEFINE-ACCESSOR RGB-VAL ...)
; compiling (DEFINE-ACCESSOR ANGLE ...)
; compiling (DEFINE-ACCESSOR BIT ...)
; compiling (DEFINE-ACCESSOR BOOLEAN ...)
; compiling (DEFINE-ACCESSOR DRAWABLE ...)
; compiling (DEFINE-ACCESSOR WINDOW ...)
; compiling (DEFINE-ACCESSOR PIXMAP ...)
; compiling (DEFINE-ACCESSOR GCONTEXT ...)
; compiling (DEFINE-ACCESSOR CURSOR ...)
; compiling (DEFINE-ACCESSOR COLORMAP ...)
; compiling (DEFINE-ACCESSOR FONT ...)
; compiling (DEFINE-ACCESSOR KEYWORD ...)
; compiling (DEFINE-ACCESSOR RESOURCE-ID ...)
; compiling (DEFINE-ACCESSOR RESOURCE-ID-OR-NIL ...)
; compiling (DEFMACRO CHAR-INFO-GET ...)
; compiling (DEFINE-ACCESSOR MEMBER8 ...)
; compiling (DEFINE-ACCESSOR MEMBER16 ...)
; compiling (DEFINE-ACCESSOR MEMBER ...)
; compiling (DEFTYPE MEMBER-VECTOR ...)
; compiling (DEFINE-ACCESSOR MEMBER-VECTOR ...)
; compiling (DEFINE-ACCESSOR MEMBER16-VECTOR ...)
; compiling (DEFINE-ACCESSOR MEMBER8-VECTOR ...)
; compiling (DEFINE-ACCESSOR BOOLE-CONSTANT ...)
; compiling (DEFINE-ACCESSOR NULL ...)
; compiling (DEFINE-ACCESSOR PAD8 ...)
; compiling (DEFINE-ACCESSOR PAD16 ...)
; compiling (DEFINE-ACCESSOR BIT-VECTOR256 ...)
; compiling (DEFINE-ACCESSOR STRING ...)
; compiling (DEFINE-ACCESSOR SEQUENCE ...)
; compiling (DEFMACRO CLIENT-MESSAGE-EVENT-GET-SEQUENCE ...)
; compiling (DEFMACRO CLIENT-MESSAGE-EVENT-PUT-SEQUENCE ...)
; compiling (DEFINE-ACCESSOR CLIENT-MESSAGE-SEQUENCE ...)
; compiling (DEFINE-ACCESSOR CODE ...)
; compiling (DEFINE-ACCESSOR LENGTH ...)
; compiling (DEFTYPE DATA ...)
; compiling (DEFINE-ACCESSOR DATA ...)
; compiling (DEFMACRO OR-EXPAND ...)
; compiling (DEFINE-ACCESSOR OR ...); in: LAMBDA NIL
;     'T
; 
; note: deleting unreachable code

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/macros.lisp
; in: DEFINE-ACCESSOR OR
;     'T
; 
; note: deleting unreachable code

; compiling (SETF (GET # ...) ...)
; compiling (DEFUN MASK-GET ...)
; compiling (DEFUN MASK-PUT ...)
; compiling (DEFINE-ACCESSOR PROGN ...)
; compiling (DEFMACRO CHECK-PUT ...)
; compiling (DEFUN GET-PUT-ITEMS ...)
; compiling (DEFMACRO WITH-BUFFER-REQUEST-INTERNAL ...)
; compiling (DEFMACRO WITH-BUFFER-REQUEST ...)
; compiling (DEFMACRO WITH-BUFFER-REQUEST-AND-REPLY ...)
; compiling (DEFMACRO COMPARE-REQUEST ...)
; compiling (DEFMACRO PUT-ITEMS ...)
; compiling (DEFMACRO DECODE-TYPE ...)
; compiling (DEFMACRO ENCODE-TYPE ...)
; compiling (DEFMACRO SET-DECODE-TYPE ...)
; compiling (DEFSETF DECODE-TYPE ...)
; compiling (DEFCONSTANT +X-CREATEWINDOW+ ...)
; compiling (DEFCONSTANT +X-CHANGEWINDOWATTRIBUTES+ ...)
; compiling (DEFCONSTANT +X-GETWINDOWATTRIBUTES+ ...)
; compiling (DEFCONSTANT +X-DESTROYWINDOW+ ...)
; compiling (DEFCONSTANT +X-DESTROYSUBWINDOWS+ ...)
; compiling (DEFCONSTANT +X-CHANGESAVESET+ ...)
; compiling (DEFCONSTANT +X-REPARENTWINDOW+ ...)
; compiling (DEFCONSTANT +X-MAPWINDOW+ ...)
; compiling (DEFCONSTANT +X-MAPSUBWINDOWS+ ...)
; compiling (DEFCONSTANT +X-UNMAPWINDOW+ ...)
; compiling (DEFCONSTANT +X-UNMAPSUBWINDOWS+ ...)
; compiling (DEFCONSTANT +X-CONFIGUREWINDOW+ ...)
; compiling (DEFCONSTANT +X-CIRCULATEWINDOW+ ...)
; compiling (DEFCONSTANT +X-GETGEOMETRY+ ...)
; compiling (DEFCONSTANT +X-QUERYTREE+ ...)
; compiling (DEFCONSTANT +X-INTERNATOM+ ...)
; compiling (DEFCONSTANT +X-GETATOMNAME+ ...)
; compiling (DEFCONSTANT +X-CHANGEPROPERTY+ ...)
; compiling (DEFCONSTANT +X-DELETEPROPERTY+ ...)
; compiling (DEFCONSTANT +X-GETPROPERTY+ ...)
; compiling (DEFCONSTANT +X-LISTPROPERTIES+ ...)
; compiling (DEFCONSTANT +X-SETSELECTIONOWNER+ ...)
; compiling (DEFCONSTANT +X-GETSELECTIONOWNER+ ...)
; compiling (DEFCONSTANT +X-CONVERTSELECTION+ ...)
; compiling (DEFCONSTANT +X-SENDEVENT+ ...)
; compiling (DEFCONSTANT +X-GRABPOINTER+ ...)
; compiling (DEFCONSTANT +X-UNGRABPOINTER+ ...)
; compiling (DEFCONSTANT +X-GRABBUTTON+ ...)
; compiling (DEFCONSTANT +X-UNGRABBUTTON+ ...)
; compiling (DEFCONSTANT +X-CHANGEACTIVEPOINTERGRAB+ ...)
; compiling (DEFCONSTANT +X-GRABKEYBOARD+ ...)
; compiling (DEFCONSTANT +X-UNGRABKEYBOARD+ ...)
; compiling (DEFCONSTANT +X-GRABKEY+ ...)
; compiling (DEFCONSTANT +X-UNGRABKEY+ ...)
; compiling (DEFCONSTANT +X-ALLOWEVENTS+ ...)
; compiling (DEFCONSTANT +X-GRABSERVER+ ...)
; compiling (DEFCONSTANT +X-UNGRABSERVER+ ...)
; compiling (DEFCONSTANT +X-QUERYPOINTER+ ...)
; compiling (DEFCONSTANT +X-GETMOTIONEVENTS+ ...)
; compiling (DEFCONSTANT +X-TRANSLATECOORDS+ ...)
; compiling (DEFCONSTANT +X-WARPPOINTER+ ...)
; compiling (DEFCONSTANT +X-SETINPUTFOCUS+ ...)
; compiling (DEFCONSTANT +X-GETINPUTFOCUS+ ...)
; compiling (DEFCONSTANT +X-QUERYKEYMAP+ ...)
; compiling (DEFCONSTANT +X-OPENFONT+ ...)
; compiling (DEFCONSTANT +X-CLOSEFONT+ ...)
; compiling (DEFCONSTANT +X-QUERYFONT+ ...)
; compiling (DEFCONSTANT +X-QUERYTEXTEXTENTS+ ...)
; compiling (DEFCONSTANT +X-LISTFONTS+ ...)
; compiling (DEFCONSTANT +X-LISTFONTSWITHINFO+ ...)
; compiling (DEFCONSTANT +X-SETFONTPATH+ ...)
; compiling (DEFCONSTANT +X-GETFONTPATH+ ...)
; compiling (DEFCONSTANT +X-CREATEPIXMAP+ ...)
; compiling (DEFCONSTANT +X-FREEPIXMAP+ ...)
; compiling (DEFCONSTANT +X-CREATEGC+ ...)
; compiling (DEFCONSTANT +X-CHANGEGC+ ...)
; compiling (DEFCONSTANT +X-COPYGC+ ...)
; compiling (DEFCONSTANT +X-SETDASHES+ ...)
; compiling (DEFCONSTANT +X-SETCLIPRECTANGLES+ ...)
; compiling (DEFCONSTANT +X-FREEGC+ ...)
; compiling (DEFCONSTANT +X-CLEARTOBACKGROUND+ ...)
; compiling (DEFCONSTANT +X-COPYAREA+ ...)
; compiling (DEFCONSTANT +X-COPYPLANE+ ...)
; compiling (DEFCONSTANT +X-POLYPOINT+ ...)
; compiling (DEFCONSTANT +X-POLYLINE+ ...)
; compiling (DEFCONSTANT +X-POLYSEGMENT+ ...)
; compiling (DEFCONSTANT +X-POLYRECTANGLE+ ...)
; compiling (DEFCONSTANT +X-POLYARC+ ...)
; compiling (DEFCONSTANT +X-FILLPOLY+ ...)
; compiling (DEFCONSTANT +X-POLYFILLRECTANGLE+ ...)
; compiling (DEFCONSTANT +X-POLYFILLARC+ ...)
; compiling (DEFCONSTANT +X-PUTIMAGE+ ...)
; compiling (DEFCONSTANT +X-GETIMAGE+ ...)
; compiling (DEFCONSTANT +X-POLYTEXT8+ ...)
; compiling (DEFCONSTANT +X-POLYTEXT16+ ...)
; compiling (DEFCONSTANT +X-IMAGETEXT8+ ...)
; compiling (DEFCONSTANT +X-IMAGETEXT16+ ...)
; compiling (DEFCONSTANT +X-CREATECOLORMAP+ ...)
; compiling (DEFCONSTANT +X-FREECOLORMAP+ ...)
; compiling (DEFCONSTANT +X-COPYCOLORMAPANDFREE+ ...)
; compiling (DEFCONSTANT +X-INSTALLCOLORMAP+ ...)
; compiling (DEFCONSTANT +X-UNINSTALLCOLORMAP+ ...)
; compiling (DEFCONSTANT +X-LISTINSTALLEDCOLORMAPS+ ...)
; compiling (DEFCONSTANT +X-ALLOCCOLOR+ ...)
; compiling (DEFCONSTANT +X-ALLOCNAMEDCOLOR+ ...)
; compiling (DEFCONSTANT +X-ALLOCCOLORCELLS+ ...)
; compiling (DEFCONSTANT +X-ALLOCCOLORPLANES+ ...)
; compiling (DEFCONSTANT +X-FREECOLORS+ ...)
; compiling (DEFCONSTANT +X-STORECOLORS+ ...)
; compiling (DEFCONSTANT +X-STORENAMEDCOLOR+ ...)
; compiling (DEFCONSTANT +X-QUERYCOLORS+ ...)
; compiling (DEFCONSTANT +X-LOOKUPCOLOR+ ...)
; compiling (DEFCONSTANT +X-CREATECURSOR+ ...)
; compiling (DEFCONSTANT +X-CREATEGLYPHCURSOR+ ...)
; compiling (DEFCONSTANT +X-FREECURSOR+ ...)
; compiling (DEFCONSTANT +X-RECOLORCURSOR+ ...)
; compiling (DEFCONSTANT +X-QUERYBESTSIZE+ ...)
; compiling (DEFCONSTANT +X-QUERYEXTENSION+ ...)
; compiling (DEFCONSTANT +X-LISTEXTENSIONS+ ...)
; compiling (DEFCONSTANT +X-SETKEYBOARDMAPPING+ ...)
; compiling (DEFCONSTANT +X-GETKEYBOARDMAPPING+ ...)
; compiling (DEFCONSTANT +X-CHANGEKEYBOARDCONTROL+ ...)
; compiling (DEFCONSTANT +X-GETKEYBOARDCONTROL+ ...)
; compiling (DEFCONSTANT +X-BELL+ ...)
; compiling (DEFCONSTANT +X-CHANGEPOINTERCONTROL+ ...)
; compiling (DEFCONSTANT +X-GETPOINTERCONTROL+ ...)
; compiling (DEFCONSTANT +X-SETSCREENSAVER+ ...)
; compiling (DEFCONSTANT +X-GETSCREENSAVER+ ...)
; compiling (DEFCONSTANT +X-CHANGEHOSTS+ ...)
; compiling (DEFCONSTANT +X-LISTHOSTS+ ...)
; compiling (DEFCONSTANT +X-CHANGEACCESSCONTROL+ ...)
; compiling (DEFCONSTANT +X-CHANGECLOSEDOWNMODE+ ...)
; compiling (DEFCONSTANT +X-KILLCLIENT+ ...)
; compiling (DEFCONSTANT +X-ROTATEPROPERTIES+ ...)
; compiling (DEFCONSTANT +X-FORCESCREENSAVER+ ...)
; compiling (DEFCONSTANT +X-SETPOINTERMAPPING+ ...)
; compiling (DEFCONSTANT +X-GETPOINTERMAPPING+ ...)
; compiling (DEFCONSTANT +X-SETMODIFIERMAPPING+ ...)
; compiling (DEFCONSTANT +X-GETMODIFIERMAPPING+ ...)
; compiling (DEFCONSTANT +X-NOOPERATION+ ...)
; compiling (DEFMACRO THREADED-ATOMIC-PUSH ...)
; compiling (DEFMACRO THREADED-ATOMIC-POP ...)
; compiling (DEFMACRO THREADED-NCONC ...)
; compiling (DEFMACRO THREADED-PUSH ...)
; compiling (DEFMACRO THREADED-POP ...)
; compiling (DEFMACRO THREADED-ENQUEUE ...)
; compiling (DEFMACRO THREADED-DEQUEUE ...)
; compiling (DEFMACRO THREADED-REQUEUE ...)
; compiling (DEFMACRO THREADED-DOLIST ...)
; compiling (DEFMACRO THREADED-DELETE ...)
; compiling (DEFMACRO THREADED-LENGTH ...)

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/macros.fasl written
; compilation finished in 0:00:05
STYLE-WARNING: redefining GETIFY in DEFUN
STYLE-WARNING: redefining PUTIFY in DEFUN
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/bufmac.lisp" (written 14 JUL 2005 09:24:43 AM):
; compiling (IN-PACKAGE :XLIB)
; compiling (DEFMACRO WRITE-CARD8 ...)
; compiling (DEFMACRO WRITE-INT8 ...)
; compiling (DEFMACRO WRITE-CARD16 ...)
; compiling (DEFMACRO WRITE-INT16 ...)
; compiling (DEFMACRO WRITE-CARD32 ...)
; compiling (DEFMACRO WRITE-INT32 ...)
; compiling (DEFMACRO WRITE-CARD29 ...)
; compiling (DEFMACRO WRITE-CHAR2B ...)
; compiling (DEFMACRO SET-BUFFER-OFFSET ...)
; compiling (DEFMACRO ADVANCE-BUFFER-OFFSET ...)
; compiling (DEFMACRO WITH-BUFFER-OUTPUT ...)
; compiling (DEFMACRO WRITING-BUFFER-CHUNKS ...)

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/bufmac.fasl written
; compilation finished in 0:00:00
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/buffer.lisp" (written 14 JUL 2005 09:24:44 AM):
; compiling (IN-PACKAGE :XLIB)
; compiling (DEFCONSTANT +REQUESTSIZE+ ...)
; compiling (DEFMACRO WITH-BUFFER ...)
; compiling (DEFUN WITH-BUFFER-FUNCTION ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/buffer.lisp
; in: DEFUN WITH-BUFFER-FUNCTION
;     (XLIB::WITH-BUFFER (XLIB::BUFFER :TIMEOUT XLIB::TIMEOUT :INLINE T)
;                      (FUNCALL FUNCTION))
; --> MACROLET LET XLIB::HOLDING-LOCK IF HANDLER-CASE BLOCK LET TAGBODY 
; --> HANDLER-BIND LET MULTIPLE-VALUE-PROG1 PROGN RETURN-FROM WITH-TIMEOUT IF 
; ==>
;   (> XLIB::TIMEOUT 0)
; 
; note: unable to
;   open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
;   The first argument is a REAL, not a FLOAT.
; 
; note: forced to do GENERIC-> (cost 10)
;       unable to do inline fixnum comparison (cost 3) because:
;       The first argument is a REAL, not a FIXNUM.
;       unable to do inline fixnum comparison (cost 4) because:
;       The first argument is a REAL, not a FIXNUM.
;       etc.

; compiling (DEFMACRO READ-CARD8 ...)
; compiling (DEFMACRO READ-INT8 ...)
; compiling (DEFMACRO READ-CARD16 ...)
; compiling (DEFMACRO READ-INT16 ...)
; compiling (DEFMACRO READ-CARD32 ...)
; compiling (DEFMACRO READ-INT32 ...)
; compiling (DEFMACRO READ-CARD29 ...)
; compiling (DEFMACRO EVENT-CODE ...)
; compiling (DEFMACRO READING-EVENT ...)
; compiling (DEFMACRO WITH-BUFFER-INPUT ...)
; compiling (DEFUN MAKE-BUFFER ...)
; compiling (DEFUN MAKE-REPLY-BUFFER ...)
; compiling (DEFUN BUFFER-ENSURE-SIZE ...)
; compiling (DEFUN BUFFER-PAD-REQUEST ...)
; compiling (DECLAIM (INLINE BUFFER-NEW-REQUEST-NUMBER))
; compiling (DEFUN BUFFER-NEW-REQUEST-NUMBER ...)
; compiling (DEFUN WITH-BUFFER-REQUEST-FUNCTION ...)
; compiling (DEFUN WITH-BUFFER-REQUEST-FUNCTION-NOLOCK ...)
; compiling (DEFSTRUCT (PENDING-COMMAND # ...) ...)
; compiling (DEFUN WITH-BUFFER-REQUEST-AND-REPLY-FUNCTION ...)
; compiling (DEFUN BUFFER-WRITE ...)
; compiling (DEFUN BUFFER-FLUSH ...)
; compiling (DEFMACRO WITH-BUFFER-FLUSH-INHIBITED ...)
; compiling (DEFUN BUFFER-FORCE-OUTPUT ...)
; compiling (DEFUN CLOSE-BUFFER ...)
; compiling (DEFUN BUFFER-INPUT ...)
; compiling (DEFUN BUFFER-INPUT-WAIT ...)
; compiling (DEFUN BUFFER-LISTEN ...)
; compiling (DEFUN READ-SEQUENCE-STRING ...)
; compiling (DEFUN READ-SEQUENCE-CHAR ...)
; compiling (DEFUN READ-LIST-CARD8 ...)
; compiling (DEFUN READ-LIST-CARD8-WITH-TRANSFORM ...)
; compiling (DEFUN READ-SIMPLE-ARRAY-CARD8 ...)
; compiling (DEFUN READ-SIMPLE-ARRAY-CARD8-WITH-TRANSFORM ...)
; compiling (DEFUN READ-VECTOR-CARD8 ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/buffer.lisp
; in: DEFUN READ-VECTOR-CARD8
;     (SETF (AREF XLIB::DATA XLIB::J) (XLIB::READ-CARD8 XLIB::INDEX))
; --> SB-KERNEL:%ASET LET* 
; ==>
;   (SB-KERNEL:HAIRY-DATA-VECTOR-SET ARRAY SB-INT:INDEX SB-C::NEW-VALUE)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a VECTOR, not a SIMPLE-STRING.
; 
; note: unable to
;   avoid runtime dispatch on array element type
; because:
;   Upgraded element type of array is not known at compile time.

; compiling (DEFUN READ-VECTOR-CARD8-WITH-TRANSFORM ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/buffer.lisp
; in: DEFUN READ-VECTOR-CARD8-WITH-TRANSFORM
;     (SETF (AREF XLIB::DATA XLIB::J)
;           (FUNCALL XLIB::TRANSFORM (XLIB::READ-CARD8 XLIB::INDEX)))
; --> SB-KERNEL:%ASET LET* 
; ==>
;   (SB-KERNEL:HAIRY-DATA-VECTOR-SET ARRAY SB-INT:INDEX SB-C::NEW-VALUE)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a VECTOR, not a SIMPLE-STRING.
; 
; note: unable to
;   avoid runtime dispatch on array element type
; because:
;   Upgraded element type of array is not known at compile time.

; compiling (DEFUN READ-SEQUENCE-CARD8 ...)
; compiling (DEFUN READ-SEQUENCE-INT8 ...)
; compiling (DEFUN READ-LIST-CARD16 ...)
; compiling (DEFUN READ-LIST-CARD16-WITH-TRANSFORM ...)
; compiling (DEFUN READ-SIMPLE-ARRAY-CARD16 ...)
; compiling (DEFUN READ-SIMPLE-ARRAY-CARD16-WITH-TRANSFORM ...)
; compiling (DEFUN READ-VECTOR-CARD16 ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/buffer.lisp
; in: DEFUN READ-VECTOR-CARD16
;     (SETF (AREF XLIB::DATA XLIB::J) (XLIB::READ-CARD16 XLIB::INDEX))
; --> SB-KERNEL:%ASET LET* 
; ==>
;   (SB-KERNEL:HAIRY-DATA-VECTOR-SET ARRAY SB-INT:INDEX SB-C::NEW-VALUE)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a VECTOR, not a SIMPLE-STRING.
; 
; note: unable to
;   avoid runtime dispatch on array element type
; because:
;   Upgraded element type of array is not known at compile time.

; compiling (DEFUN READ-VECTOR-CARD16-WITH-TRANSFORM ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/buffer.lisp
; in: DEFUN READ-VECTOR-CARD16-WITH-TRANSFORM
;     (SETF (AREF XLIB::DATA XLIB::J)
;           (FUNCALL XLIB::TRANSFORM (XLIB::READ-CARD16 XLIB::INDEX)))
; --> SB-KERNEL:%ASET LET* 
; ==>
;   (SB-KERNEL:HAIRY-DATA-VECTOR-SET ARRAY SB-INT:INDEX SB-C::NEW-VALUE)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a VECTOR, not a SIMPLE-STRING.
; 
; note: unable to
;   avoid runtime dispatch on array element type
; because:
;   Upgraded element type of array is not known at compile time.

; compiling (DEFUN READ-SEQUENCE-CARD16 ...)
; compiling (DEFUN READ-SEQUENCE-INT16 ...)
; compiling (DEFUN READ-LIST-CARD32 ...)
; compiling (DEFUN READ-LIST-CARD32-WITH-TRANSFORM ...)
; compiling (DEFUN READ-SIMPLE-ARRAY-CARD32 ...)
; compiling (DEFUN READ-SIMPLE-ARRAY-CARD32-WITH-TRANSFORM ...)
; compiling (DEFUN READ-VECTOR-CARD32 ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/buffer.lisp
; in: DEFUN READ-VECTOR-CARD32
;     (SETF (AREF XLIB::DATA XLIB::J) (XLIB::READ-CARD32 XLIB::INDEX))
; --> SB-KERNEL:%ASET LET* 
; ==>
;   (SB-KERNEL:HAIRY-DATA-VECTOR-SET ARRAY SB-INT:INDEX SB-C::NEW-VALUE)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a VECTOR, not a SIMPLE-STRING.
; 
; note: unable to
;   avoid runtime dispatch on array element type
; because:
;   Upgraded element type of array is not known at compile time.

; compiling (DEFUN READ-VECTOR-CARD32-WITH-TRANSFORM ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/buffer.lisp
; in: DEFUN READ-VECTOR-CARD32-WITH-TRANSFORM
;     (SETF (AREF XLIB::DATA XLIB::J)
;           (FUNCALL XLIB::TRANSFORM (XLIB::READ-CARD32 XLIB::INDEX)))
; --> SB-KERNEL:%ASET LET* 
; ==>
;   (SB-KERNEL:HAIRY-DATA-VECTOR-SET ARRAY SB-INT:INDEX SB-C::NEW-VALUE)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a VECTOR, not a SIMPLE-STRING.
; 
; note: unable to
;   avoid runtime dispatch on array element type
; because:
;   Upgraded element type of array is not known at compile time.

; compiling (DEFUN READ-SEQUENCE-CARD32 ...)
; compiling (DEFUN READ-SEQUENCE-INT32 ...)
; compiling (DEFUN WRITE-SEQUENCE-CHAR ...)
; compiling (DEFUN WRITE-LIST-CARD8 ...)
; compiling (DEFUN WRITE-LIST-CARD8-WITH-TRANSFORM ...)
; compiling (DEFUN WRITE-SIMPLE-ARRAY-CARD8 ...)
; compiling (DEFUN WRITE-SIMPLE-ARRAY-CARD8-WITH-TRANSFORM ...)
; compiling (DEFUN WRITE-VECTOR-CARD8 ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/buffer.lisp
; in: DEFUN WRITE-VECTOR-CARD8
;     (AREF XLIB::DATA XLIB::INDEX)
; --> LET* 
; ==>
;   (SB-KERNEL:HAIRY-DATA-VECTOR-REF ARRAY SB-INT:INDEX)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a VECTOR, not a SIMPLE-STRING.
; 
; note: unable to
;   avoid runtime dispatch on array element type
; because:
;   Upgraded element type of array is not known at compile time.

; compiling (DEFUN WRITE-VECTOR-CARD8-WITH-TRANSFORM ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/buffer.lisp
; in: DEFUN WRITE-VECTOR-CARD8-WITH-TRANSFORM
;     (AREF XLIB::DATA XLIB::INDEX)
; --> LET* 
; ==>
;   (SB-KERNEL:HAIRY-DATA-VECTOR-REF ARRAY SB-INT:INDEX)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a VECTOR, not a SIMPLE-STRING.
; 
; note: unable to
;   avoid runtime dispatch on array element type
; because:
;   Upgraded element type of array is not known at compile time.

; compiling (DEFUN WRITE-SEQUENCE-CARD8 ...)
; compiling (DEFUN WRITE-SEQUENCE-INT8 ...)
; compiling (DEFUN WRITE-LIST-CARD16 ...)
; compiling (DEFUN WRITE-LIST-CARD16-WITH-TRANSFORM ...)
; compiling (DEFUN WRITE-SIMPLE-ARRAY-CARD16 ...)
; compiling (DEFUN WRITE-SIMPLE-ARRAY-CARD16-WITH-TRANSFORM ...)
; compiling (DEFUN WRITE-VECTOR-CARD16 ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/buffer.lisp
; in: DEFUN WRITE-VECTOR-CARD16
;     (AREF XLIB::DATA XLIB::INDEX)
; --> LET* 
; ==>
;   (SB-KERNEL:HAIRY-DATA-VECTOR-REF ARRAY SB-INT:INDEX)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a VECTOR, not a SIMPLE-STRING.
; 
; note: unable to
;   avoid runtime dispatch on array element type
; because:
;   Upgraded element type of array is not known at compile time.

; compiling (DEFUN WRITE-VECTOR-CARD16-WITH-TRANSFORM ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/buffer.lisp
; in: DEFUN WRITE-VECTOR-CARD16-WITH-TRANSFORM
;     (AREF XLIB::DATA XLIB::INDEX)
; --> LET* 
; ==>
;   (SB-KERNEL:HAIRY-DATA-VECTOR-REF ARRAY SB-INT:INDEX)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a VECTOR, not a SIMPLE-STRING.
; 
; note: unable to
;   avoid runtime dispatch on array element type
; because:
;   Upgraded element type of array is not known at compile time.

; compiling (DEFUN WRITE-SEQUENCE-CARD16 ...)
; compiling (DEFUN WRITE-LIST-INT16 ...)
; compiling (DEFUN WRITE-LIST-INT16-WITH-TRANSFORM ...)
; compiling (DEFUN WRITE-SIMPLE-ARRAY-INT16 ...)
; compiling (DEFUN WRITE-SIMPLE-ARRAY-INT16-WITH-TRANSFORM ...)
; compiling (DEFUN WRITE-VECTOR-INT16 ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/buffer.lisp
; in: DEFUN WRITE-VECTOR-INT16
;     (AREF XLIB::DATA XLIB::INDEX)
; --> LET* 
; ==>
;   (SB-KERNEL:HAIRY-DATA-VECTOR-REF ARRAY SB-INT:INDEX)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a VECTOR, not a SIMPLE-STRING.
; 
; note: unable to
;   avoid runtime dispatch on array element type
; because:
;   Upgraded element type of array is not known at compile time.

; compiling (DEFUN WRITE-VECTOR-INT16-WITH-TRANSFORM ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/buffer.lisp
; in: DEFUN WRITE-VECTOR-INT16-WITH-TRANSFORM
;     (AREF XLIB::DATA XLIB::INDEX)
; --> LET* 
; ==>
;   (SB-KERNEL:HAIRY-DATA-VECTOR-REF ARRAY SB-INT:INDEX)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a VECTOR, not a SIMPLE-STRING.
; 
; note: unable to
;   avoid runtime dispatch on array element type
; because:
;   Upgraded element type of array is not known at compile time.

; compiling (DEFUN WRITE-SEQUENCE-INT16 ...)
; compiling (DEFUN WRITE-LIST-CARD32 ...)
; compiling (DEFUN WRITE-LIST-CARD32-WITH-TRANSFORM ...)
; compiling (DEFUN WRITE-SIMPLE-ARRAY-CARD32 ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/buffer.lisp
; in: DEFUN WRITE-SIMPLE-ARRAY-CARD32
;     (XLIB::WRITE-CARD32 XLIB::J (AREF XLIB::DATA XLIB::INDEX))
; ==>
;   (XLIB::ASET-CARD32 (THE XLIB:CARD32 (AREF XLIB::DATA XLIB::INDEX))
;                      XLIB::BUFFER-BBUF
;                      (XLIB::INDEX+ XLIB::BUFFER-BOFFSET XLIB::J))
; 
; note: doing unsigned word to integer coercion (cost 20)

; compiling (DEFUN WRITE-SIMPLE-ARRAY-CARD32-WITH-TRANSFORM ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/buffer.lisp
; in: DEFUN WRITE-SIMPLE-ARRAY-CARD32-WITH-TRANSFORM
;     (FUNCALL XLIB::TRANSFORM (AREF XLIB::DATA XLIB::INDEX))
; ==>
;   (SB-C::%FUNCALL FUNCTION #:G3845)
; 
; note: doing unsigned word to integer coercion (cost 20)

; compiling (DEFUN WRITE-VECTOR-CARD32 ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/buffer.lisp
; in: DEFUN WRITE-VECTOR-CARD32
;     (AREF XLIB::DATA XLIB::INDEX)
; --> LET* 
; ==>
;   (SB-KERNEL:HAIRY-DATA-VECTOR-REF ARRAY SB-INT:INDEX)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a VECTOR, not a SIMPLE-STRING.
; 
; note: unable to
;   avoid runtime dispatch on array element type
; because:
;   Upgraded element type of array is not known at compile time.

; compiling (DEFUN WRITE-VECTOR-CARD32-WITH-TRANSFORM ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/buffer.lisp
; in: DEFUN WRITE-VECTOR-CARD32-WITH-TRANSFORM
;     (AREF XLIB::DATA XLIB::INDEX)
; --> LET* 
; ==>
;   (SB-KERNEL:HAIRY-DATA-VECTOR-REF ARRAY SB-INT:INDEX)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a VECTOR, not a SIMPLE-STRING.
; 
; note: unable to
;   avoid runtime dispatch on array element type
; because:
;   Upgraded element type of array is not known at compile time.

; compiling (DEFUN WRITE-SEQUENCE-CARD32 ...)
; compiling (DEFUN WRITE-SEQUENCE-INT32 ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/buffer.lisp
; in: DEFUN WRITE-SEQUENCE-INT32
;     (XLIB::INT32->CARD32 (THE XLIB:INT32 (FUNCALL XLIB::TRANSFORM XLIB::X)))
; --> BLOCK THE LDB SB-KERNEL:%LDB 
; ==>
;   (LOGAND (ASH INT (- SB-C::POSN)) (ASH 4294967295 (- SB-C::SIZE 32)))
; 
; note: forced to do static-fun Two-arg-and (cost 53)
;       unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
;       The first argument is a (SIGNED-BYTE 32), not a (UNSIGNED-BYTE 32).
; 
; note: forced to do static-fun Two-arg-and (cost 53)
;       unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
;       The first argument is a (SIGNED-BYTE 32), not a (UNSIGNED-BYTE 32).

; compiling (DEFUN READ-BITVECTOR256 ...)
; compiling (DEFUN WRITE-BITVECTOR256 ...)
; compiling (DEFUN WRITE-LIST-CHAR2B ...)
; compiling (DEFUN WRITE-LIST-CHAR2B-WITH-TRANSFORM ...)
; compiling (DEFUN WRITE-SIMPLE-ARRAY-CHAR2B ...)
; compiling (DEFUN WRITE-SIMPLE-ARRAY-CHAR2B-WITH-TRANSFORM ...)
; compiling (DEFUN WRITE-VECTOR-CHAR2B ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/buffer.lisp
; in: DEFUN WRITE-VECTOR-CHAR2B
;     (AREF XLIB::DATA XLIB::INDEX)
; --> LET* 
; ==>
;   (SB-KERNEL:HAIRY-DATA-VECTOR-REF ARRAY SB-INT:INDEX)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a VECTOR, not a SIMPLE-STRING.
; 
; note: unable to
;   avoid runtime dispatch on array element type
; because:
;   Upgraded element type of array is not known at compile time.

; compiling (DEFUN WRITE-VECTOR-CHAR2B-WITH-TRANSFORM ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/buffer.lisp
; in: DEFUN WRITE-VECTOR-CHAR2B-WITH-TRANSFORM
;     (AREF XLIB::DATA XLIB::INDEX)
; --> LET* 
; ==>
;   (SB-KERNEL:HAIRY-DATA-VECTOR-REF ARRAY SB-INT:INDEX)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a VECTOR, not a SIMPLE-STRING.
; 
; note: unable to
;   avoid runtime dispatch on array element type
; because:
;   Upgraded element type of array is not known at compile time.

; compiling (DEFUN WRITE-SEQUENCE-CHAR2B ...)

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/buffer.fasl written
; compilation finished in 0:00:08
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/display.lisp" (written 26 AUG 2005 06:13:28 AM):
; compiling (IN-PACKAGE :XLIB)
; compiling (DEFPARAMETER *KNOWN-AUTHORIZATIONS* ...)
; compiling (DEFUN READ-XAUTH-ENTRY ...)
; compiling (DEFUN GET-BEST-AUTHORIZATION ...)
; compiling (DEFUN INITIALIZE-RESOURCE-ALLOCATOR ...)
; compiling (DEFUN RESOURCEALLOC ...)
; compiling (DEFMACRO ALLOCATE-RESOURCE-ID ...)
; compiling (DEFMACRO DEALLOCATE-RESOURCE-ID ...)
; compiling (DEFUN DEALLOCATE-RESOURCE-ID-INTERNAL ...)
; compiling (DEFUN LOOKUP-RESOURCE-ID ...)
; compiling (DEFUN SAVE-ID ...); in: LAMBDA (#:WHOLE350 #:ENVIRONMENT351)
;     (MEMBER TYPE '(XLIB:WINDOW XLIB:PIXMAP))
; ==>
;   TYPE
; 
; note: deleting unreachable code

;     'XLIB::TYPE?
; 
; note: deleting unreachable code
; 
; note: deleting unreachable code

;     'T
; 
; note: deleting unreachable code
; compiling (GENERATE-LOOKUP-FUNCTIONS IGNORE ...)
; compiling (DEFUN ID-ATOM ...)
; compiling (DEFUN ATOM-ID ...)
; compiling (DEFUN SET-ATOM-ID ...)
; compiling (DEFSETF ATOM-ID ...)
; compiling (DEFUN INITIALIZE-PREDEFINED-ATOMS ...)
; compiling (DEFUN VISUAL-INFO ...)
; compiling (DEFMACRO WITH-DISPLAY ...)
; compiling (DEFMACRO WITH-EVENT-QUEUE ...)
; compiling (DEFUN WITH-EVENT-QUEUE-FUNCTION ...)
; compiling (DEFMACRO WITH-EVENT-QUEUE-INTERNAL ...)
; compiling (DEFUN OPEN-DEFAULT-DISPLAY ...)
; compiling (DEFUN OPEN-DISPLAY ...)
; compiling (DEFUN DISPLAY-FORCE-OUTPUT ...)
; compiling (DEFUN CLOSE-DISPLAY ...)
; compiling (DEFUN DISPLAY-CONNECT ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/display.lisp
; in: DEFUN DISPLAY-CONNECT
;     (LENGTH XLIB::AUTHORIZATION-NAME)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a VECTOR.

;     (LENGTH XLIB::AUTHORIZATION-DATA)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a VECTOR.

;     (LENGTH XLIB::AUTHORIZATION-NAME)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a VECTOR.
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a VECTOR.

; compiling (DEFUN DISPLAY-PROTOCOL-VERSION ...)
; compiling (DEFUN DISPLAY-VENDOR ...)
; compiling (DEFUN DISPLAY-NSCREENS ...)
; compiling (DEFVAR *INSIDE-DISPLAY-AFTER-FUNCTION* ...)
; compiling (DEFUN DISPLAY-INVOKE-AFTER-FUNCTION ...)
; compiling (DEFUN DISPLAY-FINISH-OUTPUT ...)
; compiling (DEFPARAMETER *REQUEST-NAMES* ...)

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/display.fasl written
; compilation finished in 0:00:03
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gcontext.lisp" (written 14 JUL 2005 09:24:45 AM):
; compiling (IN-PACKAGE :XLIB)
; compiling (DEFCONSTANT +GCONTEXT-FAST-CHANGE-LENGTH+ ...)
; compiling (DEF-GC-INTERNALS IGNORE ...)
; compiling (DEFTYPE GCMASK ...)
; compiling (DEFTYPE XGCMASK ...)
; compiling (DEFSTRUCT (GCONTEXT-EXTENSION # ...) ...)
; compiling (DEFVAR *GCONTEXT-EXTENSIONS* ...)
; compiling (DEFVAR *GCONTEXT-LOCAL-STATE-CACHE* ...)
; compiling (DEFMACRO GCONTEXT-STATE-NEXT ...)
; compiling (DEFUN ALLOCATE-GCONTEXT-STATE ...)
; compiling (DEFUN DEALLOCATE-GCONTEXT-STATE ...)
; compiling (DEFVAR *TEMP-GCONTEXT-CACHE* ...)
; compiling (DEFUN ALLOCATE-TEMP-GCONTEXT ...)
; compiling (DEFUN DEALLOCATE-TEMP-GCONTEXT ...)
; compiling (DEFMACRO XGCMASK->GCMASK ...)
; compiling (DEFMACRO ACCESS-GCONTEXT ...)
; compiling (DEFMACRO MODIFY-GCONTEXT ...)
; compiling (DEFMACRO DEF-GC-ACCESSOR ...)
; compiling (DEFMACRO INCF-INTERNAL-TIMESTAMP ...)
; compiling (DEF-GC-ACCESSOR FUNCTION ...)
; compiling (DEF-GC-ACCESSOR PLANE-MASK ...)
; compiling (DEF-GC-ACCESSOR FOREGROUND ...)
; compiling (DEF-GC-ACCESSOR BACKGROUND ...)
; compiling (DEF-GC-ACCESSOR LINE-WIDTH ...)
; compiling (DEF-GC-ACCESSOR LINE-STYLE ...)
; compiling (DEF-GC-ACCESSOR CAP-STYLE ...)
; compiling (DEF-GC-ACCESSOR JOIN-STYLE ...)
; compiling (DEF-GC-ACCESSOR FILL-STYLE ...)
; compiling (DEF-GC-ACCESSOR FILL-RULE ...)
; compiling (DEF-GC-ACCESSOR TILE ...)
; compiling (DEF-GC-ACCESSOR STIPPLE ...)
; compiling (DEF-GC-ACCESSOR TS-X ...)
; compiling (DEF-GC-ACCESSOR TS-Y ...)
; compiling (DEF-GC-ACCESSOR SUBWINDOW-MODE ...)
; compiling (DEF-GC-ACCESSOR EXPOSURES ...)
; compiling (DEF-GC-ACCESSOR CLIP-X ...)
; compiling (DEF-GC-ACCESSOR CLIP-Y ...)
; compiling (DEF-GC-ACCESSOR DASH-OFFSET ...)
; compiling (DEF-GC-ACCESSOR ARC-MODE ...)
; compiling (DEFUN GCONTEXT-CLIP-MASK ...)
; compiling (DEFSETF GCONTEXT-CLIP-MASK ...)
; compiling (DEFUN SET-GCONTEXT-CLIP-MASK ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gcontext.lisp
; in: DEFUN SET-GCONTEXT-CLIP-MASK
;     (XLIB::X-TYPE-ERROR XLIB::CLIP-MASK
;                       '(OR (MEMBER :NONE) XLIB:PIXMAP XLIB:RECT-SEQ))
; ==>
;   XLIB::CLIP-MASK
; 
; note: deleting unreachable code

;     '(OR (MEMBER :NONE) XLIB:PIXMAP XLIB:RECT-SEQ)
; 
; note: deleting unreachable code

; compiling (DEFUN GCONTEXT-DASHES ...)
; compiling (DEFSETF GCONTEXT-DASHES ...)
; compiling (DEFUN SET-GCONTEXT-DASHES ...)
; compiling (DEFUN GCONTEXT-FONT ...)
; compiling (DEFSETF GCONTEXT-FONT ...)
; compiling (DEFUN SET-GCONTEXT-FONT ...)
; compiling (DEFUN FORCE-GCONTEXT-CHANGES-INTERNAL ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gcontext.lisp
; in: DEFUN FORCE-GCONTEXT-CHANGES-INTERNAL
;     (LENGTH XLIB::LOCAL-DASH)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a VECTOR.

;     (XLIB::WITH-BUFFER-REQUEST (XLIB:DISPLAY XLIB::+X-SETDASHES+)
;                              (XLIB:GCONTEXT XLIB:GCONTEXT)
;                              (XLIB:CARD16
;                               (OR
;                                (XLIB::GCONTEXT-INTERNAL-DASH-OFFSET
;                                 XLIB::LOCAL-STATE)
;                                0)
;                               (LENGTH XLIB::LOCAL-DASH))
;                              ((SEQUENCE :FORMAT XLIB:CARD8) XLIB::LOCAL-DASH))
; --> LET XLIB::WITH-BUFFER PROGN MULTIPLE-VALUE-PROG1 XLIB::WITHOUT-ABORTS 
; --> PROGN XLIB::WITH-BUFFER-REQUEST-INTERNAL XLIB::WITH-BUFFER-OUTPUT LET 
; --> LET* XLIB::CHECK-PUT XLIB::SEQUENCE-PUT LET 
; ==>
;   (LENGTH XLIB::LOCAL-DASH)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a (OR CONS VECTOR), not a (SIMPLE-ARRAY * (*)).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a (OR CONS VECTOR), not a VECTOR.

;     (EQL (SVREF XLIB::SERVER-STATE XLIB::I)
;        (SETQ XLIB::LOCAL (SVREF XLIB::LOCAL-STATE XLIB::I)))
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a T, not a SINGLE-FLOAT.
;   The second argument is a T, not a SINGLE-FLOAT.
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a T, not a DOUBLE-FLOAT.
;   The second argument is a T, not a DOUBLE-FLOAT.

;     (FUNCALL (XLIB::GCONTEXT-EXTENSION-SET-FUNCTION (CAR XLIB::EXTENSION))
;            XLIB:GCONTEXT
;            XLIB::LOCAL)
; --> SB-C::%FUNCALL THE 
; ==>
;   (SB-KERNEL:%COERCE-CALLABLE-TO-FUN FUNCTION)
; 
; note: unable to
;   optimize away possible call to FDEFINITION at runtime
; due to type uncertainty:
;   The first argument is a (OR FUNCTION SYMBOL), not a FUNCTION.

;     (XLIB::WITH-BUFFER-REQUEST (XLIB:DISPLAY XLIB::+X-SETCLIPRECTANGLES+)
;                              (XLIB::DATA (FIRST XLIB::LOCAL-CLIP))
;                              (XLIB:GCONTEXT XLIB:GCONTEXT)
;                              (XLIB:CARD16
;                               (OR
;                                (XLIB::GCONTEXT-INTERNAL-CLIP-X
;                                 XLIB::LOCAL-STATE)
;                                0)
;                               (OR
;                                (XLIB::GCONTEXT-INTERNAL-CLIP-Y
;                                 XLIB::LOCAL-STATE)
;                                0))
;                              ((SEQUENCE :FORMAT XLIB:INT16)
;                               (SECOND XLIB::LOCAL-CLIP)))
; --> LET XLIB::WITH-BUFFER PROGN MULTIPLE-VALUE-PROG1 XLIB::WITHOUT-ABORTS 
; --> PROGN XLIB::WITH-BUFFER-REQUEST-INTERNAL XLIB::WITH-BUFFER-OUTPUT LET 
; --> LET* XLIB::CHECK-PUT LET XLIB::SEQUENCE-PUT LET 
; ==>
;   (LENGTH XLIB::.VALUE.)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a VECTOR.

;     (EQL (SVREF XLIB::SERVER-STATE XLIB::I)
;        (SETQ XLIB::LOCAL (SVREF XLIB::LOCAL-STATE XLIB::I)))
; 
; note: forced to do GENERIC-EQL (cost 10)
;       unable to do inline fixnum comparison (cost 4) because:
;       The first argument is a T, not a FIXNUM.
;       The second argument is a T, not a FIXNUM.

;     (EQL (THE (OR NULL XLIB:CARD32) (SVREF XLIB::SERVER-STATE XLIB::I))
;        (SETQ XLIB::LOCAL
;                (THE (OR NULL XLIB:CARD32) (SVREF XLIB::LOCAL-STATE XLIB::I))))
; 
; note: forced to do GENERIC-EQL (cost 10)
;       unable to do inline fixnum comparison (cost 4) because:
;       The first argument is a (OR NULL (UNSIGNED-BYTE 32)), not a FIXNUM.
;       The second argument is a (OR NULL (UNSIGNED-BYTE 32)), not a FIXNUM.

; compiling (DEFUN FORCE-GCONTEXT-CHANGES ...)
; compiling (DEFMACRO WITH-GCONTEXT ...)
; compiling (DEFUN COPY-GCONTEXT-LOCAL-STATE ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gcontext.lisp
; in: DEFUN COPY-GCONTEXT-LOCAL-STATE
;     (XLIB::ALLOCATE-RESOURCE-ID XLIB:DISPLAY XLIB:GCONTEXT 'XLIB:GCONTEXT)
; --> FUNCALL SB-C::%FUNCALL THE 
; ==>
;   (SB-KERNEL:%COERCE-CALLABLE-TO-FUN FUNCTION)
; 
; note: unable to
;   optimize away possible call to FDEFINITION at runtime
; due to type uncertainty:
;   The first argument is a (OR FUNCTION SYMBOL), not a FUNCTION.

;     (- XLIB::*GCONTEXT-DATA-LENGTH*)
; ==>
;   (SB-KERNEL:%NEGATE XLIB::*GCONTEXT-DATA-LENGTH*)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).

;     (ELT XLIB::*GCONTEXT-EXTENSIONS* XLIB::I)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a LIST.

;     (FUNCALL XLIB::COPY-FUNCTION
;            XLIB:GCONTEXT
;            XLIB::TEMP-GC
;            (SVREF XLIB::LOCAL-STATE
;                   (XLIB::INDEX+ XLIB::I XLIB::*GCONTEXT-DATA-LENGTH*)))
; --> SB-C::%FUNCALL THE 
; ==>
;   (SB-KERNEL:%COERCE-CALLABLE-TO-FUN FUNCTION)
; 
; note: unable to
;   optimize away possible call to FDEFINITION at runtime
; due to type uncertainty:
;   The first argument is a (OR FUNCTION SYMBOL), not a FUNCTION.

;     (- XLIB::*GCONTEXT-DATA-LENGTH*)
; ==>
;   (SB-KERNEL:%NEGATE XLIB::*GCONTEXT-DATA-LENGTH*)
; 
; note: forced to do static-fun %Negate (cost 52)
;       unable to do inline fixnum arithmetic (cost 1) because:
;       The first argument is a NUMBER, not a FIXNUM.
;       The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
;       unable to do inline (signed-byte 32) arithmetic (cost 2) because:
;       The first argument is a NUMBER, not a (SIGNED-BYTE 32).
;       The result is a (VALUES INTEGER
;                               &OPTIONAL), not a (VALUES (SIGNED-BYTE 32)
;                                                         &REST
;                                                         T).

;     (ASH XLIB::EXTENSION-MASK (- XLIB::*GCONTEXT-DATA-LENGTH*))
; 
; note: forced to do full call
;       unable to do inline ASH (cost 2) because:
;       The second argument is a INTEGER, not a (UNSIGNED-BYTE 29).
;       The result is a (VALUES UNSIGNED-BYTE
;                               &OPTIONAL), not a (VALUES FIXNUM &REST T).
;       unable to do inline ASH (cost 3) because:
;       The second argument is a INTEGER, not a (SIGNED-BYTE 32).
;       The result is a (VALUES UNSIGNED-BYTE
;                               &OPTIONAL), not a (VALUES (SIGNED-BYTE 32)
;                                                         &REST
;                                                         T).
;       etc.

;     (ASH BIT -1)
; 
; note: forced to do full call
;       unable to do inline ASH (cost 3) because:
;       The first argument is a INTEGER, not a (SIGNED-BYTE 32).
;       The result is a (VALUES INTEGER
;                               &OPTIONAL), not a (VALUES (SIGNED-BYTE 32)
;                                                         &REST
;                                                         T).
;       unable to do inline constant ASH (cost 4) because:
;       The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
;       The result is a (VALUES INTEGER
;                               &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 32)
;                                                         &REST
;                                                         T).
;       etc.

; compiling (DEFUN RESTORE-GCONTEXT-TEMP-STATE ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gcontext.lisp
; in: DEFUN RESTORE-GCONTEXT-TEMP-STATE
;     (- XLIB::*GCONTEXT-DATA-LENGTH*)
; ==>
;   (SB-KERNEL:%NEGATE XLIB::*GCONTEXT-DATA-LENGTH*)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).

;     (FUNCALL XLIB::COPY-FUNCTION
;            XLIB::TEMP-GC
;            XLIB:GCONTEXT
;            (SVREF XLIB::LOCAL-STATE XLIB::I))
; --> SB-C::%FUNCALL THE 
; ==>
;   (SB-KERNEL:%COERCE-CALLABLE-TO-FUN FUNCTION)
; 
; note: unable to
;   optimize away possible call to FDEFINITION at runtime
; due to type uncertainty:
;   The first argument is a (OR FUNCTION SYMBOL), not a FUNCTION.

;     (- XLIB::*GCONTEXT-DATA-LENGTH*)
; ==>
;   (SB-KERNEL:%NEGATE XLIB::*GCONTEXT-DATA-LENGTH*)
; 
; note: forced to do static-fun %Negate (cost 52)
;       unable to do inline fixnum arithmetic (cost 1) because:
;       The first argument is a NUMBER, not a FIXNUM.
;       The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
;       unable to do inline (signed-byte 32) arithmetic (cost 2) because:
;       The first argument is a NUMBER, not a (SIGNED-BYTE 32).
;       The result is a (VALUES INTEGER
;                               &OPTIONAL), not a (VALUES (SIGNED-BYTE 32)
;                                                         &REST
;                                                         T).

;     (ASH XLIB::TEMP-MASK (- XLIB::*GCONTEXT-DATA-LENGTH*))
; 
; note: forced to do full call
;       unable to do inline ASH (cost 2) because:
;       The second argument is a INTEGER, not a (UNSIGNED-BYTE 29).
;       The result is a (VALUES UNSIGNED-BYTE
;                               &OPTIONAL), not a (VALUES FIXNUM &REST T).
;       unable to do inline ASH (cost 3) because:
;       The second argument is a INTEGER, not a (SIGNED-BYTE 32).
;       The result is a (VALUES UNSIGNED-BYTE
;                               &OPTIONAL), not a (VALUES (SIGNED-BYTE 32)
;                                                         &REST
;                                                         T).
;       etc.

;     (ASH BIT -1)
; 
; note: forced to do full call
;       unable to do inline ASH (cost 3) because:
;       The first argument is a INTEGER, not a (SIGNED-BYTE 32).
;       The result is a (VALUES INTEGER
;                               &OPTIONAL), not a (VALUES (SIGNED-BYTE 32)
;                                                         &REST
;                                                         T).
;       unable to do inline constant ASH (cost 4) because:
;       The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
;       The result is a (VALUES INTEGER
;                               &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 32)
;                                                         &REST
;                                                         T).
;       etc.

; compiling (DEFUN CREATE-GCONTEXT ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gcontext.lisp
; in: DEFUN CREATE-GCONTEXT
;     (EQL XLIB::LOCAL
;        (THE (OR NULL XLIB:CARD32) (SVREF XLIB::SERVER-STATE XLIB::I)))
; 
; note: forced to do GENERIC-EQL (cost 10)
;       unable to do inline fixnum comparison (cost 4) because:
;       The first argument is a (OR NULL (UNSIGNED-BYTE 32)), not a FIXNUM.
;       The second argument is a (OR NULL (UNSIGNED-BYTE 32)), not a FIXNUM.

; compiling (DEFUN COPY-GCONTEXT-COMPONENTS ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gcontext.lisp
; in: DEFUN COPY-GCONTEXT-COMPONENTS
;     (FIND XLIB::KEY
;         XLIB::*GCONTEXT-EXTENSIONS*
;         :KEY
;         #'XLIB::GCONTEXT-EXTENSION-NAME)
; --> NTH-VALUE MULTIPLE-VALUE-BIND LET 
; ==>
;   (SB-KERNEL:%FIND-POSITION SB-C::ITEM
;                             SEQUENCE
;                             SB-C::FROM-END
;                             SB-C::START
;                             SB-C::END
;                             (SB-KERNEL:EFFECTIVE-FIND-POSITION-KEY SB-C::KEY)
;                             (SB-KERNEL:EFFECTIVE-FIND-POSITION-TEST SB-C::TEST
;                                                                     SB-C::TEST-NOT))
; 
; note: unable to
;   expand inline
; due to type uncertainty:
;   The second argument is a SEQUENCE, not a LIST.
; 
; note: unable to
;   expand inline
; due to type uncertainty:
;   The second argument is a SEQUENCE, not a VECTOR.

;     (POSITION XLIB::EXTENSION XLIB::*GCONTEXT-EXTENSIONS*)
; --> NTH-VALUE MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; ==>
;   (SB-KERNEL:%FIND-POSITION SB-C::ITEM
;                             SEQUENCE
;                             SB-C::FROM-END
;                             SB-C::START
;                             SB-C::END
;                             (SB-KERNEL:EFFECTIVE-FIND-POSITION-KEY SB-C::KEY)
;                             (SB-KERNEL:EFFECTIVE-FIND-POSITION-TEST SB-C::TEST
;                                                                     SB-C::TEST-NOT))
; 
; note: unable to
;   expand inline
; due to type uncertainty:
;   The second argument is a SEQUENCE, not a LIST.
; 
; note: unable to
;   expand inline
; due to type uncertainty:
;   The second argument is a SEQUENCE, not a VECTOR.

;     (FUNCALL (XLIB::GCONTEXT-EXTENSION-COPY-FUNCTION XLIB::EXTENSION)
;            XLIB::SRC
;            XLIB::DST
;            (SVREF (XLIB::GCONTEXT-LOCAL-STATE XLIB::SRC)
;                   (XLIB::INDEX+
;                    (POSITION XLIB::EXTENSION XLIB::*GCONTEXT-EXTENSIONS*)
;                    XLIB::*GCONTEXT-DATA-LENGTH*)))
; --> SB-C::%FUNCALL THE 
; ==>
;   (SB-KERNEL:%COERCE-CALLABLE-TO-FUN FUNCTION)
; 
; note: unable to
;   optimize away possible call to FDEFINITION at runtime
; due to type uncertainty:
;   The first argument is a (OR FUNCTION SYMBOL), not a FUNCTION.

; compiling (DEFUN COPY-GCONTEXT ...)
; compiling (DEFUN FREE-GCONTEXT ...)
; compiling (DEFMACRO DEFINE-GCONTEXT-ACCESSOR ...)
; compiling (DEFUN ADD-GCONTEXT-EXTENSION ...)

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gcontext.fasl written
; compilation finished in 0:00:10
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/input.lisp" (written 14 JUL 2005 09:24:45 AM):
; compiling (IN-PACKAGE :XLIB)
; compiling (DEFVAR *EVENT-FREE-LIST* ...)
; compiling (DEFCONSTANT +MAX-EVENTS+ ...)
; compiling (DEFVAR *EVENT-KEY-VECTOR* ...)
; compiling (DEFVAR *EVENT-MACRO-VECTOR* ...)
; compiling (DEFVAR *EVENT-HANDLER-VECTOR* ...)
; compiling (DEFVAR *EVENT-SEND-VECTOR* ...)
; compiling (DEFUN ALLOCATE-EVENT ...)
; compiling (DEFUN DEALLOCATE-EVENT ...)
; compiling (DEFPARAMETER *FIRST-EXTENSION-EVENT-CODE* ...)
; compiling (DEFVAR *EXTENSIONS* ...)
; compiling (DEFMACRO DEFINE-EXTENSION ...)
; compiling (DEFUN CANONICALIZE-EVENT-NAME ...)
; compiling (DEFUN ALLOCATE-EXTENSION-EVENT-CODE ...)
; compiling (DEFUN GET-INTERNAL-EVENT-CODE ...)
; compiling (DEFUN GET-EXTERNAL-EVENT-CODE ...)
; compiling (DEFMACRO EXTENSION-OPCODE ...)
; compiling (DEFUN INITIALIZE-EXTENSIONS ...)
; compiling (DEFVAR *PENDING-COMMAND-FREE-LIST* ...)
; compiling (DEFUN START-PENDING-COMMAND ...)
; compiling (DEFUN STOP-PENDING-COMMAND ...)
; compiling (DEFVAR *REPLY-BUFFER-FREE-LISTS* ...)
; compiling (DEFUN ALLOCATE-REPLY-BUFFER ...)
; compiling (DEFUN DEALLOCATE-REPLY-BUFFER ...)
; compiling (DEFUN READ-ERROR-INPUT ...)
; compiling (DEFUN READ-REPLY-INPUT ...)
; compiling (DEFUN READ-EVENT-INPUT ...)
; compiling (DEFUN NOTE-INPUT-COMPLETE ...)
; compiling (DEFUN READ-INPUT ...)
; compiling (DEFUN REPORT-ASYNCHRONOUS-ERRORS ...)
; compiling (DEFUN WAIT-FOR-EVENT ...)
; compiling (DEFUN READ-REPLY ...)
; compiling (DEFUN EVENT-LISTEN ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/input.lisp
; in: DEFUN EVENT-LISTEN
;     (XLIB::DISPLAY-NEW-EVENTS XLIB:DISPLAY)
; --> TRULY-THE SB-KERNEL:%INSTANCE-REF THE 
; ==>
;   XLIB:DISPLAY
; 
; note: deleting unreachable code
; 
; note: deleting unreachable code

;     (XLIB::WITH-EVENT-QUEUE-INTERNAL (XLIB:DISPLAY :TIMEOUT XLIB::TIMEOUT)
;                                    (XLIB::THREADED-LENGTH
;                                     (XLIB::DISPLAY-NEW-EVENTS XLIB:DISPLAY)
;                                     XLIB::REPLY-NEXT
;                                     XLIB::REPLY-BUFFER))
; --> LET XLIB::HOLDING-LOCK IF HANDLER-CASE BLOCK LET TAGBODY HANDLER-BIND LET 
; --> MULTIPLE-VALUE-PROG1 PROGN RETURN-FROM WITH-TIMEOUT IF > 
; ==>
;   XLIB::TIMEOUT
; 
; note: deleting unreachable code

;     (XLIB::DISPLAY-NEW-EVENTS XLIB:DISPLAY)
; --> TRULY-THE SB-KERNEL:%INSTANCE-REF THE 
; ==>
;   XLIB:DISPLAY
; 
; note: deleting unreachable code

;     (XLIB::WITH-EVENT-QUEUE-INTERNAL (XLIB:DISPLAY :TIMEOUT XLIB::TIMEOUT)
;                                    (XLIB::THREADED-LENGTH
;                                     (XLIB::DISPLAY-NEW-EVENTS XLIB:DISPLAY)
;                                     XLIB::REPLY-NEXT
;                                     XLIB::REPLY-BUFFER))
; --> LET XLIB::HOLDING-LOCK IF HANDLER-CASE BLOCK LET TAGBODY HANDLER-BIND LET 
; --> MULTIPLE-VALUE-PROG1 PROGN RETURN-FROM WITH-TIMEOUT IF LET SCHEDULE-TIMER 
; ==>
;   XLIB::TIMEOUT
; 
; note: deleting unreachable code

;     (XLIB::DISPLAY-NEW-EVENTS XLIB:DISPLAY)
; --> TRULY-THE SB-KERNEL:%INSTANCE-REF THE 
; ==>
;   XLIB:DISPLAY
; 
; note: deleting unreachable code

; compiling (DEFUN QUEUE-EVENT ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/input.lisp
; in: DEFUN QUEUE-EVENT
;     (APPLY (SVREF XLIB::*EVENT-SEND-VECTOR* XLIB::EVENT-CODE)
;          XLIB:DISPLAY
;          XLIB::ARGS)
; --> MULTIPLE-VALUE-CALL 
; ==>
;   (SB-KERNEL:%COERCE-CALLABLE-TO-FUN
;    (SVREF XLIB::*EVENT-SEND-VECTOR* XLIB::EVENT-CODE))
; 
; note: unable to
;   optimize away possible call to FDEFINITION at runtime
; due to type uncertainty:
;   The first argument is a (OR FUNCTION SYMBOL), not a FUNCTION.

; compiling (DEFUN ENQUEUE-EVENT ...)
; compiling (DEFMACRO DEFINE-EVENT ...)
; compiling (DEFINE-EVENT :KEY-PRESS ...)
; compiling (DEFINE-EVENT :KEY-RELEASE ...)
; compiling (DEFINE-EVENT :BUTTON-PRESS ...)
; compiling (DEFINE-EVENT :BUTTON-RELEASE ...)
; compiling (DEFINE-EVENT :MOTION-NOTIFY ...)
; compiling (DEFINE-EVENT :ENTER-NOTIFY ...)
; compiling (DEFINE-EVENT :LEAVE-NOTIFY ...)
; compiling (DEFINE-EVENT :FOCUS-IN ...)
; compiling (DEFINE-EVENT :FOCUS-OUT ...)
; compiling (DEFINE-EVENT :KEYMAP-NOTIFY ...)
; compiling (DEFINE-EVENT :EXPOSURE ...)
; compiling (DEFINE-EVENT :GRAPHICS-EXPOSURE ...)
; compiling (DEFINE-EVENT :NO-EXPOSURE ...)
; compiling (DEFINE-EVENT :VISIBILITY-NOTIFY ...)
; compiling (DEFINE-EVENT :CREATE-NOTIFY ...)
; compiling (DEFINE-EVENT :DESTROY-NOTIFY ...)
; compiling (DEFINE-EVENT :UNMAP-NOTIFY ...)
; compiling (DEFINE-EVENT :MAP-NOTIFY ...)
; compiling (DEFINE-EVENT :MAP-REQUEST ...)
; compiling (DEFINE-EVENT :REPARENT-NOTIFY ...)
; compiling (DEFINE-EVENT :CONFIGURE-NOTIFY ...)
; compiling (DEFINE-EVENT :CONFIGURE-REQUEST ...)
; compiling (DEFINE-EVENT :GRAVITY-NOTIFY ...)
; compiling (DEFINE-EVENT :RESIZE-REQUEST ...)
; compiling (DEFINE-EVENT :CIRCULATE-NOTIFY ...)
; compiling (DEFINE-EVENT :CIRCULATE-REQUEST ...)
; compiling (DEFINE-EVENT :PROPERTY-NOTIFY ...)
; compiling (DEFINE-EVENT :SELECTION-CLEAR ...)
; compiling (DEFINE-EVENT :SELECTION-REQUEST ...)
; compiling (DEFINE-EVENT :SELECTION-NOTIFY ...)
; compiling (DEFINE-EVENT :COLORMAP-NOTIFY ...)
; compiling (DEFINE-EVENT :CLIENT-MESSAGE ...)
; compiling (DEFINE-EVENT :MAPPING-NOTIFY ...)
; compiling (DEFMACRO DECLARE-EVENT ...)
; compiling (DEFUN CHECK-CONSISTENCY ...)
; compiling (DECLARE-EVENT (:KEY-PRESS :KEY-RELEASE ...) ...)
; compiling (DECLARE-EVENT :MOTION-NOTIFY ...)
; compiling (DECLARE-EVENT (:ENTER-NOTIFY :LEAVE-NOTIFY) ...)
; compiling (DECLARE-EVENT (:FOCUS-IN :FOCUS-OUT) ...)
; compiling (DECLARE-EVENT :KEYMAP-NOTIFY ...)
; compiling (DECLARE-EVENT :EXPOSURE ...)
; compiling (DECLARE-EVENT :GRAPHICS-EXPOSURE ...)
; compiling (DECLARE-EVENT :NO-EXPOSURE ...)
; compiling (DECLARE-EVENT :VISIBILITY-NOTIFY ...)
; compiling (DECLARE-EVENT :CREATE-NOTIFY ...)
; compiling (DECLARE-EVENT :DESTROY-NOTIFY ...)
; compiling (DECLARE-EVENT :UNMAP-NOTIFY ...)
; compiling (DECLARE-EVENT :MAP-NOTIFY ...)
; compiling (DECLARE-EVENT :MAP-REQUEST ...)
; compiling (DECLARE-EVENT :REPARENT-NOTIFY ...)
; compiling (DECLARE-EVENT :CONFIGURE-NOTIFY ...)
; compiling (DECLARE-EVENT :CONFIGURE-REQUEST ...)
; compiling (DECLARE-EVENT :GRAVITY-NOTIFY ...)
; compiling (DECLARE-EVENT :RESIZE-REQUEST ...)
; compiling (DECLARE-EVENT :CIRCULATE-NOTIFY ...)
; compiling (DECLARE-EVENT :CIRCULATE-REQUEST ...)
; compiling (DECLARE-EVENT :PROPERTY-NOTIFY ...)
; compiling (DECLARE-EVENT :SELECTION-CLEAR ...)
; compiling (DECLARE-EVENT :SELECTION-REQUEST ...)
; compiling (DECLARE-EVENT :SELECTION-NOTIFY ...)
; compiling (DECLARE-EVENT :COLORMAP-NOTIFY ...)
; compiling (DECLARE-EVENT :CLIENT-MESSAGE ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/input.lisp
; in: DECLARE-EVENT :CLIENT-MESSAGE
;     (XLIB:DECLARE-EVENT :CLIENT-MESSAGE
;                       (XLIB::DATA FORMAT)
;                       (XLIB:CARD16 SEQUENCE)
;                       (XLIB:WINDOW (XLIB:WINDOW XLIB::EVENT-WINDOW))
;                       (KEYWORD TYPE)
;                       ((XLIB::CLIENT-MESSAGE-SEQUENCE FORMAT) XLIB::DATA))
; --> XLIB::WITHIN-DEFINITION PROGN DEFUN PROGN EVAL-WHEN SB-IMPL::%DEFUN 
; --> SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION BLOCK XLIB::READING-EVENT 
; --> XLIB::WITH-BUFFER-INPUT LET LET* FUNCALL 
; --> XLIB::CLIENT-MESSAGE-SEQUENCE-GET XLIB::CLIENT-MESSAGE-EVENT-GET-SEQUENCE 
; --> LET* 
; ==>
;   (MAKE-ARRAY (CEILING 160 FORMAT) :ELEMENT-TYPE `(UNSIGNED-BYTE ,FORMAT))
; 
; note: unable to optimize because: ELEMENT-TYPE is not constant.

; --> XLIB::WITHIN-DEFINITION PROGN DEFUN PROGN EVAL-WHEN SB-IMPL::%DEFUN 
; --> SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION BLOCK XLIB::READING-EVENT 
; --> XLIB::WITH-BUFFER-INPUT LET LET* FUNCALL 
; --> XLIB::CLIENT-MESSAGE-SEQUENCE-GET XLIB::CLIENT-MESSAGE-EVENT-GET-SEQUENCE 
; --> LET* DO BLOCK LET TAGBODY TAGBODY CASE LET COND IF PROGN SETF 
; --> SB-KERNEL:%ASET LET* 
; ==>
;   (SB-KERNEL:HAIRY-DATA-VECTOR-SET ARRAY SB-INT:INDEX SB-C::NEW-VALUE)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a (SIMPLE-ARRAY * (*)), not a SIMPLE-STRING.
; 
; note: unable to
;   avoid runtime dispatch on array element type
; because:
;   Upgraded element type of array is not known at compile time.

; --> XLIB::WITHIN-DEFINITION PROGN DEFUN PROGN EVAL-WHEN SB-IMPL::%DEFUN 
; --> SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION BLOCK XLIB::READING-EVENT 
; --> XLIB::WITH-BUFFER-INPUT LET LET* FUNCALL 
; --> XLIB::CLIENT-MESSAGE-SEQUENCE-GET XLIB::CLIENT-MESSAGE-EVENT-GET-SEQUENCE 
; --> LET* DO BLOCK LET TAGBODY TAGBODY CASE LET COND IF COND IF PROGN SETF 
; --> SB-KERNEL:%ASET LET* 
; ==>
;   (SB-KERNEL:HAIRY-DATA-VECTOR-SET ARRAY SB-INT:INDEX SB-C::NEW-VALUE)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a (SIMPLE-ARRAY * (*)), not a SIMPLE-STRING.
; 
; note: unable to
;   avoid runtime dispatch on array element type
; because:
;   Upgraded element type of array is not known at compile time.

; --> XLIB::WITHIN-DEFINITION PROGN DEFUN PROGN EVAL-WHEN SB-IMPL::%DEFUN 
; --> SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION BLOCK XLIB::READING-EVENT 
; --> XLIB::WITH-BUFFER-INPUT LET LET* FUNCALL 
; --> XLIB::CLIENT-MESSAGE-SEQUENCE-GET XLIB::CLIENT-MESSAGE-EVENT-GET-SEQUENCE 
; --> LET* DO BLOCK LET TAGBODY TAGBODY CASE LET COND IF COND IF COND IF PROGN 
; --> SETF SB-KERNEL:%ASET LET* 
; ==>
;   (SB-KERNEL:HAIRY-DATA-VECTOR-SET ARRAY SB-INT:INDEX SB-C::NEW-VALUE)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a (SIMPLE-ARRAY * (*)), not a SIMPLE-STRING.
; 
; note: unable to
;   avoid runtime dispatch on array element type
; because:
;   Upgraded element type of array is not known at compile time.

; --> XLIB::WITHIN-DEFINITION PROGN DEFUN PROGN EVAL-WHEN SB-IMPL::%DEFUN 
; --> SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION BLOCK 
; --> XLIB::WITH-BUFFER-OUTPUT LET LET* XLIB::CLIENT-MESSAGE-SEQUENCE-PUT 
; --> XLIB::CLIENT-MESSAGE-EVENT-PUT-SEQUENCE ECASE LET COND IF PROGN 
; --> XLIB::SEQUENCE-PUT XLIB::WRITE-SEQUENCE-CARD8 MIN LET 
; ==>
;   (LENGTH XLIB::DATA)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a VECTOR.

; --> XLIB::WITHIN-DEFINITION PROGN DEFUN PROGN EVAL-WHEN SB-IMPL::%DEFUN 
; --> SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION BLOCK 
; --> XLIB::WITH-BUFFER-OUTPUT LET LET* XLIB::CLIENT-MESSAGE-SEQUENCE-PUT 
; --> XLIB::CLIENT-MESSAGE-EVENT-PUT-SEQUENCE ECASE LET COND IF COND IF PROGN 
; --> XLIB::SEQUENCE-PUT XLIB::WRITE-SEQUENCE-CARD16 MIN LET 
; ==>
;   (LENGTH XLIB::DATA)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a VECTOR.

; --> XLIB::WITHIN-DEFINITION PROGN DEFUN PROGN EVAL-WHEN SB-IMPL::%DEFUN 
; --> SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION BLOCK 
; --> XLIB::WITH-BUFFER-OUTPUT LET LET* XLIB::CLIENT-MESSAGE-SEQUENCE-PUT 
; --> XLIB::CLIENT-MESSAGE-EVENT-PUT-SEQUENCE ECASE LET COND IF COND IF COND IF 
; --> PROGN XLIB::SEQUENCE-PUT XLIB::WRITE-SEQUENCE-CARD32 MIN LET 
; ==>
;   (LENGTH XLIB::DATA)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a VECTOR.

; compiling (DECLARE-EVENT :MAPPING-NOTIFY ...)
; compiling (DEFUN EVENT-LOOP-SETUP ...)
; compiling (DEFUN EVENT-LOOP-STEP-BEFORE ...)
; compiling (DEFUN DEQUEUE-EVENT ...)
; compiling (DEFUN EVENT-LOOP-STEP-AFTER ...)
; compiling (DEFMACRO EVENT-LOOP ...)
; compiling (DEFUN DISCARD-CURRENT-EVENT ...)
; compiling (DEFUN PROCESS-EVENT ...)
; compiling (DEFUN MAKE-EVENT-HANDLERS ...)
; compiling (DEFUN EVENT-HANDLER ...)
; compiling (DEFUN SET-EVENT-HANDLER ...)
; compiling (DEFSETF EVENT-HANDLER ...)
; compiling (DEFMACRO EVENT-CASE ...)
; compiling (DEFMACRO EVENT-COND ...)
; compiling (DEFUN GET-EVENT-CODE ...)
; compiling (DEFUN UNIVERSAL-EVENT-GET-MACRO ...)
; compiling (DEFMACRO EVENT-DISPATCH ...)
; compiling (DEFMACRO BINDING-EVENT-VALUES ...)
; compiling (DEFPARAMETER *XERROR-VECTOR* ...)
; compiling (DEFUN MAKE-ERROR ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/input.lisp
; in: DEFUN MAKE-ERROR
;     (FUNCALL XLIB::ERROR-DECODE-FUNCTION XLIB:DISPLAY XLIB::EVENT)
; --> SB-C::%FUNCALL THE 
; ==>
;   (SB-KERNEL:%COERCE-CALLABLE-TO-FUN FUNCTION)
; 
; note: unable to
;   optimize away possible call to FDEFINITION at runtime
; due to type uncertainty:
;   The first argument is a (OR FUNCTION SYMBOL), not a FUNCTION.

; compiling (DEFUN REPORT-ERROR ...)
; compiling (DEFUN REQUEST-NAME ...)
; compiling (DEFUN REPORT-REQUEST-ERROR ...)
; compiling (DEFINE-CONDITION REQUEST-ERROR ...)
; compiling (DEFINE-CONDITION RESOURCE-ERROR ...)
; compiling (DEFINE-CONDITION UNKNOWN-ERROR ...)
; compiling (DEFINE-CONDITION ACCESS-ERROR ...)
; compiling (DEFINE-CONDITION ALLOC-ERROR ...)
; compiling (DEFINE-CONDITION ATOM-ERROR ...)
; compiling (DEFINE-CONDITION COLORMAP-ERROR ...)
; compiling (DEFINE-CONDITION CURSOR-ERROR ...)
; compiling (DEFINE-CONDITION DRAWABLE-ERROR ...)
; compiling (DEFINE-CONDITION FONT-ERROR ...)
; compiling (DEFINE-CONDITION GCONTEXT-ERROR ...)
; compiling (DEFINE-CONDITION ID-CHOICE-ERROR ...)
; compiling (DEFINE-CONDITION ILLEGAL-REQUEST-ERROR ...)
; compiling (DEFINE-CONDITION LENGTH-ERROR ...)
; compiling (DEFINE-CONDITION MATCH-ERROR ...)
; compiling (DEFINE-CONDITION NAME-ERROR ...)
; compiling (DEFINE-CONDITION PIXMAP-ERROR ...)
; compiling (DEFINE-CONDITION VALUE-ERROR ...)
; compiling (DEFINE-CONDITION WINDOW-ERROR ...)
; compiling (DEFINE-CONDITION IMPLEMENTATION-ERROR ...)
; compiling (DEFINE-CONDITION X-TYPE-ERROR ...)
; compiling (DEFINE-CONDITION CLOSED-DISPLAY ...)
; compiling (DEFINE-CONDITION LOOKUP-ERROR ...)
; compiling (DEFINE-CONDITION CONNECTION-FAILURE ...)
; compiling (DEFINE-CONDITION REPLY-LENGTH-ERROR ...)
; compiling (DEFINE-CONDITION REPLY-TIMEOUT ...)
; compiling (DEFINE-CONDITION SEQUENCE-ERROR ...)
; compiling (DEFINE-CONDITION UNEXPECTED-REPLY ...)
; compiling (DEFINE-CONDITION MISSING-PARAMETER ...)
; compiling (DEFINE-CONDITION INVALID-FONT ...)
; compiling (DEFINE-CONDITION DEVICE-BUSY ...)
; compiling (DEFINE-CONDITION UNIMPLEMENTED-EVENT ...)
; compiling (DEFINE-CONDITION UNDEFINED-EVENT ...)
; compiling (DEFINE-CONDITION ABSENT-EXTENSION ...)
; compiling (DEFINE-CONDITION INCONSISTENT-PARAMETERS ...)
; compiling (DEFUN GET-ERROR-KEY ...)
; compiling (DEFMACRO DEFINE-ERROR ...)
; compiling (DEFUN DECODE-CORE-ERROR ...)
; compiling (DEFUN DECODE-RESOURCE-ERROR ...)
; compiling (DEFINE-ERROR UNKNOWN-ERROR ...)
; compiling (DEFINE-ERROR REQUEST-ERROR ...)
; compiling (DEFINE-ERROR VALUE-ERROR ...)
; compiling (DEFINE-ERROR WINDOW-ERROR ...)
; compiling (DEFINE-ERROR PIXMAP-ERROR ...)
; compiling (DEFINE-ERROR ATOM-ERROR ...)
; compiling (DEFINE-ERROR CURSOR-ERROR ...)
; compiling (DEFINE-ERROR FONT-ERROR ...)
; compiling (DEFINE-ERROR MATCH-ERROR ...)
; compiling (DEFINE-ERROR DRAWABLE-ERROR ...)
; compiling (DEFINE-ERROR ACCESS-ERROR ...)
; compiling (DEFINE-ERROR ALLOC-ERROR ...)
; compiling (DEFINE-ERROR COLORMAP-ERROR ...)
; compiling (DEFINE-ERROR GCONTEXT-ERROR ...)
; compiling (DEFINE-ERROR ID-CHOICE-ERROR ...)
; compiling (DEFINE-ERROR NAME-ERROR ...)
; compiling (DEFINE-ERROR LENGTH-ERROR ...)
; compiling (DEFINE-ERROR IMPLEMENTATION-ERROR ...)

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/input.fasl written
; compilation finished in 0:00:13
STYLE-WARNING: redefining CANONICALIZE-EVENT-NAME in DEFUN
STYLE-WARNING: redefining ALLOCATE-EXTENSION-EVENT-CODE in DEFUN
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/requests.lisp" (written 14 JUL 2005 09:24:44 AM):
; compiling (IN-PACKAGE :XLIB)
; compiling (DEFUN CREATE-WINDOW ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/requests.lisp
; in: DEFUN CREATE-WINDOW
;     (XLIB::X-TYPE-ERROR XLIB::BACKGROUND
;                       '(OR NULL
;                            (MEMBER :NONE :PARENT-RELATIVE)
;                            INTEGER
;                            XLIB:PIXMAP))
; ==>
;   XLIB::BACKGROUND
; 
; note: deleting unreachable code

;     '(OR NULL (MEMBER :COPY) INTEGER XLIB:PIXMAP)
; 
; note: deleting unreachable code

;     '(OR NULL (MEMBER :NONE :PARENT-RELATIVE) INTEGER XLIB:PIXMAP)
; 
; note: deleting unreachable code

;     (XLIB::X-TYPE-ERROR XLIB::BORDER
;                       '(OR NULL (MEMBER :COPY) INTEGER XLIB:PIXMAP))
; ==>
;   XLIB::BORDER
; 
; note: deleting unreachable code

;     (XLIB::WITH-BUFFER-REQUEST (XLIB:DISPLAY XLIB::+X-CREATEWINDOW+)
;                              (XLIB::DATA XLIB::DEPTH)
;                              (XLIB:RESOURCE-ID XLIB::WID)
;                              (XLIB:WINDOW XLIB::PARENT)
;                              (XLIB:INT16 XLIB::X XLIB::Y)
;                              (XLIB:CARD16 XLIB::WIDTH
;                                           XLIB::HEIGHT
;                                           XLIB::BORDER-WIDTH)
;                              ((XLIB::MEMBER16 :COPY :INPUT-OUTPUT :INPUT-ONLY)
;                               CLASS)
;                              (XLIB:RESOURCE-ID
;                               (COND ((EQ XLIB::VISUAL :COPY) 0)
;                                     ((TYPEP XLIB::VISUAL 'XLIB:RESOURCE-ID)
;                                      XLIB::VISUAL)
;                                     (T (XLIB:VISUAL-INFO-ID XLIB::VISUAL))))
;                              (XLIB::MASK
;                               (XLIB:CARD32 XLIB::BACK-PIXMAP
;                                            XLIB::BACK-PIXEL
;                                            XLIB::BORDER-PIXMAP
;                                            XLIB::BORDER-PIXEL)
;                               ((XLIB::MEMBER-VECTOR XLIB::+BIT-GRAVITY-VECTOR+)
;                                XLIB:BIT-GRAVITY)
;                               ((XLIB::MEMBER-VECTOR XLIB::+WIN-GRAVITY-VECTOR+)
;                                XLIB::GRAVITY)
;                               ((MEMBER :NOT-USEFUL :WHEN-MAPPED :ALWAYS)
;                                XLIB::BACKING-STORE)
;                               (XLIB:CARD32 XLIB::BACKING-PLANES
;                                            XLIB::BACKING-PIXEL)
;                               ((MEMBER :OFF :ON) XLIB::OVERRIDE-REDIRECT
;                                XLIB::SAVE-UNDER)
;                               (XLIB:CARD32 XLIB:EVENT-MASK
;                                            XLIB::DO-NOT-PROPAGATE-MASK)
;                               ((OR (MEMBER :COPY) XLIB:COLORMAP) XLIB:COLORMAP)
;                               ((OR (MEMBER :NONE) XLIB:CURSOR) XLIB:CURSOR)))
; --> LET XLIB::WITH-BUFFER MACROLET LET XLIB::HOLDING-LOCK 
; --> SB-THREAD:WITH-RECURSIVE-LOCK LOCALLY MULTIPLE-VALUE-PROG1 
; --> XLIB::WITHOUT-ABORTS PROGN XLIB::WITH-BUFFER-REQUEST-INTERNAL 
; --> XLIB::WITH-BUFFER-OUTPUT LET LET* LET UNLESS COND IF PROGN SETQ THE 
; ==>
;   (LOGIOR XLIB::%MASK 2)
; 
; note: forced to do static-fun Two-arg-ior (cost 53)
;       unable to do inline fixnum logical op (cost 1) because:
;       The first argument is a INTEGER, not a FIXNUM.
;       The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
;       unable to do inline (unsigned-byte 32) logical op (cost 2) because:
;       The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
;       The result is a (VALUES INTEGER
;                               &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 32)
;                                                         &REST
;                                                         T).
;       etc.

; ==>
;   (LOGIOR XLIB::%MASK 4)
; 
; note: forced to do static-fun Two-arg-ior (cost 53)
;       unable to do inline fixnum logical op (cost 1) because:
;       The first argument is a INTEGER, not a FIXNUM.
;       The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
;       unable to do inline (unsigned-byte 32) logical op (cost 2) because:
;       The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
;       The result is a (VALUES INTEGER
;                               &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 32)
;                                                         &REST
;                                                         T).
;       etc.

; ==>
;   (LOGIOR XLIB::%MASK 8)
; 
; note: forced to do static-fun Two-arg-ior (cost 53)
;       unable to do inline fixnum logical op (cost 1) because:
;       The first argument is a INTEGER, not a FIXNUM.
;       The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
;       unable to do inline (unsigned-byte 32) logical op (cost 2) because:
;       The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
;       The result is a (VALUES INTEGER
;                               &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 32)
;                                                         &REST
;                                                         T).
;       etc.

; ==>
;   (LOGIOR XLIB::%MASK 16)
; 
; note: forced to do static-fun Two-arg-ior (cost 53)
;       unable to do inline fixnum logical op (cost 1) because:
;       The first argument is a INTEGER, not a FIXNUM.
;       The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
;       unable to do inline (unsigned-byte 32) logical op (cost 2) because:
;       The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
;       The result is a (VALUES INTEGER
;                               &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 32)
;                                                         &REST
;                                                         T).
;       etc.

; ==>
;   (LOGIOR XLIB::%MASK 32)
; 
; note: forced to do static-fun Two-arg-ior (cost 53)
;       unable to do inline fixnum logical op (cost 1) because:
;       The first argument is a INTEGER, not a FIXNUM.
;       The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
;       unable to do inline (unsigned-byte 32) logical op (cost 2) because:
;       The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
;       The result is a (VALUES INTEGER
;                               &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 32)
;                                                         &REST
;                                                         T).
;       etc.

; ==>
;   (LOGIOR XLIB::%MASK 64)
; 
; note: forced to do static-fun Two-arg-ior (cost 53)
;       unable to do inline fixnum logical op (cost 1) because:
;       The first argument is a INTEGER, not a FIXNUM.
;       The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
;       unable to do inline (unsigned-byte 32) logical op (cost 2) because:
;       The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
;       The result is a (VALUES INTEGER
;                               &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 32)
;                                                         &REST
;                                                         T).
;       etc.

; ==>
;   (LOGIOR XLIB::%MASK 128)
; 
; note: forced to do static-fun Two-arg-ior (cost 53)
;       unable to do inline fixnum logical op (cost 1) because:
;       The first argument is a INTEGER, not a FIXNUM.
;       The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
;       unable to do inline (unsigned-byte 32) logical op (cost 2) because:
;       The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
;       The result is a (VALUES INTEGER
;                               &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 32)
;                                                         &REST
;                                                         T).
;       etc.

; ==>
;   (LOGIOR XLIB::%MASK 256)
; 
; note: forced to do static-fun Two-arg-ior (cost 53)
;       unable to do inline fixnum logical op (cost 1) because:
;       The first argument is a INTEGER, not a FIXNUM.
;       The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
;       unable to do inline (unsigned-byte 32) logical op (cost 2) because:
;       The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
;       The result is a (VALUES INTEGER
;                               &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 32)
;                                                         &REST
;                                                         T).
;       etc.

; ==>
;   (LOGIOR XLIB::%MASK 512)
; 
; note: forced to do static-fun Two-arg-ior (cost 53)
;       unable to do inline fixnum logical op (cost 1) because:
;       The first argument is a INTEGER, not a FIXNUM.
;       The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
;       unable to do inline (unsigned-byte 32) logical op (cost 2) because:
;       The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
;       The result is a (VALUES INTEGER
;                               &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 32)
;                                                         &REST
;                                                         T).
;       etc.

; ==>
;   (LOGIOR XLIB::%MASK 1024)
; 
; note: forced to do static-fun Two-arg-ior (cost 53)
;       unable to do inline fixnum logical op (cost 1) because:
;       The first argument is a INTEGER, not a FIXNUM.
;       The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
;       unable to do inline (unsigned-byte 32) logical op (cost 2) because:
;       The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
;       The result is a (VALUES INTEGER
;                               &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 32)
;                                                         &REST
;                                                         T).
;       etc.

; ==>
;   (LOGIOR XLIB::%MASK 2048)
; 
; note: forced to do static-fun Two-arg-ior (cost 53)
;       unable to do inline fixnum logical op (cost 1) because:
;       The first argument is a INTEGER, not a FIXNUM.
;       The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
;       unable to do inline (unsigned-byte 32) logical op (cost 2) because:
;       The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
;       The result is a (VALUES INTEGER
;                               &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 32)
;                                                         &REST
;                                                         T).
;       etc.

; ==>
;   (LOGIOR XLIB::%MASK 4096)
; 
; note: forced to do static-fun Two-arg-ior (cost 53)
;       unable to do inline fixnum logical op (cost 1) because:
;       The first argument is a INTEGER, not a FIXNUM.
;       The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
;       unable to do inline (unsigned-byte 32) logical op (cost 2) because:
;       The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
;       The result is a (VALUES INTEGER
;                               &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 32)
;                                                         &REST
;                                                         T).
;       etc.

; ==>
;   (LOGIOR XLIB::%MASK 8192)
; 
; note: forced to do static-fun Two-arg-ior (cost 53)
;       unable to do inline fixnum logical op (cost 1) because:
;       The first argument is a INTEGER, not a FIXNUM.
;       The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
;       unable to do inline (unsigned-byte 32) logical op (cost 2) because:
;       The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
;       The result is a (VALUES INTEGER
;                               &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 32)
;                                                         &REST
;                                                         T).
;       etc.

; ==>
;   (LOGIOR XLIB::%MASK 16384)
; 
; note: forced to do static-fun Two-arg-ior (cost 53)
;       unable to do inline fixnum logical op (cost 1) because:
;       The first argument is a INTEGER, not a FIXNUM.
;       The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
;       unable to do inline (unsigned-byte 32) logical op (cost 2) because:
;       The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
;       The result is a (VALUES INTEGER
;                               &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 32)
;                                                         &REST
;                                                         T).
;       etc.

; compiling (DEFUN DESTROY-WINDOW ...)
; compiling (DEFUN DESTROY-SUBWINDOWS ...)
; compiling (DEFUN ADD-TO-SAVE-SET ...)
; compiling (DEFUN REMOVE-FROM-SAVE-SET ...)
; compiling (DEFUN REPARENT-WINDOW ...)
; compiling (DEFUN MAP-WINDOW ...)
; compiling (DEFUN MAP-SUBWINDOWS ...)
; compiling (DEFUN UNMAP-WINDOW ...)
; compiling (DEFUN UNMAP-SUBWINDOWS ...)
; compiling (DEFUN CIRCULATE-WINDOW-UP ...)
; compiling (DEFUN CIRCULATE-WINDOW-DOWN ...)
; compiling (DEFUN QUERY-TREE ...)
; compiling (DEFUN INTERN-ATOM ...)
; compiling (DEFUN FIND-ATOM ...)
; compiling (DEFUN ATOM-NAME ...)
; compiling (DEFUN LOOKUP-XATOM ...)
; compiling (DEFUN CHANGE-PROPERTY ...)
; compiling (DEFUN DELETE-PROPERTY ...)
; compiling (DEFUN GET-PROPERTY ...)
; compiling (DEFUN ROTATE-PROPERTIES ...)
; compiling (DEFUN LIST-PROPERTIES ...)
; compiling (DEFUN SELECTION-OWNER ...)
; compiling (DEFUN SET-SELECTION-OWNER ...)
; compiling (DEFSETF SELECTION-OWNER ...)
; compiling (DEFUN CONVERT-SELECTION ...)
; compiling (DEFUN SEND-EVENT ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/requests.lisp
; in: DEFUN SEND-EVENT
;     (APPLY (SVREF XLIB::*EVENT-SEND-VECTOR* XLIB::INTERNAL-EVENT-CODE)
;          XLIB:DISPLAY
;          XLIB::ARGS)
; --> MULTIPLE-VALUE-CALL 
; ==>
;   (SB-KERNEL:%COERCE-CALLABLE-TO-FUN
;    (SVREF XLIB::*EVENT-SEND-VECTOR* XLIB::INTERNAL-EVENT-CODE))
; 
; note: unable to
;   optimize away possible call to FDEFINITION at runtime
; due to type uncertainty:
;   The first argument is a (OR FUNCTION SYMBOL), not a FUNCTION.

; compiling (DEFUN GRAB-POINTER ...)
; compiling (DEFUN UNGRAB-POINTER ...)
; compiling (DEFUN GRAB-BUTTON ...)
; compiling (DEFUN UNGRAB-BUTTON ...)
; compiling (DEFUN CHANGE-ACTIVE-POINTER-GRAB ...)
; compiling (DEFUN GRAB-KEYBOARD ...)
; compiling (DEFUN UNGRAB-KEYBOARD ...)
; compiling (DEFUN GRAB-KEY ...)
; compiling (DEFUN UNGRAB-KEY ...)
; compiling (DEFUN ALLOW-EVENTS ...)
; compiling (DEFUN GRAB-SERVER ...)
; compiling (DEFUN UNGRAB-SERVER ...)
; compiling (DEFMACRO WITH-SERVER-GRABBED ...)
; compiling (DEFUN QUERY-POINTER ...)
; compiling (DEFUN POINTER-POSITION ...)
; compiling (DEFUN GLOBAL-POINTER-POSITION ...)
; compiling (DEFUN MOTION-EVENTS ...)
; compiling (DEFUN TRANSLATE-COORDINATES ...)
; compiling (DEFUN WARP-POINTER ...)
; compiling (DEFUN WARP-POINTER-RELATIVE ...)
; compiling (DEFUN WARP-POINTER-IF-INSIDE ...)
; compiling (DEFUN WARP-POINTER-RELATIVE-IF-INSIDE ...)
; compiling (DEFUN SET-INPUT-FOCUS ...)
; compiling (DEFUN INPUT-FOCUS ...)
; compiling (DEFUN QUERY-KEYMAP ...)
; compiling (DEFUN CREATE-PIXMAP ...)
; compiling (DEFUN FREE-PIXMAP ...)
; compiling (DEFUN CLEAR-AREA ...)
; compiling (DEFUN COPY-AREA ...)
; compiling (DEFUN COPY-PLANE ...)
; compiling (DEFUN CREATE-COLORMAP ...)
; compiling (DEFUN FREE-COLORMAP ...)
; compiling (DEFUN COPY-COLORMAP-AND-FREE ...)
; compiling (DEFUN INSTALL-COLORMAP ...)
; compiling (DEFUN UNINSTALL-COLORMAP ...)
; compiling (DEFUN INSTALLED-COLORMAPS ...)
; compiling (DEFUN ALLOC-COLOR ...)
; compiling (DEFUN ALLOC-COLOR-CELLS ...)
; compiling (DEFUN ALLOC-COLOR-PLANES ...)
; compiling (DEFUN FREE-COLORS ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/requests.lisp
; in: DEFUN FREE-COLORS
;     (XLIB::WITH-BUFFER-REQUEST
;    ((XLIB:COLORMAP-DISPLAY XLIB:COLORMAP) XLIB::+X-FREECOLORS+)
;    (XLIB:COLORMAP XLIB:COLORMAP)
;    (XLIB:CARD32 XLIB::PLANE-MASK)
;    (SEQUENCE XLIB::PIXELS))
; --> LET XLIB::WITH-BUFFER MACROLET LET XLIB::HOLDING-LOCK 
; --> SB-THREAD:WITH-RECURSIVE-LOCK LOCALLY MULTIPLE-VALUE-PROG1 
; --> XLIB::WITHOUT-ABORTS PROGN XLIB::WITH-BUFFER-REQUEST-INTERNAL 
; --> XLIB::WITH-BUFFER-OUTPUT LET LET* XLIB::CHECK-PUT XLIB::SEQUENCE-PUT LET 
; ==>
;   (LENGTH XLIB::PIXELS)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a VECTOR.

; compiling (DEFUN STORE-COLOR ...)
; compiling (DEFUN STORE-COLORS ...)
; compiling (DEFUN QUERY-COLORS ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/requests.lisp
; in: DEFUN QUERY-COLORS
;     (XLIB::WITH-BUFFER-REQUEST-AND-REPLY
;    (XLIB:DISPLAY XLIB::+X-QUERYCOLORS+ NIL :SIZES (8 16))
;    ((XLIB:COLORMAP XLIB:COLORMAP) (SEQUENCE XLIB::PIXELS))
;    (LET ((SEQUENCE (MAKE-SEQUENCE XLIB::RESULT-TYPE #)))
;      (XLIB::ADVANCE-BUFFER-OFFSET XLIB::+REPLYSIZE+)
;      (DOTIMES (XLIB::I (LENGTH SEQUENCE) SEQUENCE)
;        (SETF (ELT SEQUENCE XLIB::I) (XLIB:MAKE-COLOR :RED # :GREEN # :BLUE #))
;        (XLIB::ADVANCE-BUFFER-OFFSET 8))))
; --> LET UNWIND-PROTECT FLET BLOCK MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> BLOCK SB-C::%WITHIN-CLEANUP RETURN-FROM PROGN XLIB::WITH-BUFFER MACROLET 
; --> LET XLIB::HOLDING-LOCK SB-THREAD:WITH-RECURSIVE-LOCK LOCALLY 
; --> XLIB::WITHOUT-ABORTS PROGN XLIB::WITH-BUFFER-REQUEST-INTERNAL 
; --> XLIB::WITH-BUFFER-OUTPUT LET LET* XLIB::CHECK-PUT XLIB::SEQUENCE-PUT LET 
; ==>
;   (LENGTH XLIB::PIXELS)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a VECTOR.

;     (LENGTH SEQUENCE)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a (OR CONS
;                               NULL
;                               (SIMPLE-ARRAY * (*))), not a (SIMPLE-ARRAY * (*)).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a (OR CONS NULL (SIMPLE-ARRAY * (*))), not a VECTOR.

;     (SETF (ELT SEQUENCE XLIB::I)
;           (XLIB:MAKE-COLOR :RED
;                            (XLIB::RGB-VAL-GET 0)
;                            :GREEN
;                            (XLIB::RGB-VAL-GET 2)
;                            :BLUE
;                            (XLIB::RGB-VAL-GET 4)))
; ==>
;   (SB-KERNEL:%SETELT SEQUENCE
;                      XLIB::I
;                      (XLIB:MAKE-COLOR :RED
;                                       (XLIB::RGB-VAL-GET 0)
;                                       :GREEN
;                                       (XLIB::RGB-VAL-GET 2)
;                                       :BLUE
;                                       (XLIB::RGB-VAL-GET 4)))
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a (OR CONS
;                               NULL
;                               (SIMPLE-ARRAY * (*))), not a (SIMPLE-ARRAY * (*)).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a (OR CONS NULL (SIMPLE-ARRAY * (*))), not a LIST.

; compiling (DEFUN LOOKUP-COLOR ...)
; compiling (DEFUN CREATE-CURSOR ...)
; compiling (DEFUN CREATE-GLYPH-CURSOR ...)
; compiling (DEFUN FREE-CURSOR ...)
; compiling (DEFUN RECOLOR-CURSOR ...)
; compiling (DEFUN QUERY-BEST-CURSOR ...)
; compiling (DEFUN QUERY-BEST-TILE ...)
; compiling (DEFUN QUERY-BEST-STIPPLE ...)
; compiling (DEFUN QUERY-EXTENSION ...)
; compiling (DEFUN LIST-EXTENSIONS ...)
; compiling (DEFUN CHANGE-KEYBOARD-CONTROL ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/requests.lisp
; in: DEFUN CHANGE-KEYBOARD-CONTROL
;     (XLIB::WITH-BUFFER-REQUEST
;    (XLIB:DISPLAY XLIB::+X-CHANGEKEYBOARDCONTROL+ :SIZES (32))
;    (XLIB::MASK
;     (INTEGER XLIB::KEY-CLICK-PERCENT
;              XLIB::BELL-PERCENT
;              XLIB::BELL-PITCH
;              XLIB::BELL-DURATION)
;     (XLIB:CARD32 XLIB::LED)
;     ((MEMBER :OFF :ON) XLIB::LED-MODE)
;     (XLIB:CARD32 XLIB::KEY)
;     ((MEMBER :OFF :ON :DEFAULT) XLIB::AUTO-REPEAT-MODE)))
; --> LET XLIB::WITH-BUFFER MACROLET LET XLIB::HOLDING-LOCK 
; --> SB-THREAD:WITH-RECURSIVE-LOCK LOCALLY MULTIPLE-VALUE-PROG1 
; --> XLIB::WITHOUT-ABORTS PROGN XLIB::WITH-BUFFER-REQUEST-INTERNAL 
; --> XLIB::WITH-BUFFER-OUTPUT LET LET* LET UNLESS COND IF PROGN SETQ THE 
; ==>
;   (LOGIOR XLIB::%MASK 2)
; 
; note: forced to do static-fun Two-arg-ior (cost 53)
;       unable to do inline fixnum logical op (cost 1) because:
;       The first argument is a INTEGER, not a FIXNUM.
;       The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
;       unable to do inline (unsigned-byte 32) logical op (cost 2) because:
;       The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
;       The result is a (VALUES INTEGER
;                               &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 32)
;                                                         &REST
;                                                         T).
;       etc.

; ==>
;   (LOGIOR XLIB::%MASK 4)
; 
; note: forced to do static-fun Two-arg-ior (cost 53)
;       unable to do inline fixnum logical op (cost 1) because:
;       The first argument is a INTEGER, not a FIXNUM.
;       The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
;       unable to do inline (unsigned-byte 32) logical op (cost 2) because:
;       The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
;       The result is a (VALUES INTEGER
;                               &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 32)
;                                                         &REST
;                                                         T).
;       etc.

; ==>
;   (LOGIOR XLIB::%MASK 8)
; 
; note: forced to do static-fun Two-arg-ior (cost 53)
;       unable to do inline fixnum logical op (cost 1) because:
;       The first argument is a INTEGER, not a FIXNUM.
;       The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
;       unable to do inline (unsigned-byte 32) logical op (cost 2) because:
;       The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
;       The result is a (VALUES INTEGER
;                               &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 32)
;                                                         &REST
;                                                         T).
;       etc.

; ==>
;   (LOGIOR XLIB::%MASK 16)
; 
; note: forced to do static-fun Two-arg-ior (cost 53)
;       unable to do inline fixnum logical op (cost 1) because:
;       The first argument is a INTEGER, not a FIXNUM.
;       The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
;       unable to do inline (unsigned-byte 32) logical op (cost 2) because:
;       The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
;       The result is a (VALUES INTEGER
;                               &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 32)
;                                                         &REST
;                                                         T).
;       etc.

; ==>
;   (LOGIOR XLIB::%MASK 32)
; 
; note: forced to do static-fun Two-arg-ior (cost 53)
;       unable to do inline fixnum logical op (cost 1) because:
;       The first argument is a INTEGER, not a FIXNUM.
;       The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
;       unable to do inline (unsigned-byte 32) logical op (cost 2) because:
;       The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
;       The result is a (VALUES INTEGER
;                               &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 32)
;                                                         &REST
;                                                         T).
;       etc.

; ==>
;   (LOGIOR XLIB::%MASK 64)
; 
; note: forced to do static-fun Two-arg-ior (cost 53)
;       unable to do inline fixnum logical op (cost 1) because:
;       The first argument is a INTEGER, not a FIXNUM.
;       The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
;       unable to do inline (unsigned-byte 32) logical op (cost 2) because:
;       The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
;       The result is a (VALUES INTEGER
;                               &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 32)
;                                                         &REST
;                                                         T).
;       etc.

; ==>
;   (LOGIOR XLIB::%MASK 128)
; 
; note: forced to do static-fun Two-arg-ior (cost 53)
;       unable to do inline fixnum logical op (cost 1) because:
;       The first argument is a INTEGER, not a FIXNUM.
;       The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
;       unable to do inline (unsigned-byte 32) logical op (cost 2) because:
;       The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
;       The result is a (VALUES INTEGER
;                               &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 32)
;                                                         &REST
;                                                         T).
;       etc.

; compiling (DEFUN KEYBOARD-CONTROL ...)
; compiling (DEFUN BELL ...)
; compiling (DEFUN POINTER-MAPPING ...)
; compiling (DEFUN SET-POINTER-MAPPING ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/requests.lisp
; in: DEFUN SET-POINTER-MAPPING
;     (LENGTH MAP)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a VECTOR.

;     (XLIB::WITH-BUFFER-REQUEST-AND-REPLY
;    (XLIB:DISPLAY XLIB::+X-SETPOINTERMAPPING+ 2 :SIZES 8)
;    ((XLIB::DATA (LENGTH MAP)) ((SEQUENCE :FORMAT XLIB:CARD8) MAP))
;    (VALUES (XLIB::BOOLEAN-GET 1)))
; --> LET UNWIND-PROTECT FLET BLOCK MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> BLOCK SB-C::%WITHIN-CLEANUP RETURN-FROM PROGN XLIB::WITH-BUFFER MACROLET 
; --> LET XLIB::HOLDING-LOCK SB-THREAD:WITH-RECURSIVE-LOCK LOCALLY 
; --> XLIB::WITHOUT-ABORTS PROGN XLIB::WITH-BUFFER-REQUEST-INTERNAL 
; --> XLIB::WITH-BUFFER-OUTPUT LET LET* XLIB::CHECK-PUT XLIB::SEQUENCE-PUT LET 
; ==>
;   (LENGTH MAP)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a VECTOR.

; compiling (DEFSETF POINTER-MAPPING ...)
; compiling (DEFUN CHANGE-POINTER-CONTROL ...)
; compiling (DEFUN POINTER-CONTROL ...)
; compiling (DEFUN SET-SCREEN-SAVER ...)
; compiling (DEFUN SCREEN-SAVER ...)
; compiling (DEFUN ACTIVATE-SCREEN-SAVER ...)
; compiling (DEFUN RESET-SCREEN-SAVER ...)
; compiling (DEFUN ADD-ACCESS-HOST ...)
; compiling (DEFUN REMOVE-ACCESS-HOST ...)
; compiling (DEFUN CHANGE-ACCESS-HOST ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/requests.lisp
; in: DEFUN CHANGE-ACCESS-HOST
;     (LENGTH XLIB::ADDRESS)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a VECTOR.

;     (XLIB::WITH-BUFFER-REQUEST (XLIB:DISPLAY XLIB::+X-CHANGEHOSTS+)
;                              ((XLIB::DATA BOOLEAN) XLIB::REMOVE-P)
;                              (XLIB:CARD8
;                               (XLIB::ENCODE-TYPE
;                                (OR NULL
;                                    (MEMBER :INTERNET :DECNET :CHAOS)
;                                    XLIB:CARD32)
;                                XLIB::FAMILY))
;                              (XLIB:CARD16 (LENGTH XLIB::ADDRESS))
;                              ((SEQUENCE :FORMAT XLIB:CARD8) XLIB::ADDRESS))
; --> LET XLIB::WITH-BUFFER MACROLET LET XLIB::HOLDING-LOCK 
; --> SB-THREAD:WITH-RECURSIVE-LOCK LOCALLY MULTIPLE-VALUE-PROG1 
; --> XLIB::WITHOUT-ABORTS PROGN XLIB::WITH-BUFFER-REQUEST-INTERNAL 
; --> XLIB::WITH-BUFFER-OUTPUT LET LET* XLIB::CHECK-PUT XLIB::SEQUENCE-PUT LET 
; ==>
;   (LENGTH XLIB::ADDRESS)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a VECTOR.

; compiling (DEFUN ACCESS-HOSTS ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/requests.lisp
; in: DEFUN ACCESS-HOSTS
;     (SETF (ELT SEQUENCE XLIB::I)
;           (CONS
;            (IF (< XLIB::FAMILY 3)
;                (SVREF '#(:INTERNET :DECNET :CHAOS) XLIB::FAMILY)
;                XLIB::FAMILY)
;            (XLIB::SEQUENCE-GET :LENGTH
;                                XLIB::LEN
;                                :FORMAT
;                                XLIB:CARD8
;                                :RESULT-TYPE
;                                'LIST
;                                :INDEX
;                                (+ XLIB::BUFFER-BOFFSET 4))))
; ==>
;   (SB-KERNEL:%SETELT SEQUENCE
;                      XLIB::I
;                      (CONS
;                       (IF (< XLIB::FAMILY 3)
;                           (SVREF '#(:INTERNET :DECNET :CHAOS) XLIB::FAMILY)
;                           XLIB::FAMILY)
;                       (XLIB::SEQUENCE-GET :LENGTH
;                                           XLIB::LEN
;                                           :FORMAT
;                                           XLIB:CARD8
;                                           :RESULT-TYPE
;                                           'LIST
;                                           :INDEX
;                                           (+ XLIB::BUFFER-BOFFSET 4))))
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a (OR CONS
;                               NULL
;                               (SIMPLE-ARRAY * (*))), not a (SIMPLE-ARRAY * (*)).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a (OR CONS NULL (SIMPLE-ARRAY * (*))), not a LIST.

; compiling (DEFUN ACCESS-CONTROL ...)
; compiling (DEFUN SET-ACCESS-CONTROL ...)
; compiling (DEFSETF ACCESS-CONTROL ...)
; compiling (DEFUN CLOSE-DOWN-MODE ...)
; compiling (DEFUN SET-CLOSE-DOWN-MODE ...)
; compiling (DEFSETF CLOSE-DOWN-MODE ...)
; compiling (DEFUN KILL-CLIENT ...)
; compiling (DEFUN KILL-TEMPORARY-CLIENTS ...)
; compiling (DEFUN NO-OPERATION ...)

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/requests.fasl written
; compilation finished in 0:00:20
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/fonts.lisp" (written 14 JUL 2005 09:24:44 AM):
; compiling (IN-PACKAGE :XLIB)
; compiling (DEFTYPE CHAR-INFO-VEC ...)
; compiling (DEF-CHAR-INFO-ACCESSORS IGNORE ...)
; compiling (DEFUN OPEN-FONT ...)
; compiling (DEFUN OPEN-FONT-INTERNAL ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/fonts.lisp
; in: DEFUN OPEN-FONT-INTERNAL
;     (LENGTH XLIB::NAME-STRING)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a (OR NULL
;                               (VECTOR CHARACTER)
;                               (VECTOR NIL)
;                               BASE-STRING), not a (SIMPLE-ARRAY * (*)).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a (OR NULL
;                               (VECTOR CHARACTER)
;                               (VECTOR NIL)
;                               BASE-STRING), not a VECTOR.

;     (XLIB::WITH-BUFFER-REQUEST (XLIB:DISPLAY XLIB::+X-OPENFONT+)
;                              (XLIB:RESOURCE-ID XLIB::ID)
;                              (XLIB:CARD16 (LENGTH XLIB::NAME-STRING))
;                              (XLIB::PAD16 NIL)
;                              (STRING XLIB::NAME-STRING))
; --> LET XLIB::WITH-BUFFER MACROLET LET XLIB::HOLDING-LOCK 
; --> SB-THREAD:WITH-RECURSIVE-LOCK LOCALLY MULTIPLE-VALUE-PROG1 
; --> XLIB::WITHOUT-ABORTS PROGN XLIB::WITH-BUFFER-REQUEST-INTERNAL 
; --> XLIB::WITH-BUFFER-OUTPUT LET LET* XLIB::CHECK-PUT XLIB::STRING-PUT LET 
; ==>
;   (LENGTH XLIB::NAME-STRING)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a (OR NULL
;                               (VECTOR CHARACTER)
;                               (VECTOR NIL)
;                               BASE-STRING), not a (SIMPLE-ARRAY * (*)).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a (OR NULL
;                               (VECTOR CHARACTER)
;                               (VECTOR NIL)
;                               BASE-STRING), not a VECTOR.

; compiling (DEFUN DISCARD-FONT-INFO ...)
; compiling (DEFUN QUERY-FONT ...)
; compiling (DEFUN CLOSE-FONT ...)
; compiling (DEFUN LIST-FONT-NAMES ...)
; compiling (DEFUN LIST-FONTS ...)
; compiling (DEFUN FONT-PATH ...)
; compiling (DEFUN SET-FONT-PATH ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/fonts.lisp
; in: DEFUN SET-FONT-PATH
;     (ELT XLIB::PATHS XLIB::I)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a LIST.

; compiling (DEFSETF FONT-PATH ...)

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/fonts.fasl written
; compilation finished in 0:00:03
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/graphics.lisp" (written 14 JUL 2005 09:24:44 AM):
; compiling (IN-PACKAGE :XLIB)
; compiling (DEFVAR *INHIBIT-APPENDING* ...)
; compiling (DEFUN DRAW-POINT ...)
; compiling (DEFUN DRAW-POINTS ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/graphics.lisp
; in: DEFUN DRAW-POINTS
;     (XLIB::WITH-BUFFER-REQUEST
;    ((XLIB:DRAWABLE-DISPLAY XLIB:DRAWABLE) XLIB::+X-POLYPOINT+ :GC-FORCE
;     XLIB:GCONTEXT)
;    ((XLIB::DATA BOOLEAN) XLIB::RELATIVE-P)
;    (XLIB:DRAWABLE XLIB:DRAWABLE)
;    (XLIB:GCONTEXT XLIB:GCONTEXT)
;    ((SEQUENCE :FORMAT XLIB:INT16) XLIB::POINTS))
; --> LET XLIB::WITH-BUFFER MACROLET LET XLIB::HOLDING-LOCK 
; --> SB-THREAD:WITH-RECURSIVE-LOCK LOCALLY MULTIPLE-VALUE-PROG1 
; --> XLIB::WITHOUT-ABORTS PROGN XLIB::WITH-BUFFER-REQUEST-INTERNAL 
; --> XLIB::WITH-BUFFER-OUTPUT LET LET* XLIB::CHECK-PUT XLIB::SEQUENCE-PUT LET 
; ==>
;   (LENGTH XLIB::POINTS)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a VECTOR.

; compiling (DEFUN DRAW-LINE ...)
; compiling (DEFUN DRAW-LINES ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/graphics.lisp
; in: DEFUN DRAW-LINES
;     (XLIB::WITH-BUFFER-REQUEST
;    ((XLIB:DRAWABLE-DISPLAY XLIB:DRAWABLE) XLIB::+X-POLYLINE+ :GC-FORCE
;     XLIB:GCONTEXT)
;    ((XLIB::DATA BOOLEAN) XLIB::RELATIVE-P)
;    (XLIB:DRAWABLE XLIB:DRAWABLE)
;    (XLIB:GCONTEXT XLIB:GCONTEXT)
;    ((SEQUENCE :FORMAT XLIB:INT16) XLIB::POINTS))
; --> LET XLIB::WITH-BUFFER MACROLET LET XLIB::HOLDING-LOCK 
; --> SB-THREAD:WITH-RECURSIVE-LOCK LOCALLY MULTIPLE-VALUE-PROG1 
; --> XLIB::WITHOUT-ABORTS PROGN XLIB::WITH-BUFFER-REQUEST-INTERNAL 
; --> XLIB::WITH-BUFFER-OUTPUT LET LET* XLIB::CHECK-PUT XLIB::SEQUENCE-PUT LET 
; ==>
;   (LENGTH XLIB::POINTS)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a VECTOR.

; compiling (DEFUN FILL-POLYGON ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/graphics.lisp
; in: DEFUN FILL-POLYGON
;     (XLIB::WITH-BUFFER-REQUEST
;    ((XLIB:DRAWABLE-DISPLAY XLIB:DRAWABLE) XLIB::+X-FILLPOLY+ :GC-FORCE
;     XLIB:GCONTEXT)
;    (XLIB:DRAWABLE XLIB:DRAWABLE)
;    (XLIB:GCONTEXT XLIB:GCONTEXT)
;    ((XLIB::MEMBER8 :COMPLEX :NON-CONVEX :CONVEX) XLIB::SHAPE)
;    (BOOLEAN XLIB::RELATIVE-P)
;    ((SEQUENCE :FORMAT XLIB:INT16) XLIB::POINTS))
; --> LET XLIB::WITH-BUFFER MACROLET LET XLIB::HOLDING-LOCK 
; --> SB-THREAD:WITH-RECURSIVE-LOCK LOCALLY MULTIPLE-VALUE-PROG1 
; --> XLIB::WITHOUT-ABORTS PROGN XLIB::WITH-BUFFER-REQUEST-INTERNAL 
; --> XLIB::WITH-BUFFER-OUTPUT LET LET* XLIB::CHECK-PUT XLIB::SEQUENCE-PUT LET 
; ==>
;   (LENGTH XLIB::POINTS)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a VECTOR.

; compiling (DEFUN DRAW-SEGMENTS ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/graphics.lisp
; in: DEFUN DRAW-SEGMENTS
;     (XLIB::WITH-BUFFER-REQUEST
;    ((XLIB:DRAWABLE-DISPLAY XLIB:DRAWABLE) XLIB::+X-POLYSEGMENT+ :GC-FORCE
;     XLIB:GCONTEXT)
;    (XLIB:DRAWABLE XLIB:DRAWABLE)
;    (XLIB:GCONTEXT XLIB:GCONTEXT)
;    ((SEQUENCE :FORMAT XLIB:INT16) XLIB::SEGMENTS))
; --> LET XLIB::WITH-BUFFER MACROLET LET XLIB::HOLDING-LOCK 
; --> SB-THREAD:WITH-RECURSIVE-LOCK LOCALLY MULTIPLE-VALUE-PROG1 
; --> XLIB::WITHOUT-ABORTS PROGN XLIB::WITH-BUFFER-REQUEST-INTERNAL 
; --> XLIB::WITH-BUFFER-OUTPUT LET LET* XLIB::CHECK-PUT XLIB::SEQUENCE-PUT LET 
; ==>
;   (LENGTH XLIB::SEGMENTS)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a VECTOR.

; compiling (DEFUN DRAW-RECTANGLE ...)
; compiling (DEFUN DRAW-RECTANGLES ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/graphics.lisp
; in: DEFUN DRAW-RECTANGLES
;     (XLIB::WITH-BUFFER-REQUEST
;    ((XLIB:DRAWABLE-DISPLAY XLIB:DRAWABLE)
;     (IF XLIB::FILL-P XLIB::+X-POLYFILLRECTANGLE+ XLIB::+X-POLYRECTANGLE+)
;     :GC-FORCE XLIB:GCONTEXT)
;    (XLIB:DRAWABLE XLIB:DRAWABLE)
;    (XLIB:GCONTEXT XLIB:GCONTEXT)
;    ((SEQUENCE :FORMAT XLIB:INT16) XLIB::RECTANGLES))
; --> LET XLIB::WITH-BUFFER MACROLET LET XLIB::HOLDING-LOCK 
; --> SB-THREAD:WITH-RECURSIVE-LOCK LOCALLY MULTIPLE-VALUE-PROG1 
; --> XLIB::WITHOUT-ABORTS PROGN XLIB::WITH-BUFFER-REQUEST-INTERNAL 
; --> XLIB::WITH-BUFFER-OUTPUT LET LET* XLIB::CHECK-PUT XLIB::SEQUENCE-PUT LET 
; ==>
;   (LENGTH XLIB::RECTANGLES)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a VECTOR.

; compiling (DEFUN DRAW-ARC ...)
; compiling (DEFUN DRAW-ARCS-LIST ...)
; compiling (DEFUN DRAW-ARCS-VECTOR ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/graphics.lisp
; in: DEFUN DRAW-ARCS-VECTOR
;     (AREF XLIB::ARCS (XLIB::INDEX+ XLIB::N 0))
; --> LET* 
; ==>
;   (SB-KERNEL:HAIRY-DATA-VECTOR-REF ARRAY SB-INT:INDEX)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a VECTOR, not a SIMPLE-STRING.
; 
; note: unable to
;   avoid runtime dispatch on array element type
; because:
;   Upgraded element type of array is not known at compile time.

;     (AREF XLIB::ARCS (XLIB::INDEX+ XLIB::N 1))
; --> LET* 
; ==>
;   (SB-KERNEL:HAIRY-DATA-VECTOR-REF ARRAY SB-INT:INDEX)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a VECTOR, not a SIMPLE-STRING.
; 
; note: unable to
;   avoid runtime dispatch on array element type
; because:
;   Upgraded element type of array is not known at compile time.

;     (AREF XLIB::ARCS (XLIB::INDEX+ XLIB::N 2))
; --> LET* 
; ==>
;   (SB-KERNEL:HAIRY-DATA-VECTOR-REF ARRAY SB-INT:INDEX)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a VECTOR, not a SIMPLE-STRING.
; 
; note: unable to
;   avoid runtime dispatch on array element type
; because:
;   Upgraded element type of array is not known at compile time.

;     (AREF XLIB::ARCS (XLIB::INDEX+ XLIB::N 3))
; --> LET* 
; ==>
;   (SB-KERNEL:HAIRY-DATA-VECTOR-REF ARRAY SB-INT:INDEX)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a VECTOR, not a SIMPLE-STRING.
; 
; note: unable to
;   avoid runtime dispatch on array element type
; because:
;   Upgraded element type of array is not known at compile time.

;     (AREF XLIB::ARCS (XLIB::INDEX+ XLIB::N 4))
; --> LET* 
; ==>
;   (SB-KERNEL:HAIRY-DATA-VECTOR-REF ARRAY SB-INT:INDEX)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a VECTOR, not a SIMPLE-STRING.
; 
; note: unable to
;   avoid runtime dispatch on array element type
; because:
;   Upgraded element type of array is not known at compile time.

;     (AREF XLIB::ARCS (XLIB::INDEX+ XLIB::N 5))
; --> LET* 
; ==>
;   (SB-KERNEL:HAIRY-DATA-VECTOR-REF ARRAY SB-INT:INDEX)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a VECTOR, not a SIMPLE-STRING.
; 
; note: unable to
;   avoid runtime dispatch on array element type
; because:
;   Upgraded element type of array is not known at compile time.

; compiling (DEFUN DRAW-ARCS ...)
; compiling (DEFUN PUT-RAW-IMAGE ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/graphics.lisp
; in: DEFUN PUT-RAW-IMAGE
;     (XLIB::WITH-BUFFER-REQUEST
;    ((XLIB:DRAWABLE-DISPLAY XLIB:DRAWABLE) XLIB::+X-PUTIMAGE+ :GC-FORCE
;     XLIB:GCONTEXT)
;    ((XLIB::DATA (MEMBER :BITMAP :XY-PIXMAP :Z-PIXMAP)) FORMAT)
;    (XLIB:DRAWABLE XLIB:DRAWABLE)
;    (XLIB:GCONTEXT XLIB:GCONTEXT)
;    (XLIB:CARD16 XLIB::WIDTH XLIB::HEIGHT)
;    (XLIB:INT16 XLIB::X XLIB::Y)
;    (XLIB:CARD8 XLIB::LEFT-PAD XLIB::DEPTH)
;    (XLIB::PAD16 NIL)
;    ((SEQUENCE :FORMAT XLIB:CARD8 :START XLIB::START) XLIB::DATA))
; --> LET XLIB::WITH-BUFFER MACROLET LET XLIB::HOLDING-LOCK 
; --> SB-THREAD:WITH-RECURSIVE-LOCK LOCALLY MULTIPLE-VALUE-PROG1 
; --> XLIB::WITHOUT-ABORTS PROGN XLIB::WITH-BUFFER-REQUEST-INTERNAL 
; --> XLIB::WITH-BUFFER-OUTPUT LET LET* XLIB::CHECK-PUT XLIB::SEQUENCE-PUT LET 
; ==>
;   (LENGTH XLIB::DATA)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a VECTOR.

; compiling (DEFUN GET-RAW-IMAGE ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/graphics.lisp
; in: DEFUN GET-RAW-IMAGE
;     (* 4 (XLIB::CARD32-GET 4))
; --> * 
; ==>
;   (ASH SB-C::X 2)
; 
; note: forced to do full call
;       unable to do inline ASH (cost 2) because:
;       The first argument is a (UNSIGNED-BYTE 32), not a FIXNUM.
;       The result is a (VALUES (MOD 17179869181)
;                               &OPTIONAL), not a (VALUES FIXNUM &REST T).
;       unable to do inline ASH (cost 3) because:
;       The first argument is a (UNSIGNED-BYTE 32), not a (SIGNED-BYTE 32).
;       The result is a (VALUES (MOD 17179869181)
;                               &OPTIONAL), not a (VALUES (SIGNED-BYTE 32)
;                                                         &REST
;                                                         T).
;       etc.

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/graphics.fasl written
; compilation finished in 0:00:03
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/text.lisp" (written 14 JUL 2005 09:24:45 AM):
; compiling (IN-PACKAGE :XLIB)
; compiling (DEFPARAMETER *MAX-STRING-SIZE* ...)
; compiling (DEFTYPE TRANSLATION-FUNCTION ...)
; compiling (DEFUN TRANSLATE-DEFAULT ...)
; compiling (DEFUN TEXT-EXTENTS ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/text.lisp
; in: DEFUN TEXT-EXTENTS
;     (LENGTH SEQUENCE)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a VECTOR.

;     (MAX XLIB::RIGHT-BEARING (THE XLIB:INT32 XLIB::R))
; --> LET LET IF 
; ==>
;   SB-C::MAXREST
; 
; note: doing signed word to integer coercion (cost 20)

;     (MIN XLIB::LEFT-BEARING (THE XLIB:INT32 XLIB::L))
; --> LET LET IF 
; ==>
;   SB-C::MINREST
; 
; note: doing signed word to integer coercion (cost 20)

; compiling (DEFUN TEXT-WIDTH ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/text.lisp
; in: DEFUN TEXT-WIDTH
;     (LENGTH SEQUENCE)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a VECTOR.

;     (INCF XLIB::WIDTH
;         (IF
;          (OR (XLIB::FONT-CHAR-INFOS-INTERNAL XLIB:FONT)
;              (XLIB::FONT-LOCAL-ONLY-P XLIB:FONT))
;          (XLIB::TEXT-EXTENTS-LOCAL XLIB:FONT
;                                    XLIB::WBUF
;                                    0
;                                    XLIB::BUF-END
;                                    :WIDTH-ONLY)
;          (XLIB::TEXT-WIDTH-SERVER XLIB:FONT XLIB::WBUF 0 XLIB::BUF-END)))
; --> LET* 
; ==>
;   (+ XLIB::WIDTH #:G276)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The second argument is a NUMBER, not a FLOAT.
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; 
; note: forced to do GENERIC-+ (cost 10)
;       unable to do inline fixnum arithmetic (cost 2) because:
;       The first argument is a (SIGNED-BYTE 32), not a FIXNUM.
;       The second argument is a NUMBER, not a FIXNUM.
;       The result is a (VALUES (SIGNED-BYTE 32)
;                               &OPTIONAL), not a (VALUES FIXNUM &REST T).
;       unable to do safe inline fixnum arithmetic (cost 4) because:
;       The first argument is a (SIGNED-BYTE 32), not a FIXNUM.
;       The second argument is a NUMBER, not a FIXNUM.
;       The result is a (VALUES (SIGNED-BYTE 32)
;                               &OPTIONAL), not a (VALUES FIXNUM &REST T).
;       etc.

;     (INCF XLIB::WIDTH (THE XLIB:INT32 XLIB::NEW-FONT))
; --> LET* 
; ==>
;   (SETQ XLIB::WIDTH #:G273)
; 
; note: doing signed word to integer coercion (cost 20) to WIDTH

; compiling (DEFUN TEXT-EXTENTS-SERVER ...)
; compiling (DEFUN TEXT-WIDTH-SERVER ...)
; compiling (DEFUN TEXT-EXTENTS-LOCAL ...)
; compiling (DEFTYPE INDEX-SIZE ...)
; compiling (DEFUN DRAW-GLYPH ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/text.lisp
; in: DEFUN DRAW-GLYPH
;     (LDB (BYTE 8 0) ELT)
; --> SB-KERNEL:%LDB 
; ==>
;   (LOGAND (ASH INT (- SB-C::POSN)) (ASH 4294967295 (- SB-C::SIZE 32)))
; 
; note: forced to do static-fun Two-arg-and (cost 53)
;       unable to do inline fixnum logical op (cost 1) because:
;       The first argument is a INTEGER, not a FIXNUM.
;       unable to do inline (unsigned-byte 32) logical op (cost 2) because:
;       The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
;       etc.

;     (LDB (BYTE 8 8) ELT)
; --> SB-KERNEL:%LDB LOGAND 
; ==>
;   (ASH INT (- SB-C::POSN))
; 
; note: forced to do full call
;       unable to do inline ASH (cost 3) because:
;       The first argument is a INTEGER, not a (SIGNED-BYTE 32).
;       The result is a (VALUES INTEGER
;                               &OPTIONAL), not a (VALUES (SIGNED-BYTE 32)
;                                                         &REST
;                                                         T).
;       unable to do inline constant ASH (cost 4) because:
;       The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
;       The result is a (VALUES INTEGER
;                               &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 32)
;                                                         &REST
;                                                         T).
;       etc.

; --> SB-KERNEL:%LDB 
; ==>
;   (LOGAND (ASH INT (- SB-C::POSN)) (ASH 4294967295 (- SB-C::SIZE 32)))
; 
; note: forced to do static-fun Two-arg-and (cost 53)
;       unable to do inline fixnum logical op (cost 1) because:
;       The first argument is a INTEGER, not a FIXNUM.
;       unable to do inline (unsigned-byte 32) logical op (cost 2) because:
;       The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
;       etc.

; compiling (DEFUN DRAW-GLYPHS ...)
; compiling (DEFUN DRAW-GLYPHS8 ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/text.lisp
; in: DEFUN DRAW-GLYPHS8
;     (INCF XLIB::BOFFSET (XLIB::INDEX+ XLIB::DST-CHUNK 2))
; --> LET* 
; ==>
;   (SETQ XLIB::BOFFSET #:G1156)
; 
; note: doing signed word to integer coercion (cost 20) to BOFFSET

;     (INCF XLIB::OVERALL-WIDTH XLIB::TRANSLATED-WIDTH)
; --> LET* 
; ==>
;   (SETQ XLIB::OVERALL-WIDTH #:G1147)
; 
; note: doing signed word to integer coercion (cost 20) to OVERALL-WIDTH

; compiling (DEFUN DRAW-GLYPHS16 ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/text.lisp
; in: DEFUN DRAW-GLYPHS16
;     (INCF XLIB::OVERALL-WIDTH XLIB::TRANSLATED-WIDTH)
; --> LET* 
; ==>
;   (SETQ XLIB::OVERALL-WIDTH #:G1371)
; 
; note: doing signed word to integer coercion (cost 20) to OVERALL-WIDTH

; compiling (DEFUN DRAW-IMAGE-GLYPH ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/text.lisp
; in: DEFUN DRAW-IMAGE-GLYPH
;     (LDB (BYTE 8 0) ELT)
; --> SB-KERNEL:%LDB 
; ==>
;   (LOGAND (ASH INT (- SB-C::POSN)) (ASH 4294967295 (- SB-C::SIZE 32)))
; 
; note: forced to do static-fun Two-arg-and (cost 53)
;       unable to do inline fixnum logical op (cost 1) because:
;       The first argument is a INTEGER, not a FIXNUM.
;       unable to do inline (unsigned-byte 32) logical op (cost 2) because:
;       The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
;       etc.

;     (LDB (BYTE 8 8) ELT)
; --> SB-KERNEL:%LDB LOGAND 
; ==>
;   (ASH INT (- SB-C::POSN))
; 
; note: forced to do full call
;       unable to do inline ASH (cost 3) because:
;       The first argument is a INTEGER, not a (SIGNED-BYTE 32).
;       The result is a (VALUES INTEGER
;                               &OPTIONAL), not a (VALUES (SIGNED-BYTE 32)
;                                                         &REST
;                                                         T).
;       unable to do inline constant ASH (cost 4) because:
;       The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
;       The result is a (VALUES INTEGER
;                               &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 32)
;                                                         &REST
;                                                         T).
;       etc.

; --> SB-KERNEL:%LDB 
; ==>
;   (LOGAND (ASH INT (- SB-C::POSN)) (ASH 4294967295 (- SB-C::SIZE 32)))
; 
; note: forced to do static-fun Two-arg-and (cost 53)
;       unable to do inline fixnum logical op (cost 1) because:
;       The first argument is a INTEGER, not a FIXNUM.
;       unable to do inline (unsigned-byte 32) logical op (cost 2) because:
;       The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
;       etc.

; compiling (DEFUN DRAW-IMAGE-GLYPHS ...)
; compiling (DEFUN DRAW-IMAGE-GLYPHS8 ...)
; compiling (DEFUN DRAW-IMAGE-GLYPHS16 ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/text.lisp
; in: DEFUN DRAW-IMAGE-GLYPHS16
;     (XLIB::LROUND (XLIB::INDEX+ 16 (XLIB::INDEX-ASH XLIB::CHUNK 1)))
; --> THE 
; ==>
;   (LOGAND (XLIB::INDEX+ (XLIB::INDEX+ 16 (XLIB::INDEX-ASH XLIB::CHUNK 1)) 3) -4)
; 
; note: forced to do static-fun Two-arg-and (cost 53)
;       unable to do inline fixnum arithmetic (cost 2) because:
;       The first argument is a (UNSIGNED-BYTE 32), not a FIXNUM.
;       unable to do inline (signed-byte 32) arithmetic (cost 3) because:
;       The first argument is a (UNSIGNED-BYTE 32), not a (SIGNED-BYTE 32).
; 
; note: doing unsigned word to integer coercion (cost 20), for:
;       the first argument of static-fun Two-arg-and

; compiling (DEFUN DISPLAY-KEYCODE-RANGE ...)
; compiling (DEFUN SET-MODIFIER-MAPPING ...)
; compiling (DEFUN MODIFIER-MAPPING ...)
; compiling (DEFUN CHANGE-KEYBOARD-MAPPING ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/text.lisp
; in: DEFUN CHANGE-KEYBOARD-MAPPING
;     (AREF XLIB::KEYSYMS XLIB::I XLIB::J)
; --> LET* 
; ==>
;   (SB-KERNEL:HAIRY-DATA-VECTOR-REF ARRAY SB-INT:INDEX)
; 
; note: unable to
;   avoid runtime dispatch on array element type
; because:
;   Upgraded element type of array is not known at compile time.

; compiling (DEFUN KEYBOARD-MAPPING ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/text.lisp
; in: DEFUN KEYBOARD-MAPPING
;     (MAKE-ARRAY
;    `(,(XLIB::INDEX+ XLIB::START XLIB::KEYCODE-COUNT)
;      ,XLIB::KEYSYMS-PER-KEYCODE)
;    :ELEMENT-TYPE
;    'XLIB:KEYSYM
;    :INITIAL-ELEMENT
;    0)
; ==>
;   (MAKE-ARRAY SB-C::DIMS :ELEMENT-TYPE '(UNSIGNED-BYTE 32))
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a (OR (MOD 536870911) CONS NULL), not a INTEGER.
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a (OR (MOD 536870911) CONS NULL), not a LIST.

;     (SETF (AREF XLIB::RESULT XLIB::I XLIB::J) (XLIB::CARD29-GET (* XLIB::J 4)))
; --> SB-KERNEL:%ASET LET* 
; ==>
;   (SB-KERNEL:HAIRY-DATA-VECTOR-SET ARRAY SB-INT:INDEX SB-C::NEW-VALUE)
; 
; note: unable to
;   avoid runtime dispatch on array element type
; because:
;   Upgraded element type of array is not known at compile time.

;     (1+ XLIB::I)
; ==>
;   (+ XLIB::I 1)
; 
; note: forced to do GENERIC-+ (cost 10)
;       unable to do inline fixnum arithmetic (cost 1) because:
;       The first argument is a UNSIGNED-BYTE, not a FIXNUM.
;       The result is a (VALUES (INTEGER 1)
;                               &OPTIONAL), not a (VALUES FIXNUM &REST T).
;       unable to do inline fixnum arithmetic (cost 2) because:
;       The first argument is a UNSIGNED-BYTE, not a FIXNUM.
;       The result is a (VALUES (INTEGER 1)
;                               &OPTIONAL), not a (VALUES FIXNUM &REST T).
;       etc.

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/text.fasl written
; compilation finished in 0:00:05
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/attributes.lisp" (written 14 JUL 2005 09:24:44 AM):
; compiling (IN-PACKAGE :XLIB)
; compiling (DEFCONSTANT +ATTRIBUTE-SIZE+ ...)
; compiling (DEFCONSTANT +GEOMETRY-SIZE+ ...)
; compiling (DEFCONSTANT +CONTEXT-SIZE+ ...)
; compiling (DEFVAR *WINDOW-ATTRIBUTES* ...)
; compiling (DEFVAR *CONTEXT-FREE-LIST* ...)
; compiling (DEFUN ALLOCATE-CONTEXT ...)
; compiling (DEFUN DEALLOCATE-CONTEXT ...)
; compiling (DEFMACRO STATE-ATTRIBUTES ...)
; compiling (DEFMACRO STATE-ATTRIBUTE-CHANGES ...)
; compiling (DEFMACRO STATE-GEOMETRY ...)
; compiling (DEFMACRO STATE-GEOMETRY-CHANGES ...)
; compiling (DEFMACRO DRAWABLE-EQUAL-FUNCTION ...); in: LAMBDA NIL
;     ''XLIB:DRAWABLE-EQUAL
; 
; note: deleting unreachable code

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/attributes.lisp
; in: DEFMACRO DRAWABLE-EQUAL-FUNCTION
;     ''XLIB:DRAWABLE-EQUAL
; 
; note: deleting unreachable code

; compiling (DEFMACRO WINDOW-EQUAL-FUNCTION ...); in: LAMBDA NIL
;     ''XLIB:DRAWABLE-EQUAL
; 
; note: deleting unreachable code

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/attributes.lisp
; in: DEFMACRO WINDOW-EQUAL-FUNCTION
;     ''XLIB:DRAWABLE-EQUAL
; 
; note: deleting unreachable code

; compiling (DEFMACRO WITH-STATE ...)
; compiling (DEFUN CLEANUP-STATE-ENTRY ...)
; compiling (DEFUN CHANGE-WINDOW-ATTRIBUTE ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/attributes.lisp
; in: DEFUN CHANGE-WINDOW-ATTRIBUTE
;     (ASH 1 NUMBER)
; 
; note: forced to do full call
;       unable to do inline ASH (cost 2) because:
;       The result is a (VALUES (INTEGER 1)
;                               &OPTIONAL), not a (VALUES FIXNUM &REST T).
;       unable to do inline ASH (cost 3) because:
;       The result is a (VALUES (INTEGER 1)
;                               &OPTIONAL), not a (VALUES (SIGNED-BYTE 32)
;                                                         &REST
;                                                         T).
;       etc.

; compiling (DEFUN CHANGE-DRAWABLE-GEOMETRY ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/attributes.lisp
; in: DEFUN CHANGE-DRAWABLE-GEOMETRY
;     (ASH 1 NUMBER)
; 
; note: forced to do full call
;       unable to do inline ASH (cost 2) because:
;       The result is a (VALUES (INTEGER 1)
;                               &OPTIONAL), not a (VALUES FIXNUM &REST T).
;       unable to do inline ASH (cost 3) because:
;       The result is a (VALUES (INTEGER 1)
;                               &OPTIONAL), not a (VALUES (SIGNED-BYTE 32)
;                                                         &REST
;                                                         T).
;       etc.

; compiling (DEFUN GET-WINDOW-ATTRIBUTES-BUFFER ...)
; compiling (DEFUN GET-DRAWABLE-GEOMETRY-BUFFER ...)
; compiling (DEFUN PUT-WINDOW-ATTRIBUTE-CHANGES ...)
; compiling (DEFUN PUT-DRAWABLE-GEOMETRY-CHANGES ...)
; compiling (DEFMACRO WITH-ATTRIBUTES ...)
; compiling (DEFMACRO WITH-GEOMETRY ...)
; compiling (DEFUN WINDOW-VISUAL ...)
; compiling (DEFUN WINDOW-VISUAL-INFO ...)
; compiling (DEFUN WINDOW-CLASS ...)
; compiling (DEFUN SET-WINDOW-BACKGROUND ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/attributes.lisp
; in: DEFUN SET-WINDOW-BACKGROUND
;     (XLIB::X-TYPE-ERROR XLIB::BACKGROUND
;                       '(OR (MEMBER :NONE :PARENT-RELATIVE) INTEGER XLIB:PIXMAP))
; ==>
;   XLIB::BACKGROUND
; 
; note: deleting unreachable code

;     '(OR (MEMBER :NONE :PARENT-RELATIVE) INTEGER XLIB:PIXMAP)
; 
; note: deleting unreachable code

; compiling (DEFSETF WINDOW-BACKGROUND ...)
; compiling (DEFUN SET-WINDOW-BORDER ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/attributes.lisp
; in: DEFUN SET-WINDOW-BORDER
;     (XLIB::X-TYPE-ERROR XLIB::BORDER '(OR (MEMBER :COPY) INTEGER XLIB:PIXMAP))
; ==>
;   XLIB::BORDER
; 
; note: deleting unreachable code

;     '(OR (MEMBER :COPY) INTEGER XLIB:PIXMAP)
; 
; note: deleting unreachable code

; compiling (DEFSETF WINDOW-BORDER ...)
; compiling (DEFUN WINDOW-BIT-GRAVITY ...)
; compiling (DEFUN SET-WINDOW-BIT-GRAVITY ...)
; compiling (DEFSETF WINDOW-BIT-GRAVITY ...)
; compiling (DEFUN WINDOW-GRAVITY ...)
; compiling (DEFUN SET-WINDOW-GRAVITY ...)
; compiling (DEFSETF WINDOW-GRAVITY ...)
; compiling (DEFUN WINDOW-BACKING-STORE ...)
; compiling (DEFUN SET-WINDOW-BACKING-STORE ...)
; compiling (DEFSETF WINDOW-BACKING-STORE ...)
; compiling (DEFUN WINDOW-BACKING-PLANES ...)
; compiling (DEFUN SET-WINDOW-BACKING-PLANES ...)
; compiling (DEFSETF WINDOW-BACKING-PLANES ...)
; compiling (DEFUN WINDOW-BACKING-PIXEL ...)
; compiling (DEFUN SET-WINDOW-BACKING-PIXEL ...)
; compiling (DEFSETF WINDOW-BACKING-PIXEL ...)
; compiling (DEFUN WINDOW-SAVE-UNDER ...)
; compiling (DEFUN SET-WINDOW-SAVE-UNDER ...)
; compiling (DEFSETF WINDOW-SAVE-UNDER ...)
; compiling (DEFUN WINDOW-OVERRIDE-REDIRECT ...)
; compiling (DEFUN SET-WINDOW-OVERRIDE-REDIRECT ...)
; compiling (DEFSETF WINDOW-OVERRIDE-REDIRECT ...)
; compiling (DEFUN WINDOW-EVENT-MASK ...)
; compiling (DEFSETF WINDOW-EVENT-MASK ...)
; compiling (DEFUN WINDOW-DO-NOT-PROPAGATE-MASK ...)
; compiling (DEFSETF WINDOW-DO-NOT-PROPAGATE-MASK ...)
; compiling (DEFUN WINDOW-COLORMAP ...)
; compiling (DEFUN SET-WINDOW-COLORMAP ...)
; compiling (DEFSETF WINDOW-COLORMAP ...)
; compiling (DEFUN WINDOW-CURSOR ...)
; compiling (DEFUN SET-WINDOW-CURSOR ...)
; compiling (DEFSETF WINDOW-CURSOR ...)
; compiling (DEFUN WINDOW-COLORMAP-INSTALLED-P ...)
; compiling (DEFUN WINDOW-ALL-EVENT-MASKS ...)
; compiling (DEFUN WINDOW-MAP-STATE ...)
; compiling (DEFUN DRAWABLE-ROOT ...)
; compiling (DEFUN DRAWABLE-X ...)
; compiling (DEFUN SET-DRAWABLE-X ...)
; compiling (DEFSETF DRAWABLE-X ...)
; compiling (DEFUN DRAWABLE-Y ...)
; compiling (DEFUN SET-DRAWABLE-Y ...)
; compiling (DEFSETF DRAWABLE-Y ...)
; compiling (DEFUN DRAWABLE-WIDTH ...)
; compiling (DEFUN SET-DRAWABLE-WIDTH ...)
; compiling (DEFSETF DRAWABLE-WIDTH ...)
; compiling (DEFUN DRAWABLE-HEIGHT ...)
; compiling (DEFUN SET-DRAWABLE-HEIGHT ...)
; compiling (DEFSETF DRAWABLE-HEIGHT ...)
; compiling (DEFUN DRAWABLE-DEPTH ...)
; compiling (DEFUN DRAWABLE-BORDER-WIDTH ...)
; compiling (DEFUN SET-DRAWABLE-BORDER-WIDTH ...)
; compiling (DEFSETF DRAWABLE-BORDER-WIDTH ...)
; compiling (DEFUN SET-WINDOW-PRIORITY ...)
; compiling (DEFSETF WINDOW-PRIORITY ...)

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/attributes.fasl written
; compilation finished in 0:00:04
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/translate.lisp" (written 14 JUL 2005 09:24:44 AM):
; compiling (IN-PACKAGE :XLIB)
; compiling (DEFVAR *KEYSYM-SETS* ...)
; compiling (DEFUN DEFINE-KEYSYM-SET ...)
; compiling (DEFUN KEYSYM-SET ...)
; compiling (DEFMACRO KEYSYM ...)
; compiling (DEFVAR *KEYSYM->CHARACTER-MAP* ...)
; compiling (DEFMACRO KEYSYM-MAPPING-OBJECT ...)
; compiling (DEFMACRO KEYSYM-MAPPING-TRANSLATE ...)
; compiling (DEFMACRO KEYSYM-MAPPING-LOWERCASE ...)
; compiling (DEFMACRO KEYSYM-MAPPING-MODIFIERS ...)
; compiling (DEFMACRO KEYSYM-MAPPING-MASK ...)
; compiling (DEFVAR *DEFAULT-KEYSYM-TRANSLATE-MASK* ...)
; compiling (DEFUN DEFINE-KEYSYM ...)
; compiling (DEFUN UNDEFINE-KEYSYM ...)
; compiling (DEFUN KEYSYM-DOWNCASE ...)
; compiling (DEFUN KEYSYM-UPPERCASE-ALPHABETIC-P ...)
; compiling (DEFUN CHARACTER->KEYSYMS ...)
; compiling (DEFCONSTANT CHARACTER-SET-SWITCH-KEYSYM ...)
; compiling (DEFCONSTANT LEFT-SHIFT-KEYSYM ...)
; compiling (DEFCONSTANT RIGHT-SHIFT-KEYSYM ...)
; compiling (DEFCONSTANT LEFT-CONTROL-KEYSYM ...)
; compiling (DEFCONSTANT RIGHT-CONTROL-KEYSYM ...)
; compiling (DEFCONSTANT CAPS-LOCK-KEYSYM ...)
; compiling (DEFCONSTANT SHIFT-LOCK-KEYSYM ...)
; compiling (DEFCONSTANT LEFT-META-KEYSYM ...)
; compiling (DEFCONSTANT RIGHT-META-KEYSYM ...)
; compiling (DEFCONSTANT LEFT-ALT-KEYSYM ...)
; compiling (DEFCONSTANT RIGHT-ALT-KEYSYM ...)
; compiling (DEFCONSTANT LEFT-SUPER-KEYSYM ...)
; compiling (DEFCONSTANT RIGHT-SUPER-KEYSYM ...)
; compiling (DEFCONSTANT LEFT-HYPER-KEYSYM ...)
; compiling (DEFCONSTANT RIGHT-HYPER-KEYSYM ...)
; compiling (DEFUN DISPLAY-KEYBOARD-MAPPING ...)
; compiling (DEFUN KEYCODE->KEYSYM ...)
; compiling (DEFUN KEYSYM->CHARACTER ...)
; compiling (DEFUN MAPPING-MATCHES-P ...)
; compiling (DEFUN DEFAULT-KEYSYM-INDEX ...)
; compiling (DEFUN KEYSYM-SHIFT-P ...)
; compiling (DEFUN KEYCODE->CHARACTER ...)
; compiling (DEFUN GET-DISPLAY-MODIFIER-MAPPING ...)
; compiling (DEFUN STATE-KEYSYMP ...)
; compiling (DEFUN MAPPING-NOTIFY ...)
; compiling (DEFUN KEYSYM-IN-MAP-P ...)
; compiling (DEFUN CHARACTER-IN-MAP-P ...)
; compiling (DEFUN KEYSYM->KEYCODES ...)

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/translate.fasl written
; compilation finished in 0:00:01
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/keysyms.lisp" (written 27 MAR 2006 07:17:43 PM):
; compiling (IN-PACKAGE :XLIB)
; compiling (DEFINE-KEYSYM-SET :LATIN-1 ...)
; compiling (DEFINE-KEYSYM-SET :LATIN-2 ...)
; compiling (DEFINE-KEYSYM-SET :LATIN-3 ...)
; compiling (DEFINE-KEYSYM-SET :LATIN-4 ...)
; compiling (DEFINE-KEYSYM-SET :KANA ...)
; compiling (DEFINE-KEYSYM-SET :ARABIC ...)
; compiling (DEFINE-KEYSYM-SET :CYRILLIC ...)
; compiling (DEFINE-KEYSYM-SET :GREEK ...)
; compiling (DEFINE-KEYSYM-SET :TECH ...)
; compiling (DEFINE-KEYSYM-SET :SPECIAL ...)
; compiling (DEFINE-KEYSYM-SET :PUBLISH ...)
; compiling (DEFINE-KEYSYM-SET :APL ...)
; compiling (DEFINE-KEYSYM-SET :HEBREW ...)
; compiling (DEFINE-KEYSYM-SET :THAI ...)
; compiling (DEFINE-KEYSYM-SET :KOREAN ...)
; compiling (DEFINE-KEYSYM-SET :LATIN-5 ...)
; compiling (DEFINE-KEYSYM-SET :LATIN-6 ...)
; compiling (DEFINE-KEYSYM-SET :LATIN-7 ...)
; compiling (DEFINE-KEYSYM-SET :LATIN-8 ...)
; compiling (DEFINE-KEYSYM-SET :LATIN-9 ...)
; compiling (DEFINE-KEYSYM-SET :CURRENCY ...)
; compiling (DEFINE-KEYSYM-SET :|3270| ...)
; compiling (DEFINE-KEYSYM-SET :XKB ...)
; compiling (DEFINE-KEYSYM-SET :KEYBOARD ...)
; compiling (DEFINE-KEYSYM :CHARACTER-SET-SWITCH ...)
; compiling (DEFINE-KEYSYM :LEFT-SHIFT ...)
; compiling (DEFINE-KEYSYM :RIGHT-SHIFT ...)
; compiling (DEFINE-KEYSYM :LEFT-CONTROL ...)
; compiling (DEFINE-KEYSYM :RIGHT-CONTROL ...)
; compiling (DEFINE-KEYSYM :CAPS-LOCK ...)
; compiling (DEFINE-KEYSYM :SHIFT-LOCK ...)
; compiling (DEFINE-KEYSYM :LEFT-META ...)
; compiling (DEFINE-KEYSYM :RIGHT-META ...)
; compiling (DEFINE-KEYSYM :LEFT-ALT ...)
; compiling (DEFINE-KEYSYM :RIGHT-ALT ...)
; compiling (DEFINE-KEYSYM :LEFT-SUPER ...)
; compiling (DEFINE-KEYSYM :RIGHT-SUPER ...)
; compiling (DEFINE-KEYSYM :LEFT-HYPER ...)
; compiling (DEFINE-KEYSYM :RIGHT-HYPER ...)
; compiling (DEFINE-KEYSYM #\  ...)
; compiling (DEFINE-KEYSYM #\! ...)
; compiling (DEFINE-KEYSYM #\" ...)
; compiling (DEFINE-KEYSYM #\# ...)
; compiling (DEFINE-KEYSYM #\$ ...)
; compiling (DEFINE-KEYSYM #\% ...)
; compiling (DEFINE-KEYSYM #\& ...)
; compiling (DEFINE-KEYSYM #\' ...)
; compiling (DEFINE-KEYSYM #\( ...)
; compiling (DEFINE-KEYSYM #\) ...)
; compiling (DEFINE-KEYSYM #\* ...)
; compiling (DEFINE-KEYSYM #\+ ...)
; compiling (DEFINE-KEYSYM #\, ...)
; compiling (DEFINE-KEYSYM #\- ...)
; compiling (DEFINE-KEYSYM #\. ...)
; compiling (DEFINE-KEYSYM #\/ ...)
; compiling (DEFINE-KEYSYM #\0 ...)
; compiling (DEFINE-KEYSYM #\1 ...)
; compiling (DEFINE-KEYSYM #\2 ...)
; compiling (DEFINE-KEYSYM #\3 ...)
; compiling (DEFINE-KEYSYM #\4 ...)
; compiling (DEFINE-KEYSYM #\5 ...)
; compiling (DEFINE-KEYSYM #\6 ...)
; compiling (DEFINE-KEYSYM #\7 ...)
; compiling (DEFINE-KEYSYM #\8 ...)
; compiling (DEFINE-KEYSYM #\9 ...)
; compiling (DEFINE-KEYSYM #\: ...)
; compiling (DEFINE-KEYSYM #\; ...)
; compiling (DEFINE-KEYSYM #\< ...)
; compiling (DEFINE-KEYSYM #\= ...)
; compiling (DEFINE-KEYSYM #\> ...)
; compiling (DEFINE-KEYSYM #\? ...)
; compiling (DEFINE-KEYSYM #\@ ...)
; compiling (DEFINE-KEYSYM #\A ...)
; compiling (DEFINE-KEYSYM #\B ...)
; compiling (DEFINE-KEYSYM #\C ...)
; compiling (DEFINE-KEYSYM #\D ...)
; compiling (DEFINE-KEYSYM #\E ...)
; compiling (DEFINE-KEYSYM #\F ...)
; compiling (DEFINE-KEYSYM #\G ...)
; compiling (DEFINE-KEYSYM #\H ...)
; compiling (DEFINE-KEYSYM #\I ...)
; compiling (DEFINE-KEYSYM #\J ...)
; compiling (DEFINE-KEYSYM #\K ...)
; compiling (DEFINE-KEYSYM #\L ...)
; compiling (DEFINE-KEYSYM #\M ...)
; compiling (DEFINE-KEYSYM #\N ...)
; compiling (DEFINE-KEYSYM #\O ...)
; compiling (DEFINE-KEYSYM #\P ...)
; compiling (DEFINE-KEYSYM #\Q ...)
; compiling (DEFINE-KEYSYM #\R ...)
; compiling (DEFINE-KEYSYM #\S ...)
; compiling (DEFINE-KEYSYM #\T ...)
; compiling (DEFINE-KEYSYM #\U ...)
; compiling (DEFINE-KEYSYM #\V ...)
; compiling (DEFINE-KEYSYM #\W ...)
; compiling (DEFINE-KEYSYM #\X ...)
; compiling (DEFINE-KEYSYM #\Y ...)
; compiling (DEFINE-KEYSYM #\Z ...)
; compiling (DEFINE-KEYSYM #\[ ...)
; compiling (DEFINE-KEYSYM #\\ ...)
; compiling (DEFINE-KEYSYM #\] ...)
; compiling (DEFINE-KEYSYM #\^ ...)
; compiling (DEFINE-KEYSYM #\_ ...)
; compiling (DEFINE-KEYSYM #\` ...)
; compiling (DEFINE-KEYSYM #\a ...)
; compiling (DEFINE-KEYSYM #\b ...)
; compiling (DEFINE-KEYSYM #\c ...)
; compiling (DEFINE-KEYSYM #\d ...)
; compiling (DEFINE-KEYSYM #\e ...)
; compiling (DEFINE-KEYSYM #\f ...)
; compiling (DEFINE-KEYSYM #\g ...)
; compiling (DEFINE-KEYSYM #\h ...)
; compiling (DEFINE-KEYSYM #\i ...)
; compiling (DEFINE-KEYSYM #\j ...)
; compiling (DEFINE-KEYSYM #\k ...)
; compiling (DEFINE-KEYSYM #\l ...)
; compiling (DEFINE-KEYSYM #\m ...)
; compiling (DEFINE-KEYSYM #\n ...)
; compiling (DEFINE-KEYSYM #\o ...)
; compiling (DEFINE-KEYSYM #\p ...)
; compiling (DEFINE-KEYSYM #\q ...)
; compiling (DEFINE-KEYSYM #\r ...)
; compiling (DEFINE-KEYSYM #\s ...)
; compiling (DEFINE-KEYSYM #\t ...)
; compiling (DEFINE-KEYSYM #\u ...)
; compiling (DEFINE-KEYSYM #\v ...)
; compiling (DEFINE-KEYSYM #\w ...)
; compiling (DEFINE-KEYSYM #\x ...)
; compiling (DEFINE-KEYSYM #\y ...)
; compiling (DEFINE-KEYSYM #\z ...)
; compiling (DEFINE-KEYSYM #\{ ...)
; compiling (DEFINE-KEYSYM #\| ...)
; compiling (DEFINE-KEYSYM #\} ...)
; compiling (DEFINE-KEYSYM #\~ ...)
; compiling (DEFINE-KEYSYM #\Rubout ...)
; compiling (DEFINE-KEYSYM #\Tab ...)
; compiling (DEFINE-KEYSYM #\Newline ...)
; compiling (DEFINE-KEYSYM #\Page ...)
; compiling (DEFINE-KEYSYM #\Return ...)
; compiling (DEFINE-KEYSYM #\Backspace ...)
; compiling (DO (#) ...)

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/keysyms.fasl written
; compilation finished in 0:00:01
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/manager.lisp" (written 14 JUL 2005 09:24:45 AM):
; compiling (IN-PACKAGE :XLIB)
; compiling (DEFUN WM-NAME ...)
; compiling (DEFSETF WM-NAME ...)
; compiling (DEFUN SET-STRING-PROPERTY ...)
; compiling (DEFUN WM-ICON-NAME ...)
; compiling (DEFSETF WM-ICON-NAME ...)
; compiling (DEFUN WM-CLIENT-MACHINE ...)
; compiling (DEFSETF WM-CLIENT-MACHINE ...)
; compiling (DEFUN GET-WM-CLASS ...)
; compiling (DEFUN SET-WM-CLASS ...)
; compiling (DEFUN WM-COMMAND ...)
; compiling (DEFSETF WM-COMMAND ...)
; compiling (DEFUN SET-WM-COMMAND ...)
; compiling (DEF-CLX-CLASS (WM-HINTS) ...)
; compiling (DEFUN WM-HINTS ...)
; compiling (DEFSETF WM-HINTS ...)
; compiling (DEFUN SET-WM-HINTS ...)
; compiling (DEFUN DECODE-WM-HINTS ...)
; compiling (DEFUN ENCODE-WM-HINTS ...)
; compiling (DEF-CLX-CLASS (WM-SIZE-HINTS) ...)
; compiling (DEFUN WM-NORMAL-HINTS ...)
; compiling (DEFSETF WM-NORMAL-HINTS ...)
; compiling (DEFUN SET-WM-NORMAL-HINTS ...)
; compiling (DEFUN WM-ZOOM-HINTS ...)
; compiling (DEFSETF WM-ZOOM-HINTS ...)
; compiling (DEFUN SET-WM-ZOOM-HINTS ...)
; compiling (DEFUN DECODE-WM-SIZE-HINTS ...)
; compiling (DEFUN ENCODE-WM-SIZE-HINTS ...)
; compiling (DEFUN ICON-SIZES ...)
; compiling (DEFSETF ICON-SIZES ...)
; compiling (DEFUN SET-ICON-SIZES ...)
; compiling (DEFUN WM-PROTOCOLS ...)
; compiling (DEFSETF WM-PROTOCOLS ...)
; compiling (DEFUN SET-WM-PROTOCOLS ...)
; compiling (DEFUN WM-COLORMAP-WINDOWS ...)
; compiling (DEFSETF WM-COLORMAP-WINDOWS ...)
; compiling (DEFUN SET-WM-COLORMAP-WINDOWS ...)
; compiling (DEFUN TRANSIENT-FOR ...)
; compiling (DEFSETF TRANSIENT-FOR ...)
; compiling (DEFUN SET-TRANSIENT-FOR ...)
; compiling (DEFUN SET-WM-PROPERTIES ...)
; compiling (DEFUN SET-STANDARD-PROPERTIES ...)
; compiling (DEFUN ICONIFY-WINDOW ...)
; compiling (DEFUN WITHDRAW-WINDOW ...)
; compiling (DEF-CLX-CLASS (STANDARD-COLORMAP # ...) ...)
; compiling (DEFUN RGB-COLORMAPS ...)
; compiling (DEFSETF RGB-COLORMAPS ...)
; compiling (DEFUN SET-RGB-COLORMAPS ...)
; compiling (DEFUN GET-STANDARD-COLORMAP ...)
; compiling (DEFUN SET-STANDARD-COLORMAP ...)
; compiling (DEFUN CUT-BUFFER ...)
; compiling (DEFUN (SETF CUT-BUFFER) ...)
; compiling (DEFUN ROTATE-CUT-BUFFERS ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/manager.lisp
; in: DEFUN ROTATE-CUT-BUFFERS
;     (SETF (XLIB:CUT-BUFFER XLIB:DISPLAY :BUFFER XLIB::I) "")
; --> LET* MULTIPLE-VALUE-BIND LET FUNCALL SB-C::%FUNCALL 
; ==>
;   (#<SB-C::GLOBAL-VAR
;      :%SOURCE-NAME (SETF XLIB:CUT-BUFFER)
;      :TYPE #<SB-KERNEL:FUN-TYPE (FUNCTION # #)>
;      :WHERE-FROM :DEFINED
;      :KIND :GLOBAL-FUNCTION {40D6CF01}>
;    #:G3150 #:G3153 #:G3152 #:G3151)
; 
; note: The third argument (in keyword position) is not a constant.

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/manager.fasl written
; compilation finished in 0:00:06
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/image.lisp" (written 14 JUL 2005 09:24:45 AM):
; compiling (IN-PACKAGE :XLIB)
; compiling (DEFMACRO WITH-IMAGE-DATA-BUFFER ...)
; compiling (DEF-CLX-CLASS (IMAGE # ...) ...)
; compiling (DEFMACRO IMAGE-NAME ...)
; compiling (DEFMACRO IMAGE-X-HOT ...)
; compiling (DEFMACRO IMAGE-Y-HOT ...)
; compiling (DEFMACRO IMAGE-RED-MASK ...)
; compiling (DEFMACRO IMAGE-BLUE-MASK ...)
; compiling (DEFMACRO IMAGE-GREEN-MASK ...)
; compiling (DEFUN PRINT-IMAGE ...)
; compiling (DEFCONSTANT +EMPTY-DATA-X+ ...)
; compiling (DEFCONSTANT +EMPTY-DATA-Z+ ...)
; compiling (DEF-CLX-CLASS (IMAGE-X # ...) ...)
; compiling (DEF-CLX-CLASS (IMAGE-XY # ...) ...)
; compiling (DEF-CLX-CLASS (IMAGE-Z # ...) ...)
; compiling (DEFUN CREATE-IMAGE ...)
; compiling (DEFUN IMAGE-NOSWAP ...)
; compiling (DEFUN IMAGE-SWAP-TWO-BYTES ...)
; compiling (DEFUN IMAGE-SWAP-THREE-BYTES ...)
; compiling (DEFUN IMAGE-SWAP-FOUR-BYTES ...)
; compiling (DEFUN IMAGE-SWAP-WORDS ...)
; compiling (DEFUN IMAGE-SWAP-NIBBLES ...)
; compiling (DEFUN IMAGE-SWAP-NIBBLES-LEFT ...)
; compiling (DEFCONSTANT +IMAGE-BYTE-REVERSE+ ...)
; compiling (DEFUN IMAGE-SWAP-BITS ...)
; compiling (DEFUN IMAGE-SWAP-BITS-AND-TWO-BYTES ...)
; compiling (DEFUN IMAGE-SWAP-BITS-AND-FOUR-BYTES ...)
; compiling (DEFUN IMAGE-SWAP-BITS-AND-WORDS ...)
; compiling (DEFCONSTANT +IMAGE-SWAP-FUNCTION+ ...)
; compiling (DEFCONSTANT +IMAGE-SWAP-LSB-FIRST-P+ ...)
; compiling (DEFUN IMAGE-SWAP-FUNCTION ...)
; compiling (DEFUN READ-PIXARRAY-1 ...)
; compiling (DEFUN READ-PIXARRAY-4 ...)
; compiling (DEFUN READ-PIXARRAY-8 ...)
; compiling (DEFUN READ-PIXARRAY-16 ...)
; compiling (DEFUN READ-PIXARRAY-24 ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/image.lisp
; in: DEFUN READ-PIXARRAY-24
;     (XLIB::READ-IMAGE-ASSEMBLE-BYTES
;    (AREF XLIB::BUFFER-BBUF (XLIB::INDEX+ XLIB::I 0))
;    (AREF XLIB::BUFFER-BBUF (XLIB::INDEX+ XLIB::I 1))
;    (AREF XLIB::BUFFER-BBUF (XLIB::INDEX+ XLIB::I 2)))
; --> THE DPB SB-KERNEL:%DPB LET LOGIOR 
; ==>
;   (LOGAND INT (LOGNOT (ASH SB-C::MASK SB-C::POSN)))
; 
; note: forced to do static-fun Two-arg-and (cost 53)
;       unable to do inline fixnum arithmetic (cost 2) because:
;       The first argument is a (UNSIGNED-BYTE 32), not a FIXNUM.
;       unable to do inline (signed-byte 32) arithmetic (cost 3) because:
;       The first argument is a (UNSIGNED-BYTE 32), not a (SIGNED-BYTE 32).
; 
; note: doing unsigned word to integer coercion (cost 20), for:
;       the first argument of static-fun Two-arg-and

; compiling (DEFUN READ-PIXARRAY-32 ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/image.lisp
; in: DEFUN READ-PIXARRAY-32
;     (XLIB::READ-IMAGE-ASSEMBLE-BYTES
;    (AREF XLIB::BUFFER-BBUF (XLIB::INDEX+ XLIB::I 0))
;    (AREF XLIB::BUFFER-BBUF (XLIB::INDEX+ XLIB::I 1))
;    (AREF XLIB::BUFFER-BBUF (XLIB::INDEX+ XLIB::I 2))
;    (AREF XLIB::BUFFER-BBUF (XLIB::INDEX+ XLIB::I 3)))
; --> THE DPB SB-KERNEL:%DPB THE DPB SB-KERNEL:%DPB LET LOGIOR 
; ==>
;   (LOGAND INT (LOGNOT (ASH SB-C::MASK SB-C::POSN)))
; 
; note: forced to do static-fun Two-arg-and (cost 53)
;       unable to do inline fixnum arithmetic (cost 2) because:
;       The first argument is a (UNSIGNED-BYTE 32), not a FIXNUM.
;       unable to do inline (signed-byte 32) arithmetic (cost 3) because:
;       The first argument is a (UNSIGNED-BYTE 32), not a (SIGNED-BYTE 32).
; 
; note: doing unsigned word to integer coercion (cost 20), for:
;       the first argument of static-fun Two-arg-and

; --> THE DPB SB-KERNEL:%DPB LET LOGIOR 
; ==>
;   (LOGAND INT (LOGNOT (ASH SB-C::MASK SB-C::POSN)))
; 
; note: doing unsigned word to integer coercion (cost 20), for:
;       the first argument of static-fun Two-arg-and

; compiling (DEFUN READ-PIXARRAY-INTERNAL ...)
; compiling (DEFUN READ-PIXARRAY ...)
; compiling (DEFUN READ-XY-FORMAT-IMAGE-X ...)
; compiling (DEFUN READ-Z-FORMAT-IMAGE-X ...)
; compiling (DEFUN READ-IMAGE-XY ...)
; compiling (DEFUN READ-IMAGE-Z ...)
; compiling (DEFUN GET-IMAGE ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/image.lisp
; in: DEFUN GET-IMAGE
;     (FIND XLIB::DEPTH
;         (XLIB:DISPLAY-PIXMAP-FORMATS XLIB:DISPLAY)
;         :KEY
;         #'XLIB:PIXMAP-FORMAT-DEPTH)
; --> NTH-VALUE MULTIPLE-VALUE-BIND LET 
; ==>
;   (SB-KERNEL:%FIND-POSITION SB-C::ITEM
;                             SEQUENCE
;                             SB-C::FROM-END
;                             SB-C::START
;                             SB-C::END
;                             (SB-KERNEL:EFFECTIVE-FIND-POSITION-KEY SB-C::KEY)
;                             (SB-KERNEL:EFFECTIVE-FIND-POSITION-TEST SB-C::TEST
;                                                                     SB-C::TEST-NOT))
; 
; note: unable to
;   expand inline
; due to type uncertainty:
;   The second argument is a SEQUENCE, not a LIST.
; 
; note: unable to
;   expand inline
; due to type uncertainty:
;   The second argument is a SEQUENCE, not a VECTOR.

;     (SETF (XLIB:IMAGE-BLUE-MASK XLIB:IMAGE)
;           (XLIB:VISUAL-INFO-BLUE-MASK XLIB:VISUAL-INFO))
; --> LET* MULTIPLE-VALUE-BIND LET LET 
; ==>
;   (SB-IMPL::%PUTF (XLIB:IMAGE-PLIST #:G3266) #:G3268 #:G3267)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (SETF (XLIB:IMAGE-GREEN-MASK XLIB:IMAGE)
;           (XLIB:VISUAL-INFO-GREEN-MASK XLIB:VISUAL-INFO))
; --> LET* MULTIPLE-VALUE-BIND LET LET 
; ==>
;   (SB-IMPL::%PUTF (XLIB:IMAGE-PLIST #:G3260) #:G3262 #:G3261)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (SETF (XLIB:IMAGE-RED-MASK XLIB:IMAGE)
;           (XLIB:VISUAL-INFO-RED-MASK XLIB:VISUAL-INFO))
; --> LET* MULTIPLE-VALUE-BIND LET LET 
; ==>
;   (SB-IMPL::%PUTF (XLIB:IMAGE-PLIST #:G3254) #:G3256 #:G3255)
; 
; note: doing unsigned word to integer coercion (cost 20)

; compiling (DEFUN WRITE-PIXARRAY-1 ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/image.lisp
; in: DEFUN WRITE-PIXARRAY-1
;     (XLIB::WRITE-IMAGE-ASSEMBLE-BYTES
;    (AREF ARRAY XLIB::Y (XLIB::INDEX+ XLIB::X 0))
;    (IF (XLIB::INDEX> XLIB::RIGHT-BITS 1)
;        (AREF ARRAY XLIB::Y (XLIB::INDEX+ XLIB::X 1))
;        0)
;    (IF (XLIB::INDEX> XLIB::RIGHT-BITS 2)
;        (AREF ARRAY XLIB::Y (XLIB::INDEX+ XLIB::X 2))
;        0)
;    (IF (XLIB::INDEX> XLIB::RIGHT-BITS 3)
;        (AREF ARRAY XLIB::Y (XLIB::INDEX+ XLIB::X 3))
;        0)
;    (IF (XLIB::INDEX> XLIB::RIGHT-BITS 4)
;        (AREF ARRAY XLIB::Y (XLIB::INDEX+ XLIB::X 4))
;        0)
;    (IF (XLIB::INDEX> XLIB::RIGHT-BITS 5)
;        (AREF ARRAY XLIB::Y (XLIB::INDEX+ XLIB::X 5))
;        0)
;    (IF (XLIB::INDEX> XLIB::RIGHT-BITS 6)
;        (AREF ARRAY XLIB::Y (XLIB::INDEX+ XLIB::X 6))
;        0)
;    0)
; --> THE DPB SB-KERNEL:%DPB THE DPB SB-KERNEL:%DPB THE DPB SB-KERNEL:%DPB THE 
; --> DPB SB-KERNEL:%DPB THE DPB SB-KERNEL:%DPB THE DPB SB-KERNEL:%DPB LET 
; --> LOGIOR 
; ==>
;   (LOGAND INT (LOGNOT (ASH SB-C::MASK SB-C::POSN)))
; 
; note: forced to do static-fun Two-arg-and (cost 53)
;       unable to do inline fixnum arithmetic (cost 2) because:
;       The first argument is a (UNSIGNED-BYTE 32), not a FIXNUM.
;       unable to do inline (signed-byte 32) arithmetic (cost 3) because:
;       The first argument is a (UNSIGNED-BYTE 32), not a (SIGNED-BYTE 32).

; --> THE DPB SB-KERNEL:%DPB THE DPB SB-KERNEL:%DPB THE DPB SB-KERNEL:%DPB THE 
; --> DPB SB-KERNEL:%DPB THE DPB SB-KERNEL:%DPB LET LOGIOR 
; ==>
;   (LOGAND INT (LOGNOT (ASH SB-C::MASK SB-C::POSN)))
; 
; note: forced to do static-fun Two-arg-and (cost 53)
;       unable to do inline fixnum arithmetic (cost 2) because:
;       The first argument is a (UNSIGNED-BYTE 32), not a FIXNUM.
;       unable to do inline (signed-byte 32) arithmetic (cost 3) because:
;       The first argument is a (UNSIGNED-BYTE 32), not a (SIGNED-BYTE 32).

; --> THE DPB SB-KERNEL:%DPB THE DPB SB-KERNEL:%DPB THE DPB SB-KERNEL:%DPB THE 
; --> DPB SB-KERNEL:%DPB LET LOGIOR 
; ==>
;   (LOGAND INT (LOGNOT (ASH SB-C::MASK SB-C::POSN)))
; 
; note: forced to do static-fun Two-arg-and (cost 53)
;       unable to do inline fixnum arithmetic (cost 2) because:
;       The first argument is a (UNSIGNED-BYTE 32), not a FIXNUM.
;       unable to do inline (signed-byte 32) arithmetic (cost 3) because:
;       The first argument is a (UNSIGNED-BYTE 32), not a (SIGNED-BYTE 32).

; --> THE DPB SB-KERNEL:%DPB THE DPB SB-KERNEL:%DPB THE DPB SB-KERNEL:%DPB LET 
; --> LOGIOR 
; ==>
;   (LOGAND INT (LOGNOT (ASH SB-C::MASK SB-C::POSN)))
; 
; note: forced to do static-fun Two-arg-and (cost 53)
;       unable to do inline fixnum arithmetic (cost 2) because:
;       The first argument is a (UNSIGNED-BYTE 32), not a FIXNUM.
;       unable to do inline (signed-byte 32) arithmetic (cost 3) because:
;       The first argument is a (UNSIGNED-BYTE 32), not a (SIGNED-BYTE 32).

; --> THE DPB SB-KERNEL:%DPB THE DPB SB-KERNEL:%DPB LET LOGIOR 
; ==>
;   (LOGAND INT (LOGNOT (ASH SB-C::MASK SB-C::POSN)))
; 
; note: forced to do static-fun Two-arg-and (cost 53)
;       unable to do inline fixnum arithmetic (cost 2) because:
;       The first argument is a (UNSIGNED-BYTE 32), not a FIXNUM.
;       unable to do inline (signed-byte 32) arithmetic (cost 3) because:
;       The first argument is a (UNSIGNED-BYTE 32), not a (SIGNED-BYTE 32).

; --> THE DPB SB-KERNEL:%DPB LET LOGIOR 
; ==>
;   (LOGAND INT (LOGNOT (ASH SB-C::MASK SB-C::POSN)))
; 
; note: forced to do static-fun Two-arg-and (cost 53)
;       unable to do inline fixnum arithmetic (cost 2) because:
;       The first argument is a (UNSIGNED-BYTE 32), not a FIXNUM.
;       unable to do inline (signed-byte 32) arithmetic (cost 3) because:
;       The first argument is a (UNSIGNED-BYTE 32), not a (SIGNED-BYTE 32).

;     (XLIB::WRITE-IMAGE-ASSEMBLE-BYTES
;    (AREF ARRAY XLIB::Y (XLIB::INDEX+ XLIB::X 0))
;    (AREF ARRAY XLIB::Y (XLIB::INDEX+ XLIB::X 1))
;    (AREF ARRAY XLIB::Y (XLIB::INDEX+ XLIB::X 2))
;    (AREF ARRAY XLIB::Y (XLIB::INDEX+ XLIB::X 3))
;    (AREF ARRAY XLIB::Y (XLIB::INDEX+ XLIB::X 4))
;    (AREF ARRAY XLIB::Y (XLIB::INDEX+ XLIB::X 5))
;    (AREF ARRAY XLIB::Y (XLIB::INDEX+ XLIB::X 6))
;    (AREF ARRAY XLIB::Y (XLIB::INDEX+ XLIB::X 7)))
; --> THE DPB SB-KERNEL:%DPB THE DPB SB-KERNEL:%DPB THE DPB SB-KERNEL:%DPB THE 
; --> DPB SB-KERNEL:%DPB THE DPB SB-KERNEL:%DPB THE DPB SB-KERNEL:%DPB LET 
; --> LOGIOR 
; ==>
;   (LOGAND INT (LOGNOT (ASH SB-C::MASK SB-C::POSN)))
; 
; note: forced to do static-fun Two-arg-and (cost 53)
;       unable to do inline fixnum arithmetic (cost 2) because:
;       The first argument is a (UNSIGNED-BYTE 32), not a FIXNUM.
;       unable to do inline (signed-byte 32) arithmetic (cost 3) because:
;       The first argument is a (UNSIGNED-BYTE 32), not a (SIGNED-BYTE 32).

; --> THE DPB SB-KERNEL:%DPB THE DPB SB-KERNEL:%DPB THE DPB SB-KERNEL:%DPB THE 
; --> DPB SB-KERNEL:%DPB THE DPB SB-KERNEL:%DPB LET LOGIOR 
; ==>
;   (LOGAND INT (LOGNOT (ASH SB-C::MASK SB-C::POSN)))
; 
; note: forced to do static-fun Two-arg-and (cost 53)
;       unable to do inline fixnum arithmetic (cost 2) because:
;       The first argument is a (UNSIGNED-BYTE 32), not a FIXNUM.
;       unable to do inline (signed-byte 32) arithmetic (cost 3) because:
;       The first argument is a (UNSIGNED-BYTE 32), not a (SIGNED-BYTE 32).

; --> THE DPB SB-KERNEL:%DPB THE DPB SB-KERNEL:%DPB THE DPB SB-KERNEL:%DPB THE 
; --> DPB SB-KERNEL:%DPB LET LOGIOR 
; ==>
;   (LOGAND INT (LOGNOT (ASH SB-C::MASK SB-C::POSN)))
; 
; note: forced to do static-fun Two-arg-and (cost 53)
;       unable to do inline fixnum arithmetic (cost 2) because:
;       The first argument is a (UNSIGNED-BYTE 32), not a FIXNUM.
;       unable to do inline (signed-byte 32) arithmetic (cost 3) because:
;       The first argument is a (UNSIGNED-BYTE 32), not a (SIGNED-BYTE 32).

; --> THE DPB SB-KERNEL:%DPB THE DPB SB-KERNEL:%DPB THE DPB SB-KERNEL:%DPB LET 
; --> LOGIOR 
; ==>
;   (LOGAND INT (LOGNOT (ASH SB-C::MASK SB-C::POSN)))
; 
; note: forced to do static-fun Two-arg-and (cost 53)
;       unable to do inline fixnum arithmetic (cost 2) because:
;       The first argument is a (UNSIGNED-BYTE 32), not a FIXNUM.
;       unable to do inline (signed-byte 32) arithmetic (cost 3) because:
;       The first argument is a (UNSIGNED-BYTE 32), not a (SIGNED-BYTE 32).

; --> THE DPB SB-KERNEL:%DPB THE DPB SB-KERNEL:%DPB LET LOGIOR 
; ==>
;   (LOGAND INT (LOGNOT (ASH SB-C::MASK SB-C::POSN)))
; 
; note: forced to do static-fun Two-arg-and (cost 53)
;       unable to do inline fixnum arithmetic (cost 2) because:
;       The first argument is a (UNSIGNED-BYTE 32), not a FIXNUM.
;       unable to do inline (signed-byte 32) arithmetic (cost 3) because:
;       The first argument is a (UNSIGNED-BYTE 32), not a (SIGNED-BYTE 32).

; --> THE DPB SB-KERNEL:%DPB LET LOGIOR 
; ==>
;   (LOGAND INT (LOGNOT (ASH SB-C::MASK SB-C::POSN)))
; 
; note: forced to do static-fun Two-arg-and (cost 53)
;       unable to do inline fixnum arithmetic (cost 2) because:
;       The first argument is a (UNSIGNED-BYTE 32), not a FIXNUM.
;       unable to do inline (signed-byte 32) arithmetic (cost 3) because:
;       The first argument is a (UNSIGNED-BYTE 32), not a (SIGNED-BYTE 32).

; --> THE DPB SB-KERNEL:%DPB THE DPB SB-KERNEL:%DPB THE DPB SB-KERNEL:%DPB THE 
; --> DPB SB-KERNEL:%DPB THE DPB SB-KERNEL:%DPB THE DPB SB-KERNEL:%DPB LET 
; --> LOGIOR 
; ==>
;   (LOGAND INT (LOGNOT (ASH SB-C::MASK SB-C::POSN)))
; 
; note: doing unsigned word to integer coercion (cost 20), for:
;       the first argument of static-fun Two-arg-and

; --> THE DPB SB-KERNEL:%DPB THE DPB SB-KERNEL:%DPB THE DPB SB-KERNEL:%DPB THE 
; --> DPB SB-KERNEL:%DPB THE DPB SB-KERNEL:%DPB LET LOGIOR 
; ==>
;   (LOGAND INT (LOGNOT (ASH SB-C::MASK SB-C::POSN)))
; 
; note: doing unsigned word to integer coercion (cost 20), for:
;       the first argument of static-fun Two-arg-and

; --> THE DPB SB-KERNEL:%DPB THE DPB SB-KERNEL:%DPB THE DPB SB-KERNEL:%DPB THE 
; --> DPB SB-KERNEL:%DPB LET LOGIOR 
; ==>
;   (LOGAND INT (LOGNOT (ASH SB-C::MASK SB-C::POSN)))
; 
; note: doing unsigned word to integer coercion (cost 20), for:
;       the first argument of static-fun Two-arg-and

; --> THE DPB SB-KERNEL:%DPB THE DPB SB-KERNEL:%DPB THE DPB SB-KERNEL:%DPB LET 
; --> LOGIOR 
; ==>
;   (LOGAND INT (LOGNOT (ASH SB-C::MASK SB-C::POSN)))
; 
; note: doing unsigned word to integer coercion (cost 20), for:
;       the first argument of static-fun Two-arg-and

; --> THE DPB SB-KERNEL:%DPB THE DPB SB-KERNEL:%DPB LET LOGIOR 
; ==>
;   (LOGAND INT (LOGNOT (ASH SB-C::MASK SB-C::POSN)))
; 
; note: doing unsigned word to integer coercion (cost 20), for:
;       the first argument of static-fun Two-arg-and

; --> THE DPB SB-KERNEL:%DPB LET LOGIOR 
; ==>
;   (LOGAND INT (LOGNOT (ASH SB-C::MASK SB-C::POSN)))
; 
; note: doing unsigned word to integer coercion (cost 20), for:
;       the first argument of static-fun Two-arg-and

;     (XLIB::WRITE-IMAGE-ASSEMBLE-BYTES
;    (AREF ARRAY XLIB::Y (XLIB::INDEX+ XLIB::X 0))
;    (IF (XLIB::INDEX> XLIB::RIGHT-BITS 1)
;        (AREF ARRAY XLIB::Y (XLIB::INDEX+ XLIB::X 1))
;        0)
;    (IF (XLIB::INDEX> XLIB::RIGHT-BITS 2)
;        (AREF ARRAY XLIB::Y (XLIB::INDEX+ XLIB::X 2))
;        0)
;    (IF (XLIB::INDEX> XLIB::RIGHT-BITS 3)
;        (AREF ARRAY XLIB::Y (XLIB::INDEX+ XLIB::X 3))
;        0)
;    (IF (XLIB::INDEX> XLIB::RIGHT-BITS 4)
;        (AREF ARRAY XLIB::Y (XLIB::INDEX+ XLIB::X 4))
;        0)
;    (IF (XLIB::INDEX> XLIB::RIGHT-BITS 5)
;        (AREF ARRAY XLIB::Y (XLIB::INDEX+ XLIB::X 5))
;        0)
;    (IF (XLIB::INDEX> XLIB::RIGHT-BITS 6)
;        (AREF ARRAY XLIB::Y (XLIB::INDEX+ XLIB::X 6))
;        0)
;    0)
; --> THE DPB SB-KERNEL:%DPB THE DPB SB-KERNEL:%DPB THE DPB SB-KERNEL:%DPB THE 
; --> DPB SB-KERNEL:%DPB THE DPB SB-KERNEL:%DPB THE DPB SB-KERNEL:%DPB LET 
; --> LOGIOR 
; ==>
;   (LOGAND INT (LOGNOT (ASH SB-C::MASK SB-C::POSN)))
; 
; note: doing unsigned word to integer coercion (cost 20), for:
;       the first argument of static-fun Two-arg-and

; --> THE DPB SB-KERNEL:%DPB THE DPB SB-KERNEL:%DPB THE DPB SB-KERNEL:%DPB THE 
; --> DPB SB-KERNEL:%DPB THE DPB SB-KERNEL:%DPB LET LOGIOR 
; ==>
;   (LOGAND INT (LOGNOT (ASH SB-C::MASK SB-C::POSN)))
; 
; note: doing unsigned word to integer coercion (cost 20), for:
;       the first argument of static-fun Two-arg-and

; --> THE DPB SB-KERNEL:%DPB THE DPB SB-KERNEL:%DPB THE DPB SB-KERNEL:%DPB THE 
; --> DPB SB-KERNEL:%DPB LET LOGIOR 
; ==>
;   (LOGAND INT (LOGNOT (ASH SB-C::MASK SB-C::POSN)))
; 
; note: doing unsigned word to integer coercion (cost 20), for:
;       the first argument of static-fun Two-arg-and

; --> THE DPB SB-KERNEL:%DPB THE DPB SB-KERNEL:%DPB THE DPB SB-KERNEL:%DPB LET 
; --> LOGIOR 
; ==>
;   (LOGAND INT (LOGNOT (ASH SB-C::MASK SB-C::POSN)))
; 
; note: doing unsigned word to integer coercion (cost 20), for:
;       the first argument of static-fun Two-arg-and

; --> THE DPB SB-KERNEL:%DPB THE DPB SB-KERNEL:%DPB LET LOGIOR 
; ==>
;   (LOGAND INT (LOGNOT (ASH SB-C::MASK SB-C::POSN)))
; 
; note: doing unsigned word to integer coercion (cost 20), for:
;       the first argument of static-fun Two-arg-and

; --> THE DPB SB-KERNEL:%DPB LET LOGIOR 
; ==>
;   (LOGAND INT (LOGNOT (ASH SB-C::MASK SB-C::POSN)))
; 
; note: doing unsigned word to integer coercion (cost 20), for:
;       the first argument of static-fun Two-arg-and

; compiling (DEFUN WRITE-PIXARRAY-4 ...)
; compiling (DEFUN WRITE-PIXARRAY-8 ...)
; compiling (DEFUN WRITE-PIXARRAY-16 ...)
; compiling (DEFUN WRITE-PIXARRAY-24 ...)
; compiling (DEFUN WRITE-PIXARRAY-32 ...)
; compiling (DEFUN WRITE-PIXARRAY-INTERNAL ...)
; compiling (DEFUN WRITE-PIXARRAY ...)
; compiling (DEFUN WRITE-XY-FORMAT-IMAGE-X-DATA ...)
; compiling (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
; compiling (DEFUN WRITE-Z-FORMAT-IMAGE-X-DATA ...)
; compiling (DEFUN WRITE-Z-FORMAT-IMAGE-X ...)
; compiling (DEFUN WRITE-IMAGE-XY ...)
; compiling (DEFUN WRITE-IMAGE-Z ...)
; compiling (DEFUN PUT-IMAGE ...)
; compiling (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/image.lisp
; in: DEFUN XY-FORMAT-IMAGE-X->IMAGE-X
;     (LET* ((XLIB::PADDED-X
;           (XLIB::INDEX+ XLIB::X (XLIB::IMAGE-X-LEFT-PAD XLIB:IMAGE)))
;          (XLIB::LEFT-PAD (XLIB::INDEX-MOD XLIB::PADDED-X 8))
;          (XLIB::X (XLIB::INDEX- XLIB::PADDED-X XLIB::LEFT-PAD))
;          (XLIB::UNIT (XLIB::IMAGE-X-UNIT XLIB:IMAGE))
;          (XLIB::BYTE-LSB-FIRST-P (XLIB::IMAGE-X-BYTE-LSB-FIRST-P XLIB:IMAGE))
;          (XLIB::BIT-LSB-FIRST-P (XLIB::IMAGE-X-BIT-LSB-FIRST-P XLIB:IMAGE))
;          (XLIB::PAD (XLIB::IMAGE-X-PAD XLIB:IMAGE))
;          (XLIB::PADDED-WIDTH
;           (XLIB::INDEX* (XLIB::INDEX-CEILING # XLIB::PAD) XLIB::PAD))
;          (XLIB::PADDED-BYTES-PER-LINE
;           (XLIB::INDEX-CEILING XLIB::PADDED-WIDTH 8))
;          (XLIB::PADDED-BYTES-PER-PLANE
;           (XLIB::INDEX* XLIB::PADDED-BYTES-PER-LINE XLIB::HEIGHT))
;          (LENGTH
;           (XLIB::INDEX* XLIB::PADDED-BYTES-PER-PLANE
;                         (XLIB:IMAGE-DEPTH XLIB:IMAGE)))
;          (XLIB::OBUF (MAKE-ARRAY LENGTH :ELEMENT-TYPE 'XLIB:CARD8)))
;     (DECLARE (TYPE XLIB:CARD16 XLIB::X)
;              (TYPE XLIB:CARD8 XLIB::LEFT-PAD)
;              (TYPE (MEMBER 8 16 32) XLIB::UNIT XLIB::PAD)
;              (TYPE XLIB:ARRAY-INDEX
;                    XLIB::PADDED-WIDTH
;                    XLIB::PADDED-BYTES-PER-LINE
;                    XLIB::PADDED-BYTES-PER-PLANE
;                    LENGTH)
;              (TYPE XLIB::BUFFER-BYTES XLIB::OBUF))
;     (DOTIMES (XLIB::PLANE (XLIB:IMAGE-DEPTH XLIB:IMAGE))
;       (LET ((XLIB::DATA-START #) (XLIB::OBUF-START #))
;         (DECLARE (TYPE XLIB:ARRAY-INDEX XLIB::DATA-START XLIB::OBUF-START))
;         (XLIB::WRITE-XY-FORMAT-IMAGE-X-DATA (XLIB::IMAGE-X-DATA XLIB:IMAGE)
;                                             XLIB::OBUF
;                                             XLIB::DATA-START
;                                             XLIB::OBUF-START
;                                             XLIB::X
;                                             XLIB::Y
;                                             XLIB::WIDTH
;                                             XLIB::HEIGHT
;                                             (XLIB::IMAGE-X-BYTES-PER-LINE
;                                              XLIB:IMAGE)
;                                             XLIB::PADDED-BYTES-PER-LINE
;                                             XLIB::UNIT
;                                             ...)))
;     (XLIB:CREATE-IMAGE :WIDTH
;                        XLIB::WIDTH
;                        :HEIGHT
;                        XLIB::HEIGHT
;                        :DEPTH
;                        (XLIB:IMAGE-DEPTH XLIB:IMAGE)
;                        :DATA
;                        XLIB::OBUF
;                        :FORMAT
;                        (XLIB::IMAGE-X-FORMAT XLIB:IMAGE)
;                        :BITS-PER-PIXEL
;                        ...))
; 
; note: deleting unreachable code

; compiling (DEFUN Z-FORMAT-IMAGE-X->IMAGE-X ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/image.lisp
; in: DEFUN Z-FORMAT-IMAGE-X->IMAGE-X
;     (LET* ((XLIB::PADDED-X
;           (XLIB::INDEX+ XLIB::X (XLIB::IMAGE-X-LEFT-PAD XLIB:IMAGE)))
;          (XLIB::LEFT-PAD
;           (IF (XLIB::INDEX= # 1) (XLIB::INDEX-MOD XLIB::PADDED-X 8) 0))
;          (XLIB::X (XLIB::INDEX- XLIB::PADDED-X XLIB::LEFT-PAD))
;          (XLIB::BITS-PER-PIXEL (XLIB::IMAGE-X-BITS-PER-PIXEL XLIB:IMAGE))
;          (XLIB::UNIT (XLIB::IMAGE-X-UNIT XLIB:IMAGE))
;          (XLIB::BYTE-LSB-FIRST-P (XLIB::IMAGE-X-BYTE-LSB-FIRST-P XLIB:IMAGE))
;          (XLIB::BIT-LSB-FIRST-P (XLIB::IMAGE-X-BIT-LSB-FIRST-P XLIB:IMAGE))
;          (XLIB::PAD (XLIB::IMAGE-X-PAD XLIB:IMAGE))
;          (XLIB::BITS-PER-LINE
;           (XLIB::INDEX* (XLIB::INDEX+ XLIB::WIDTH XLIB::LEFT-PAD)
;                         XLIB::BITS-PER-PIXEL))
;          (XLIB::PADDED-BITS-PER-LINE
;           (XLIB::INDEX* (XLIB::INDEX-CEILING XLIB::BITS-PER-LINE XLIB::PAD)
;                         XLIB::PAD))
;          (XLIB::PADDED-BYTES-PER-LINE
;           (XLIB::INDEX-CEILING XLIB::PADDED-BITS-PER-LINE 8))
;          (XLIB::PADDED-BYTES-PER-PLANE
;           (XLIB::INDEX* XLIB::PADDED-BYTES-PER-LINE XLIB::HEIGHT))
;          ...)
;     (DECLARE (TYPE XLIB:CARD16 XLIB::X)
;              (TYPE XLIB:CARD8 XLIB::LEFT-PAD)
;              (TYPE (MEMBER 8 16 32) XLIB::UNIT XLIB::PAD)
;              (TYPE XLIB:ARRAY-INDEX
;                    XLIB::BITS-PER-PIXEL
;                    XLIB::PADDED-BYTES-PER-LINE
;                    XLIB::PADDED-BYTES-PER-PLANE
;                    LENGTH)
;              (TYPE XLIB::BUFFER-BYTES XLIB::OBUF))
;     (XLIB::WRITE-Z-FORMAT-IMAGE-X-DATA (XLIB::IMAGE-X-DATA XLIB:IMAGE)
;                                        XLIB::OBUF
;                                        0
;                                        0
;                                        XLIB::X
;                                        XLIB::Y
;                                        XLIB::WIDTH
;                                        XLIB::HEIGHT
;                                        (XLIB::IMAGE-X-BYTES-PER-LINE
;                                         XLIB:IMAGE)
;                                        XLIB::PADDED-BYTES-PER-LINE
;                                        XLIB::BITS-PER-PIXEL
;                                        ...)
;     (XLIB:CREATE-IMAGE :WIDTH
;                        XLIB::WIDTH
;                        :HEIGHT
;                        XLIB::HEIGHT
;                        :DEPTH
;                        (XLIB:IMAGE-DEPTH XLIB:IMAGE)
;                        :DATA
;                        XLIB::OBUF
;                        :FORMAT
;                        :Z-PIXMAP
;                        :BITS-PER-PIXEL
;                        ...))
; 
; note: deleting unreachable code

; compiling (DEFUN IMAGE-X->IMAGE-X ...)
; compiling (DEFUN IMAGE-X->IMAGE-XY ...)
; compiling (DEFUN IMAGE-X->IMAGE-Z ...)
; compiling (DEFUN COPY-PIXARRAY ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/image.lisp
; in: DEFUN COPY-PIXARRAY
;     (MAKE-ARRAY (LIST XLIB::HEIGHT XLIB::PADDED-WIDTH)
;               :ELEMENT-TYPE
;               (ARRAY-ELEMENT-TYPE ARRAY))
; 
; note: unable to
;   optimize
; because:
;   The element-type is not constant; cannot open code array creation.

; compiling (DEFUN IMAGE-XY->IMAGE-X ...)
; compiling (DEFUN IMAGE-XY->IMAGE-XY ...)
; compiling (DEFUN IMAGE-XY->IMAGE-Z ...)
; compiling (DEFUN IMAGE-Z->IMAGE-X ...)
; compiling (DEFUN IMAGE-Z->IMAGE-XY ...)
; compiling (DEFUN IMAGE-Z->IMAGE-Z ...)
; compiling (DEFUN COPY-IMAGE ...)
; compiling (DEFUN READ-BITMAP-FILE ...)
; compiling (DEFUN WRITE-BITMAP-FILE ...)
; compiling (DEFUN BITMAP-IMAGE ...)
; compiling (DEFUN IMAGE-PIXMAP ...)

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/image.fasl written
; compilation finished in 0:00:11
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/resource.lisp" (written 14 JUL 2005 09:24:43 AM):
; compiling (IN-PACKAGE :XLIB)
; compiling (DEFSTRUCT (RESOURCE-DATABASE # ...) ...)
; compiling (DEFUN PRINT-RESOURCE-DATABASE ...)
; compiling (DEFUN MAKE-RESOURCE-DATABASE ...)
; compiling (DEFUN RESOURCE-DATABASE-TIMESTAMP ...)
; compiling (DEFUN INCF-RESOURCE-DATABASE-TIMESTAMP ...)
; compiling (DEFUN PRINT-DB ...)
; compiling (DEFPARAMETER *UPPERCASE-RESOURCE-SYMBOLS* ...)
; compiling (DEFUN RESOURCE-KEY ...)
; compiling (DEFUN STRINGABLE-EQUAL ...)
; compiling (DEFUN ADD-RESOURCE ...)
; compiling (DEFUN DELETE-RESOURCE ...)
; compiling (DEFUN DELETE-RESOURCE-INTERNAL ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/resource.lisp
; in: DEFUN DELETE-RESOURCE-INTERNAL
;     (SETQ XLIB::LOOSE-P NIL)
; 
; note: deleting unreachable code

; compiling (DEFUN GET-RESOURCE ...)
; compiling (DEFUN GET-ENTRY-LOOKUP ...)
; compiling (DEFUN GET-ENTRY ...)
; compiling (DEFUN GET-SEARCH-RESOURCE ...)
; compiling (DEFVAR *GET-TABLE-RESULT*)
; compiling (DEFUN GET-SEARCH-TABLE ...)
; compiling (DEFUN GET-TABLES-LOOKUP ...)
; compiling (DEFUN GET-TABLES ...)
; compiling (DEFUN MAP-RESOURCE ...)
; compiling (DEFUN MERGE-RESOURCES ...)
; compiling (DEFUN CHAR-MEMQ ...)
; compiling (DEFMACRO RESOURCE-WITH-OPEN-FILE ...)
; compiling (DEFUN READ-RESOURCES ...)
; compiling (DEFUN PARSE-RESOURCE ...)
; compiling (DEFUN WRITE-RESOURCES ...)
; compiling (DEFUN WM-RESOURCES ...)
; compiling (DEFUN SET-WM-RESOURCES ...)
; compiling (DEFUN ROOT-RESOURCES ...)
; compiling (DEFUN SET-ROOT-RESOURCES ...)
; compiling (DEFSETF ROOT-RESOURCES ...)
; compiling (DEFUN INITIALIZE-RESOURCE-DATABASE ...)

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/resource.fasl written
; compilation finished in 0:00:02
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/shape.lisp" (written 14 JUL 2005 09:24:44 AM):
; compiling (IN-PACKAGE :XLIB)
; compiling (EXPORT (QUOTE #) ...)
; compiling (DEFINE-EXTENSION "SHAPE" ...)
; compiling (DECLARE-EVENT :SHAPE-NOTIFY ...)
; compiling (DEFUN ENCODE-SHAPE-KIND ...)
; compiling (DEFUN ENCODE-SHAPE-OPERATION ...)
; compiling (DEFUN ENCODE-SHAPE-RECTANGLE-ORDERING ...)
; compiling (DEFUN SHAPE-QUERY-VERSION ...)
; compiling (DEFUN SHAPE-RECTANGLES ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/shape.lisp
; in: DEFUN SHAPE-RECTANGLES
;     (XLIB::WITH-BUFFER-REQUEST
;    (XLIB:DISPLAY (XLIB:EXTENSION-OPCODE XLIB:DISPLAY "SHAPE"))
;    (XLIB::DATA 1)
;    (XLIB:CARD8 (XLIB::ENCODE-SHAPE-OPERATION XLIB::OPERATION))
;    (XLIB:CARD8 (XLIB::ENCODE-SHAPE-KIND XLIB::KIND))
;    (XLIB:CARD8 (XLIB::ENCODE-SHAPE-RECTANGLE-ORDERING XLIB::ORDERING))
;    (XLIB:CARD8 0)
;    (XLIB:WINDOW XLIB:WINDOW)
;    (XLIB:INT16 XLIB::X-OFFSET)
;    (XLIB:INT16 XLIB::Y-OFFSET)
;    ((SEQUENCE :FORMAT XLIB:INT16) XLIB::RECTANGLES))
; --> LET XLIB::WITH-BUFFER MACROLET LET XLIB::HOLDING-LOCK 
; --> SB-THREAD:WITH-RECURSIVE-LOCK LOCALLY MULTIPLE-VALUE-PROG1 
; --> XLIB::WITHOUT-ABORTS PROGN XLIB::WITH-BUFFER-REQUEST-INTERNAL 
; --> XLIB::WITH-BUFFER-OUTPUT LET LET* XLIB::CHECK-PUT XLIB::SEQUENCE-PUT LET 
; ==>
;   (LENGTH XLIB::RECTANGLES)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a VECTOR.

; compiling (DEFUN SHAPE-MASK ...)
; compiling (DEFUN SHAPE-COMBINE ...)
; compiling (DEFUN SHAPE-OFFSET ...)
; compiling (DEFUN SHAPE-QUERY-EXTENTS ...)
; compiling (DEFUN SHAPE-SELECT-INPUT ...)
; compiling (DEFUN SHAPE-INPUT-SELECTED-P ...)
; compiling (DEFUN SHAPE-GET-RECTANGLES ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/shape.lisp
; in: DEFUN SHAPE-GET-RECTANGLES
;     (* 4 (XLIB::CARD32-GET 8))
; --> * 
; ==>
;   (ASH SB-C::X 2)
; 
; note: forced to do full call
;       unable to do inline ASH (cost 2) because:
;       The first argument is a (UNSIGNED-BYTE 32), not a FIXNUM.
;       The result is a (VALUES (MOD 17179869181)
;                               &OPTIONAL), not a (VALUES FIXNUM &REST T).
;       unable to do inline ASH (cost 3) because:
;       The first argument is a (UNSIGNED-BYTE 32), not a (SIGNED-BYTE 32).
;       The result is a (VALUES (MOD 17179869181)
;                               &OPTIONAL), not a (VALUES (SIGNED-BYTE 32)
;                                                         &REST
;                                                         T).
;       etc.

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/shape.fasl written
; compilation finished in 0:00:01
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/xvidmode.lisp" (written 14 JUL 2005 09:24:45 AM):
; compiling (IN-PACKAGE :XLIB)
; compiling (EXPORT (QUOTE #) ...)
; compiling (DEFCONSTANT +XF86VIDMODE-MAJOR-VERSION+ ...)
; compiling (DEFCONSTANT +XF86VIDMODE-MINOR-VERSION+ ...)
; compiling (DEFCONSTANT +QUERY-VERSION+ ...)
; compiling (DEFCONSTANT +GET-MODE-LINE+ ...)
; compiling (DEFCONSTANT +MOD-MODE-LINE+ ...)
; compiling (DEFCONSTANT +SWITCH-MODE+ ...)
; compiling (DEFCONSTANT +GET-MONITOR+ ...)
; compiling (DEFCONSTANT +LOCK-MODE-SWITCH+ ...)
; compiling (DEFCONSTANT +GET-ALL-MODE-LINES+ ...)
; compiling (DEFCONSTANT +ADD-MODE-LINE+ ...)
; compiling (DEFCONSTANT +DELETE-MODE-LINE+ ...)
; compiling (DEFCONSTANT +VALIDATE-MODE-LINE+ ...)
; compiling (DEFCONSTANT +SWITCH-TO-MODE+ ...)
; compiling (DEFCONSTANT +GET-VIEWPORT+ ...)
; compiling (DEFCONSTANT +SET-VIEWPORT+ ...)
; compiling (DEFCONSTANT +GET-DOT-CLOCKS+ ...)
; compiling (DEFCONSTANT +SET-CLIENT-VERSION+ ...)
; compiling (DEFCONSTANT +SET-GAMMA+ ...)
; compiling (DEFCONSTANT +GET-GAMMA+ ...)
; compiling (DEFCONSTANT +GET-GAMMA-RAMP+ ...)
; compiling (DEFCONSTANT +SET-GAMMA-RAMP+ ...)
; compiling (DEFCONSTANT +GET-GAMMA-RAMP-SIZE+ ...)
; compiling (DEFCONSTANT +GET-PERMISIONS+ ...)
; compiling (DEFINE-EXTENSION "XFree86-VidModeExtension" ...)
; compiling (DEFINE-CONDITION XF86-VIDMODE-BAD-CLOCK ...)
; compiling (DEFINE-CONDITION XF86-VIDMODE-BAD-HTIMINGS ...)
; compiling (DEFINE-CONDITION XF86-VIDMODE-BAD-VTIMINGS ...)
; compiling (DEFINE-CONDITION XF86-VIDMODE-MODE-UNSUITABLE ...)
; compiling (DEFINE-CONDITION XF86-VIDMODE-EXTENSION-DISABLED ...)
; compiling (DEFINE-CONDITION XF86-VIDMODE-CLIENT-NOT-LOCAL ...)
; compiling (DEFINE-CONDITION XF86-VIDMODE-ZOOM-LOCKED ...)
; compiling (DEFINE-ERROR XF86-VIDMODE-BAD-CLOCK ...)
; compiling (DEFINE-ERROR XF86-VIDMODE-BAD-HTIMINGS ...)
; compiling (DEFINE-ERROR XF86-VIDMODE-BAD-VTIMINGS ...)
; compiling (DEFINE-ERROR XF86-VIDMODE-MODE-UNSUITABLE ...)
; compiling (DEFINE-ERROR XF86-VIDMODE-EXTENSION-DISABLED ...)
; compiling (DEFINE-ERROR XF86-VIDMODE-CLIENT-NOT-LOCAL ...)
; compiling (DEFINE-ERROR XF86-VIDMODE-ZOOM-LOCKED ...)
; compiling (DECLARE-EVENT :XFREE86-VIDMODE-NOTIFY ...)
; compiling (DEFSTRUCT MODE-INFO ...)
; compiling (DEFMACRO VIDMODE-OPCODE ...)
; compiling (DECLAIM (INLINE SCREEN-POSITION))
; compiling (DEFUN SCREEN-POSITION ...)
; compiling (DEFUN XFREE86-VIDMODE-QUERY-VERSION ...)
; compiling (DEFUN XFREE86-VIDMODE-SET-CLIENT-VERSION ...)
; compiling (DEFUN XFREE86-VIDMODE-GET-PERMISSIONS ...)
; compiling (DEFUN XFREE86-VIDMODE-MOD-MODE-LINE ...)
; compiling (DEFUN XFREE86-VIDMODE-GET-MODE-LINE ...)
; compiling (DEFUN XFREE86-VIDMODE-GET-ALL-MODE-LINES ...)
; compiling (DEFUN XFREE86-VIDMODE-ADD-MODE-LINE ...)
; compiling (DEFUN XFREE86-VIDMODE-DELETE-MODE-LINE ...)
; compiling (DEFCONSTANT +MODE-STATUS+ ...)
; compiling (DEFUN DECODE-STATUS-MODE ...)
; compiling (DEFUN XFREE86-VIDMODE-VALIDATE-MODE-LINE ...)
; compiling (DEFUN XFREE86-VIDMODE-GET-GAMMA ...)
; compiling (DEFUN XFREE86-VIDMODE-SET-GAMMA ...)
; compiling (DEFUN XFREE86-VIDMODE-GET-GAMMA-RAMP ...)
; compiling (DEFUN XFREE86-VIDMODE-SET-GAMMA-RAMP ...)
; compiling (DEFUN XFREE86-VIDMODE-GET-GAMMA-RAMP-SIZE ...)
; compiling (DEFUN XFREE86-VIDMODE-LOCK-MODE-SWITCH ...)
; compiling (DEFUN XFREE86-VIDMODE-SWITCH-TO-MODE ...)
; compiling (DEFUN XFREE86-VIDMODE-SWITCH-MODE ...)
; compiling (DEFUN XFREE86-VIDMODE-SELECT-NEXT-MODE ...)
; compiling (DEFUN XFREE86-VIDMODE-SELECT-PREV-MODE ...)
; compiling (DEFUN XFREE86-VIDMODE-GET-MONITOR ...)
; compiling (DEFUN XFREE86-VIDMODE-GET-VIEWPORT ...)
; compiling (DEFUN XFREE86-VIDMODE-SET-VIEWPORT ...)
; compiling (DEFUN XFREE86-VIDMODE-GET-DOTCLOCKS ...)
; compiling (DEFUN MODE-INFO->V-CARD16 ...)
; compiling (DECLAIM (INLINE __CARD32->CARD16__))
; compiling (DEFUN __CARD32->CARD16__ ...)

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/xvidmode.fasl written
; compilation finished in 0:00:06
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/xrender.lisp" (written 27 MAR 2006 07:17:43 PM):
; compiling (IN-PACKAGE :XLIB)
; compiling (EXPORT (QUOTE #))
; compiling (PUSHNEW :CLX-EXT-RENDER ...)
; compiling (DEFINE-EXTENSION "RENDER")
; compiling (DEFCONSTANT +X-RENDERQUERYVERSION+ ...)
; compiling (DEFCONSTANT +X-RENDERQUERYPICTFORMATS+ ...)
; compiling (DEFCONSTANT +X-RENDERQUERYPICTINDEXVALUES+ ...)
; compiling (DEFCONSTANT +X-RENDERQUERYDITHERS+ ...)
; compiling (DEFCONSTANT +X-RENDERCREATEPICTURE+ ...)
; compiling (DEFCONSTANT +X-RENDERCHANGEPICTURE+ ...)
; compiling (DEFCONSTANT +X-RENDERSETPICTURECLIPRECTANGLES+ ...)
; compiling (DEFCONSTANT +X-RENDERFREEPICTURE+ ...)
; compiling (DEFCONSTANT +X-RENDERCOMPOSITE+ ...)
; compiling (DEFCONSTANT +X-RENDERSCALE+ ...)
; compiling (DEFCONSTANT +X-RENDERTRAPEZOIDS+ ...)
; compiling (DEFCONSTANT +X-RENDERTRIANGLES+ ...)
; compiling (DEFCONSTANT +X-RENDERTRISTRIP+ ...)
; compiling (DEFCONSTANT +X-RENDERTRIFAN+ ...)
; compiling (DEFCONSTANT +X-RENDERCOLORTRAPEZOIDS+ ...)
; compiling (DEFCONSTANT +X-RENDERCOLORTRIANGLES+ ...)
; compiling (DEFCONSTANT +X-RENDERTRANSFORM+ ...)
; compiling (DEFCONSTANT +X-RENDERCREATEGLYPHSET+ ...)
; compiling (DEFCONSTANT +X-RENDERREFERENCEGLYPHSET+ ...)
; compiling (DEFCONSTANT +X-RENDERFREEGLYPHSET+ ...)
; compiling (DEFCONSTANT +X-RENDERADDGLYPHS+ ...)
; compiling (DEFCONSTANT +X-RENDERADDGLYPHSFROMPICTURE+ ...)
; compiling (DEFCONSTANT +X-RENDERFREEGLYPHS+ ...)
; compiling (DEFCONSTANT +X-RENDERCOMPOSITEGLYPHS8+ ...)
; compiling (DEFCONSTANT +X-RENDERCOMPOSITEGLYPHS16+ ...)
; compiling (DEFCONSTANT +X-RENDERCOMPOSITEGLYPHS32+ ...)
; compiling (DEFCONSTANT +X-RENDERFILLRECTANGLES+ ...)
; compiling (DEFCONSTANT +X-RENDERCREATECURSOR+ ...)
; compiling (DEFCONSTANT +X-RENDERSETPICTURETRANSFORM+ ...)
; compiling (DEFCONSTANT +X-RENDERQUERYFILTERS+ ...)
; compiling (DEFCONSTANT +X-RENDERSETPICTUREFILTER+ ...)
; compiling (DEFCONSTANT +X-RENDERCREATEANIMCURSOR+ ...)
; compiling (DEFSTRUCT RENDER-INFO ...)
; compiling (DEFUN DISPLAY-RENDER-INFO ...)
; compiling (DEFUN (SETF DISPLAY-RENDER-INFO) ...)
; compiling (DEFUN ENSURE-RENDER-INITIALIZED ...)
; compiling (DEFUN FIND-MATCHING-PICTURE-FORMATS ...)
; compiling (DEFUN FIND-WINDOW-PICTURE-FORMAT ...)
; compiling (DEFINE-ACCESSOR PICTURE ...)
; compiling (DEFINE-ACCESSOR GLYPH-SET ...)
; compiling (DEFSTRUCT PICTURE-FORMAT ...)
; compiling (DEFMETHOD PRINT-OBJECT ...)
; compiling (DEFINE-ACCESSOR PICTURE-FORMAT ...)
; compiling (DEFINE-ACCESSOR RENDER-OP ...)
; compiling (DEFTYPE RENDER-OP ...)
; compiling (DEF-CLX-CLASS (PICTURE #) ...)
; compiling (DEFUN PICTURE-DRAWABLE ...)
; compiling (DEFUN %RENDER-CHANGE-PICTURE-CLIP-RECTANGLES ...)
; compiling (FOO (# REPEAT ...) ...)
; compiling (DEFUN RENDER-FREE-PICTURE ...)
; compiling (DEFUN RENDER-FREE-GLYPH-SET ...)
; compiling (DEFUN RENDER-QUERY-VERSION ...)
; compiling (DEFUN RENDER-QUERY-PICTURE-FORMATS ...)
; compiling (DEFUN RENDER-FILL-RECTANGLE ...)
; compiling (DEFUN RENDER-TRIANGLES-1 ...)
; compiling (DEFUN RENDER-SET-PICTURE-TRANSFORM ...)
; compiling (DEFUN RENDER-QUERY-FILTERS ...)
; compiling (DEFUN RENDER-SET-FILTER ...)
; compiling (DEFUN RENDER-TRAPEZOIDS-1 ...)
; compiling (DEFUN RENDER-COMPOSITE ...)
; compiling (DEF-CLX-CLASS (GLYPH-SET #) ...)
; compiling (DEFUN RENDER-CREATE-GLYPH-SET ...)
; compiling (DEFUN RENDER-REFERENCE-GLYPH-SET ...)
; compiling (DEFUN RENDER-COMPOSITE-GLYPHS-8 ...)
; compiling (DEFMACRO %RENDER-COMPOSITE-GLYPHS ...)
; compiling (DEFUN RENDER-COMPOSITE-GLYPHS ...)
; compiling (DEFUN RENDER-ADD-GLYPH ...)
; compiling (DEFUN RENDER-ADD-GLYPH-FROM-PICTURE ...)
; compiling (DEFUN RENDER-FREE-GLYPHS ...)
; compiling (DEFUN RENDER-CREATE-CURSOR ...)

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/xrender.fasl written
; compilation finished in 0:00:12
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/glx.lisp" (written 14 JUL 2005 09:24:45 AM):
; compiling (DEFPACKAGE :GLX ...)
; compiling (IN-PACKAGE :GLX)
; compiling (DECLAIM (OPTIMIZE # ...))
; compiling (DEFINE-EXTENSION "GLX" ...)
; compiling (DEFCONSTANT +RENDER+ ...)
; compiling (DEFCONSTANT +CREATE-CONTEXT+ ...)
; compiling (DEFCONSTANT +DESTROY-CONTEXT+ ...)
; compiling (DEFCONSTANT +MAKE-CURRENT+ ...)
; compiling (DEFCONSTANT +IS-DIRECT+ ...)
; compiling (DEFCONSTANT +QUERY-VERSION+ ...)
; compiling (DEFCONSTANT +WAIT-GL+ ...)
; compiling (DEFCONSTANT +WAIT-X+ ...)
; compiling (DEFCONSTANT +COPY-CONTEXT+ ...)
; compiling (DEFCONSTANT +SWAP-BUFFERS+ ...)
; compiling (DEFCONSTANT +GET-VISUAL-CONFIGS+ ...)
; compiling (DEFCONSTANT +DESTROY-GLX-PIXMAP+ ...)
; compiling (DEFCONSTANT +QUERY-SERVER-STRING+ ...)
; compiling (DEFCONSTANT +CLIENT-INFO+ ...)
; compiling (DEFCONSTANT +GET-FB-CONFIGS+ ...)
; compiling (DEFCONSTANT +QUERY-CONTEXT+ ...)
; compiling (DEFCONSTANT +GET-DRAWABLE-ATTRIBUTES+ ...)
; compiling (DEFCONSTANT +VENDOR+ ...)
; compiling (DEFCONSTANT +VERSION+ ...)
; compiling (DEFCONSTANT +EXTENSIONS+ ...)
; compiling (DEFTYPE ATTRIBUTE-PAIR ...)
; compiling (DEFTYPE BITFIELD ...)
; compiling (DEFTYPE BOOL32 ...)
; compiling (DEFTYPE ENUM ...)
; compiling (DEFTYPE FBCONFIGID ...)
; compiling (DEFTYPE FLOAT32 ...)
; compiling (DEFTYPE FLOAT64 ...)
; compiling (DEFTYPE CONTEXT-TAG ...)
; compiling (DEFTYPE GLX-PIXMAP ...)
; compiling (DEFTYPE GLX-PBUFFER ...)
; compiling (DEFTYPE GLX-RENDER-COMMAND ...)
; compiling (DEFTYPE GLX-WINDOW ...)
; compiling (DEF-CLX-CLASS (CONTEXT # ...) ...)
; compiling (DEFUN PRINT-CONTEXT ...)
; compiling (DEF-CLX-CLASS (VISUAL # ...) ...)
; compiling (DEFUN PRINT-VISUAL ...)
; compiling (DEFCONSTANT +DAMAGED+ ...)
; compiling (DEFCONSTANT +SAVED+ ...)
; compiling (DEFCONSTANT +WINDOW+ ...)
; compiling (DEFCONSTANT +PBUFFER+ ...)
; compiling (DECLARE-EVENT :GLX-PBUFFER-CLOBBER ...)
; compiling (DEFINE-CONDITION BAD-CONTEXT ...)
; compiling (DEFINE-CONDITION BAD-CONTEXT-STATE ...)
; compiling (DEFINE-CONDITION BAD-DRAWABLE ...)
; compiling (DEFINE-CONDITION BAD-PIXMAP ...)
; compiling (DEFINE-CONDITION BAD-CONTEXT-TAG ...)
; compiling (DEFINE-CONDITION BAD-CURRENT-WINDOW ...)
; compiling (DEFINE-CONDITION BAD-RENDER-REQUEST ...)
; compiling (DEFINE-CONDITION BAD-LARGE-REQUEST ...)
; compiling (DEFINE-CONDITION UNSUPPORTED-PRIVATE-REQUEST ...)
; compiling (DEFINE-CONDITION BAD-FB-CONFIG ...)
; compiling (DEFINE-CONDITION BAD-PBUFFER ...)
; compiling (DEFINE-CONDITION BAD-CURRENT-DRAWABLE ...)
; compiling (DEFINE-CONDITION BAD-WINDOW ...)
; compiling (DEFINE-ERROR BAD-CONTEXT ...)
; compiling (DEFINE-ERROR BAD-CONTEXT-STATE ...)
; compiling (DEFINE-ERROR BAD-DRAWABLE ...)
; compiling (DEFINE-ERROR BAD-PIXMAP ...)
; compiling (DEFINE-ERROR BAD-CONTEXT-TAG ...)
; compiling (DEFINE-ERROR BAD-CURRENT-WINDOW ...)
; compiling (DEFINE-ERROR BAD-RENDER-REQUEST ...)
; compiling (DEFINE-ERROR BAD-LARGE-REQUEST ...)
; compiling (DEFINE-ERROR UNSUPPORTED-PRIVATE-REQUEST ...)
; compiling (DEFINE-ERROR BAD-FB-CONFIG ...)
; compiling (DEFINE-ERROR BAD-PBUFFER ...)
; compiling (DEFINE-ERROR BAD-CURRENT-DRAWABLE ...)
; compiling (DEFINE-ERROR BAD-WINDOW ...)
; compiling (DEFUN QUERY-VERSION ...)
; compiling (DEFUN QUERY-SERVER-STRING ...)
; compiling (DEFUN CLIENT-INFO ...)
; compiling (DEFUN MAKE-CONTEXT ...)
; compiling (DEFUN CREATE-CONTEXT ...)
; compiling (DEFVAR *CURRENT-CONTEXT* ...)
; compiling (DEFUN DESTROY-CONTEXT ...)
; compiling (DEFUN IS-DIRECT ...)
; compiling (DEFUN QUERY-CONTEXT ...)
; compiling (DEFUN GET-DRAWABLE-ATTRIBUTES ...)
; compiling (DEFUN MAKE-CURRENT ...)
; compiling (GENERATE-CONFIG-PROPERTIES)
; compiling (DEFUN MAKE-VISUAL ...)
; compiling (DEFUN VISUAL-ATTRIBUTE ...)
; compiling (DEFUN GET-VISUAL-CONFIGS ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/glx.lisp
; in: DEFUN GET-VISUAL-CONFIGS
;     (LOOP GLX::REPEAT
;         (/ (- GLX::NUM-PROPERTIES GLX::NUM-ORDERED) 2)
;         GLX::COLLECTING
;         (CONS (XLIB::CARD32-GET (INCF GLX::INDEX 4))
;               (XLIB::CARD32-GET (INCF GLX::INDEX 4))))
; --> BLOCK LET CEILING 
; ==>
;   (CEILING (/ (- GLX::NUM-PROPERTIES GLX::NUM-ORDERED) 2) 1)
; 
; note: unable to
;   convert division by 2^k to shift
; due to type uncertainty:
;   The first argument is a (RATIONAL -536870909/2 536870911/2), not a INTEGER.

; compiling (DEFUN CHOOSE-VISUAL ...)
; compiling (DEFUN RENDER ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/glx.lisp
; in: DEFUN RENDER
;     (XLIB::ASET-CARD32 (GLX::CONTEXT-TAG GLX::CTX) GLX::RBUF 4)
; 
; note: doing unsigned word to integer coercion (cost 20)

; compiling (DEFUN SWAP-BUFFERS ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/glx.lisp
; in: DEFUN SWAP-BUFFERS
;     (XLIB::WITH-BUFFER-REQUEST
;    (XLIB:DISPLAY (XLIB:EXTENSION-OPCODE XLIB:DISPLAY "GLX"))
;    (XLIB::DATA GLX::+SWAP-BUFFERS+)
;    (XLIB:CARD32 (GLX::CONTEXT-TAG GLX::CTX))
;    (XLIB:RESOURCE-ID (XLIB:DRAWABLE-ID (GLX::CONTEXT-DRAWABLE GLX::CTX))))
; --> LET XLIB::WITH-BUFFER MACROLET LET XLIB::HOLDING-LOCK 
; --> SB-THREAD:WITH-RECURSIVE-LOCK LOCALLY MULTIPLE-VALUE-PROG1 
; --> XLIB::WITHOUT-ABORTS PROGN XLIB::WITH-BUFFER-REQUEST-INTERNAL 
; --> XLIB::WITH-BUFFER-OUTPUT LET LET* XLIB::CHECK-PUT LET XLIB::CARD32-PUT 
; --> XLIB::WRITE-CARD32 
; ==>
;   (XLIB::ASET-CARD32 (THE XLIB:CARD32 XLIB::.VALUE.)
;                      XLIB::BUFFER-BBUF
;                      (XLIB::INDEX+ XLIB::BUFFER-BOFFSET 4))
; 
; note: doing unsigned word to integer coercion (cost 20)

; compiling (DEFUN WAIT-GL ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/glx.lisp
; in: DEFUN WAIT-GL
;     (XLIB::WITH-BUFFER-REQUEST
;    (XLIB:DISPLAY (XLIB:EXTENSION-OPCODE XLIB:DISPLAY "GLX"))
;    (XLIB::DATA GLX::+WAIT-GL+)
;    (XLIB:CARD32 (GLX::CONTEXT-TAG GLX::CTX)))
; --> LET XLIB::WITH-BUFFER MACROLET LET XLIB::HOLDING-LOCK 
; --> SB-THREAD:WITH-RECURSIVE-LOCK LOCALLY MULTIPLE-VALUE-PROG1 
; --> XLIB::WITHOUT-ABORTS PROGN XLIB::WITH-BUFFER-REQUEST-INTERNAL 
; --> XLIB::WITH-BUFFER-OUTPUT LET LET* XLIB::CHECK-PUT LET XLIB::CARD32-PUT 
; --> XLIB::WRITE-CARD32 
; ==>
;   (XLIB::ASET-CARD32 (THE XLIB:CARD32 XLIB::.VALUE.)
;                      XLIB::BUFFER-BBUF
;                      (XLIB::INDEX+ XLIB::BUFFER-BOFFSET 4))
; 
; note: doing unsigned word to integer coercion (cost 20)

; compiling (DEFUN WAIT-X ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/glx.lisp
; in: DEFUN WAIT-X
;     (XLIB::WITH-BUFFER-REQUEST
;    (XLIB:DISPLAY (XLIB:EXTENSION-OPCODE XLIB:DISPLAY "GLX"))
;    (XLIB::DATA GLX::+WAIT-X+)
;    (XLIB:CARD32 (GLX::CONTEXT-TAG GLX::CTX)))
; --> LET XLIB::WITH-BUFFER MACROLET LET XLIB::HOLDING-LOCK 
; --> SB-THREAD:WITH-RECURSIVE-LOCK LOCALLY MULTIPLE-VALUE-PROG1 
; --> XLIB::WITHOUT-ABORTS PROGN XLIB::WITH-BUFFER-REQUEST-INTERNAL 
; --> XLIB::WITH-BUFFER-OUTPUT LET LET* XLIB::CHECK-PUT LET XLIB::CARD32-PUT 
; --> XLIB::WRITE-CARD32 
; ==>
;   (XLIB::ASET-CARD32 (THE XLIB:CARD32 XLIB::.VALUE.)
;                      XLIB::BUFFER-BBUF
;                      (XLIB::INDEX+ XLIB::BUFFER-BOFFSET 4))
; 
; note: doing unsigned word to integer coercion (cost 20)

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/glx.fasl written
; compilation finished in 0:00:07
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp" (written 10 JAN 2006 05:30:09 PM):
; compiling (DEFPACKAGE :GL ...)
; compiling (IN-PACKAGE :GL)
; compiling (DEFCONSTANT +GET-STRING+ ...)
; compiling (DEFCONSTANT +NEW-LIST+ ...)
; compiling (DEFCONSTANT +END-LIST+ ...)
; compiling (DEFCONSTANT +GEN-LISTS+ ...)
; compiling (DEFCONSTANT +FINISH+ ...)
; compiling (DEFCONSTANT +DISABLE+ ...)
; compiling (DEFCONSTANT +ENABLE+ ...)
; compiling (DEFCONSTANT +FLUSH+ ...)
; compiling (DEFCONSTANT +FALSE+ ...)
; compiling (DEFCONSTANT +TRUE+ ...)
; compiling (DEFCONSTANT +BYTE+ ...)
; compiling (DEFCONSTANT +UNSIGNED-BYTE+ ...)
; compiling (DEFCONSTANT +SHORT+ ...)
; compiling (DEFCONSTANT +UNSIGNED-SHORT+ ...)
; compiling (DEFCONSTANT +INT+ ...)
; compiling (DEFCONSTANT +UNSIGNED-INT+ ...)
; compiling (DEFCONSTANT +FLOAT+ ...)
; compiling (DEFCONSTANT +DOUBLE+ ...)
; compiling (DEFCONSTANT +2-BYTES+ ...)
; compiling (DEFCONSTANT +3-BYTES+ ...)
; compiling (DEFCONSTANT +4-BYTES+ ...)
; compiling (DEFCONSTANT +POINTS+ ...)
; compiling (DEFCONSTANT +LINES+ ...)
; compiling (DEFCONSTANT +LINE-LOOP+ ...)
; compiling (DEFCONSTANT +LINE-STRIP+ ...)
; compiling (DEFCONSTANT +TRIANGLES+ ...)
; compiling (DEFCONSTANT +TRIANGLE-STRIP+ ...)
; compiling (DEFCONSTANT +TRIANGLE-FAN+ ...)
; compiling (DEFCONSTANT +QUADS+ ...)
; compiling (DEFCONSTANT +QUAD-STRIP+ ...)
; compiling (DEFCONSTANT +POLYGON+ ...)
; compiling (DEFCONSTANT +VERTEX-ARRAY+ ...)
; compiling (DEFCONSTANT +NORMAL-ARRAY+ ...)
; compiling (DEFCONSTANT +COLOR-ARRAY+ ...)
; compiling (DEFCONSTANT +INDEX-ARRAY+ ...)
; compiling (DEFCONSTANT +TEXTURE-COORD-ARRAY+ ...)
; compiling (DEFCONSTANT +EDGE-FLAG-ARRAY+ ...)
; compiling (DEFCONSTANT +VERTEX-ARRAY-SIZE+ ...)
; compiling (DEFCONSTANT +VERTEX-ARRAY-TYPE+ ...)
; compiling (DEFCONSTANT +VERTEX-ARRAY-STRIDE+ ...)
; compiling (DEFCONSTANT +NORMAL-ARRAY-TYPE+ ...)
; compiling (DEFCONSTANT +NORMAL-ARRAY-STRIDE+ ...)
; compiling (DEFCONSTANT +COLOR-ARRAY-SIZE+ ...)
; compiling (DEFCONSTANT +COLOR-ARRAY-TYPE+ ...)
; compiling (DEFCONSTANT +COLOR-ARRAY-STRIDE+ ...)
; compiling (DEFCONSTANT +INDEX-ARRAY-TYPE+ ...)
; compiling (DEFCONSTANT +INDEX-ARRAY-STRIDE+ ...)
; compiling (DEFCONSTANT +TEXTURE-COORD-ARRAY-SIZE+ ...)
; compiling (DEFCONSTANT +TEXTURE-COORD-ARRAY-TYPE+ ...)
; compiling (DEFCONSTANT +TEXTURE-COORD-ARRAY-STRIDE+ ...)
; compiling (DEFCONSTANT +EDGE-FLAG-ARRAY-STRIDE+ ...)
; compiling (DEFCONSTANT +VERTEX-ARRAY-POINTER+ ...)
; compiling (DEFCONSTANT +NORMAL-ARRAY-POINTER+ ...)
; compiling (DEFCONSTANT +COLOR-ARRAY-POINTER+ ...)
; compiling (DEFCONSTANT +INDEX-ARRAY-POINTER+ ...)
; compiling (DEFCONSTANT +TEXTURE-COORD-ARRAY-POINTER+ ...)
; compiling (DEFCONSTANT +EDGE-FLAG-ARRAY-POINTER+ ...)
; compiling (DEFCONSTANT +V2F+ ...)
; compiling (DEFCONSTANT +V3F+ ...)
; compiling (DEFCONSTANT +C4UB-V2F+ ...)
; compiling (DEFCONSTANT +C4UB-V3F+ ...)
; compiling (DEFCONSTANT +C3F-V3F+ ...)
; compiling (DEFCONSTANT +N3F-V3F+ ...)
; compiling (DEFCONSTANT +C4F-N3F-V3F+ ...)
; compiling (DEFCONSTANT +T2F-V3F+ ...)
; compiling (DEFCONSTANT +T4F-V4F+ ...)
; compiling (DEFCONSTANT +T2F-C4UB-V3F+ ...)
; compiling (DEFCONSTANT +T2F-C3F-V3F+ ...)
; compiling (DEFCONSTANT +T2F-N3F-V3F+ ...)
; compiling (DEFCONSTANT +T2F-C4F-N3F-V3F+ ...)
; compiling (DEFCONSTANT +T4F-C4F-N3F-V4F+ ...)
; compiling (DEFCONSTANT +MATRIX-MODE+ ...)
; compiling (DEFCONSTANT +MODELVIEW+ ...)
; compiling (DEFCONSTANT +PROJECTION+ ...)
; compiling (DEFCONSTANT +TEXTURE+ ...)
; compiling (DEFCONSTANT +POINT-SMOOTH+ ...)
; compiling (DEFCONSTANT +POINT-SIZE+ ...)
; compiling (DEFCONSTANT +POINT-SIZE-GRANULARITY+ ...)
; compiling (DEFCONSTANT +POINT-SIZE-RANGE+ ...)
; compiling (DEFCONSTANT +LINE-SMOOTH+ ...)
; compiling (DEFCONSTANT +LINE-STIPPLE+ ...)
; compiling (DEFCONSTANT +LINE-STIPPLE-PATTERN+ ...)
; compiling (DEFCONSTANT +LINE-STIPPLE-REPEAT+ ...)
; compiling (DEFCONSTANT +LINE-WIDTH+ ...)
; compiling (DEFCONSTANT +LINE-WIDTH-GRANULARITY+ ...)
; compiling (DEFCONSTANT +LINE-WIDTH-RANGE+ ...)
; compiling (DEFCONSTANT +POINT+ ...)
; compiling (DEFCONSTANT +LINE+ ...)
; compiling (DEFCONSTANT +FILL+ ...)
; compiling (DEFCONSTANT +CW+ ...)
; compiling (DEFCONSTANT +CCW+ ...)
; compiling (DEFCONSTANT +FRONT+ ...)
; compiling (DEFCONSTANT +BACK+ ...)
; compiling (DEFCONSTANT +POLYGON-MODE+ ...)
; compiling (DEFCONSTANT +POLYGON-SMOOTH+ ...)
; compiling (DEFCONSTANT +POLYGON-STIPPLE+ ...)
; compiling (DEFCONSTANT +EDGE-FLAG+ ...)
; compiling (DEFCONSTANT +CULL-FACE+ ...)
; compiling (DEFCONSTANT +CULL-FACE-MODE+ ...)
; compiling (DEFCONSTANT +FRONT-FACE+ ...)
; compiling (DEFCONSTANT +POLYGON-OFFSET-FACTOR+ ...)
; compiling (DEFCONSTANT +POLYGON-OFFSET-UNITS+ ...)
; compiling (DEFCONSTANT +POLYGON-OFFSET-POINT+ ...)
; compiling (DEFCONSTANT +POLYGON-OFFSET-LINE+ ...)
; compiling (DEFCONSTANT +POLYGON-OFFSET-FILL+ ...)
; compiling (DEFCONSTANT +COMPILE+ ...)
; compiling (DEFCONSTANT +COMPILE-AND-EXECUTE+ ...)
; compiling (DEFCONSTANT +LIST-BASE+ ...)
; compiling (DEFCONSTANT +LIST-INDEX+ ...)
; compiling (DEFCONSTANT +LIST-MODE+ ...)
; compiling (DEFCONSTANT +NEVER+ ...)
; compiling (DEFCONSTANT +LESS+ ...)
; compiling (DEFCONSTANT +EQUAL+ ...)
; compiling (DEFCONSTANT +LEQUAL+ ...)
; compiling (DEFCONSTANT +GREATER+ ...)
; compiling (DEFCONSTANT +NOTEQUAL+ ...)
; compiling (DEFCONSTANT +GEQUAL+ ...)
; compiling (DEFCONSTANT +ALWAYS+ ...)
; compiling (DEFCONSTANT +DEPTH-TEST+ ...)
; compiling (DEFCONSTANT +DEPTH-BITS+ ...)
; compiling (DEFCONSTANT +DEPTH-CLEAR-VALUE+ ...)
; compiling (DEFCONSTANT +DEPTH-FUNC+ ...)
; compiling (DEFCONSTANT +DEPTH-RANGE+ ...)
; compiling (DEFCONSTANT +DEPTH-WRITEMASK+ ...)
; compiling (DEFCONSTANT +DEPTH-COMPONENT+ ...)
; compiling (DEFCONSTANT +LIGHTING+ ...)
; compiling (DEFCONSTANT +LIGHT0+ ...)
; compiling (DEFCONSTANT +LIGHT1+ ...)
; compiling (DEFCONSTANT +LIGHT2+ ...)
; compiling (DEFCONSTANT +LIGHT3+ ...)
; compiling (DEFCONSTANT +LIGHT4+ ...)
; compiling (DEFCONSTANT +LIGHT5+ ...)
; compiling (DEFCONSTANT +LIGHT6+ ...)
; compiling (DEFCONSTANT +LIGHT7+ ...)
; compiling (DEFCONSTANT +SPOT-EXPONENT+ ...)
; compiling (DEFCONSTANT +SPOT-CUTOFF+ ...)
; compiling (DEFCONSTANT +CONSTANT-ATTENUATION+ ...)
; compiling (DEFCONSTANT +LINEAR-ATTENUATION+ ...)
; compiling (DEFCONSTANT +QUADRATIC-ATTENUATION+ ...)
; compiling (DEFCONSTANT +AMBIENT+ ...)
; compiling (DEFCONSTANT +DIFFUSE+ ...)
; compiling (DEFCONSTANT +SPECULAR+ ...)
; compiling (DEFCONSTANT +SHININESS+ ...)
; compiling (DEFCONSTANT +EMISSION+ ...)
; compiling (DEFCONSTANT +POSITION+ ...)
; compiling (DEFCONSTANT +SPOT-DIRECTION+ ...)
; compiling (DEFCONSTANT +AMBIENT-AND-DIFFUSE+ ...)
; compiling (DEFCONSTANT +COLOR-INDEXES+ ...)
; compiling (DEFCONSTANT +LIGHT-MODEL-TWO-SIDE+ ...)
; compiling (DEFCONSTANT +LIGHT-MODEL-LOCAL-VIEWER+ ...)
; compiling (DEFCONSTANT +LIGHT-MODEL-AMBIENT+ ...)
; compiling (DEFCONSTANT +FRONT-AND-BACK+ ...)
; compiling (DEFCONSTANT +SHADE-MODEL+ ...)
; compiling (DEFCONSTANT +FLAT+ ...)
; compiling (DEFCONSTANT +SMOOTH+ ...)
; compiling (DEFCONSTANT +COLOR-MATERIAL+ ...)
; compiling (DEFCONSTANT +COLOR-MATERIAL-FACE+ ...)
; compiling (DEFCONSTANT +COLOR-MATERIAL-PARAMETER+ ...)
; compiling (DEFCONSTANT +NORMALIZE+ ...)
; compiling (DEFCONSTANT +CLIP-PLANE0+ ...)
; compiling (DEFCONSTANT +CLIP-PLANE1+ ...)
; compiling (DEFCONSTANT +CLIP-PLANE2+ ...)
; compiling (DEFCONSTANT +CLIP-PLANE3+ ...)
; compiling (DEFCONSTANT +CLIP-PLANE4+ ...)
; compiling (DEFCONSTANT +CLIP-PLANE5+ ...)
; compiling (DEFCONSTANT +ACCUM-RED-BITS+ ...)
; compiling (DEFCONSTANT +ACCUM-GREEN-BITS+ ...)
; compiling (DEFCONSTANT +ACCUM-BLUE-BITS+ ...)
; compiling (DEFCONSTANT +ACCUM-ALPHA-BITS+ ...)
; compiling (DEFCONSTANT +ACCUM-CLEAR-VALUE+ ...)
; compiling (DEFCONSTANT +ACCUM+ ...)
; compiling (DEFCONSTANT +ADD+ ...)
; compiling (DEFCONSTANT +LOAD+ ...)
; compiling (DEFCONSTANT +MULT+ ...)
; compiling (DEFCONSTANT +RETURN+ ...)
; compiling (DEFCONSTANT +ALPHA-TEST+ ...)
; compiling (DEFCONSTANT +ALPHA-TEST-REF+ ...)
; compiling (DEFCONSTANT +ALPHA-TEST-FUNC+ ...)
; compiling (DEFCONSTANT +BLEND+ ...)
; compiling (DEFCONSTANT +BLEND-SRC+ ...)
; compiling (DEFCONSTANT +BLEND-DST+ ...)
; compiling (DEFCONSTANT +ZERO+ ...)
; compiling (DEFCONSTANT +ONE+ ...)
; compiling (DEFCONSTANT +SRC-COLOR+ ...)
; compiling (DEFCONSTANT +ONE-MINUS-SRC-COLOR+ ...)
; compiling (DEFCONSTANT +DST-COLOR+ ...)
; compiling (DEFCONSTANT +ONE-MINUS-DST-COLOR+ ...)
; compiling (DEFCONSTANT +SRC-ALPHA+ ...)
; compiling (DEFCONSTANT +ONE-MINUS-SRC-ALPHA+ ...)
; compiling (DEFCONSTANT +DST-ALPHA+ ...)
; compiling (DEFCONSTANT +ONE-MINUS-DST-ALPHA+ ...)
; compiling (DEFCONSTANT +SRC-ALPHA-SATURATE+ ...)
; compiling (DEFCONSTANT +CONSTANT-COLOR+ ...)
; compiling (DEFCONSTANT +ONE-MINUS-CONSTANT-COLOR+ ...)
; compiling (DEFCONSTANT +CONSTANT-ALPHA+ ...)
; compiling (DEFCONSTANT +ONE-MINUS-CONSTANT-ALPHA+ ...)
; compiling (DEFCONSTANT +FEEDBACK+ ...)
; compiling (DEFCONSTANT +RENDER+ ...)
; compiling (DEFCONSTANT +SELECT+ ...)
; compiling (DEFCONSTANT +2D+ ...)
; compiling (DEFCONSTANT +3D+ ...)
; compiling (DEFCONSTANT +3D-COLOR+ ...)
; compiling (DEFCONSTANT +3D-COLOR-TEXTURE+ ...)
; compiling (DEFCONSTANT +4D-COLOR-TEXTURE+ ...)
; compiling (DEFCONSTANT +POINT-TOKEN+ ...)
; compiling (DEFCONSTANT +LINE-TOKEN+ ...)
; compiling (DEFCONSTANT +LINE-RESET-TOKEN+ ...)
; compiling (DEFCONSTANT +POLYGON-TOKEN+ ...)
; compiling (DEFCONSTANT +BITMAP-TOKEN+ ...)
; compiling (DEFCONSTANT +DRAW-PIXEL-TOKEN+ ...)
; compiling (DEFCONSTANT +COPY-PIXEL-TOKEN+ ...)
; compiling (DEFCONSTANT +PASS-THROUGH-TOKEN+ ...)
; compiling (DEFCONSTANT +FEEDBACK-BUFFER-POINTER+ ...)
; compiling (DEFCONSTANT +FEEDBACK-BUFFER-SIZE+ ...)
; compiling (DEFCONSTANT +FEEDBACK-BUFFER-TYPE+ ...)
; compiling (DEFCONSTANT +SELECTION-BUFFER-POINTER+ ...)
; compiling (DEFCONSTANT +SELECTION-BUFFER-SIZE+ ...)
; compiling (DEFCONSTANT +FOG+ ...)
; compiling (DEFCONSTANT +FOG-MODE+ ...)
; compiling (DEFCONSTANT +FOG-DENSITY+ ...)
; compiling (DEFCONSTANT +FOG-COLOR+ ...)
; compiling (DEFCONSTANT +FOG-INDEX+ ...)
; compiling (DEFCONSTANT +FOG-START+ ...)
; compiling (DEFCONSTANT +FOG-END+ ...)
; compiling (DEFCONSTANT +LINEAR+ ...)
; compiling (DEFCONSTANT +EXP+ ...)
; compiling (DEFCONSTANT +EXP2+ ...)
; compiling (DEFCONSTANT +LOGIC-OP+ ...)
; compiling (DEFCONSTANT +INDEX-LOGIC-OP+ ...)
; compiling (DEFCONSTANT +COLOR-LOGIC-OP+ ...)
; compiling (DEFCONSTANT +LOGIC-OP-MODE+ ...)
; compiling (DEFCONSTANT +CLEAR+ ...)
; compiling (DEFCONSTANT +SET+ ...)
; compiling (DEFCONSTANT +COPY+ ...)
; compiling (DEFCONSTANT +COPY-INVERTED+ ...)
; compiling (DEFCONSTANT +NOOP+ ...)
; compiling (DEFCONSTANT +INVERT+ ...)
; compiling (DEFCONSTANT +AND+ ...)
; compiling (DEFCONSTANT +NAND+ ...)
; compiling (DEFCONSTANT +OR+ ...)
; compiling (DEFCONSTANT +NOR+ ...)
; compiling (DEFCONSTANT +XOR+ ...)
; compiling (DEFCONSTANT +EQUIV+ ...)
; compiling (DEFCONSTANT +AND-REVERSE+ ...)
; compiling (DEFCONSTANT +AND-INVERTED+ ...)
; compiling (DEFCONSTANT +OR-REVERSE+ ...)
; compiling (DEFCONSTANT +OR-INVERTED+ ...)
; compiling (DEFCONSTANT +STENCIL-TEST+ ...)
; compiling (DEFCONSTANT +STENCIL-WRITEMASK+ ...)
; compiling (DEFCONSTANT +STENCIL-BITS+ ...)
; compiling (DEFCONSTANT +STENCIL-FUNC+ ...)
; compiling (DEFCONSTANT +STENCIL-VALUE-MASK+ ...)
; compiling (DEFCONSTANT +STENCIL-REF+ ...)
; compiling (DEFCONSTANT +STENCIL-FAIL+ ...)
; compiling (DEFCONSTANT +STENCIL-PASS-DEPTH-PASS+ ...)
; compiling (DEFCONSTANT +STENCIL-PASS-DEPTH-FAIL+ ...)
; compiling (DEFCONSTANT +STENCIL-CLEAR-VALUE+ ...)
; compiling (DEFCONSTANT +STENCIL-INDEX+ ...)
; compiling (DEFCONSTANT +KEEP+ ...)
; compiling (DEFCONSTANT +REPLACE+ ...)
; compiling (DEFCONSTANT +INCR+ ...)
; compiling (DEFCONSTANT +DECR+ ...)
; compiling (DEFCONSTANT +NONE+ ...)
; compiling (DEFCONSTANT +LEFT+ ...)
; compiling (DEFCONSTANT +RIGHT+ ...)
; compiling (DEFCONSTANT +FRONT-LEFT+ ...)
; compiling (DEFCONSTANT +FRONT-RIGHT+ ...)
; compiling (DEFCONSTANT +BACK-LEFT+ ...)
; compiling (DEFCONSTANT +BACK-RIGHT+ ...)
; compiling (DEFCONSTANT +AUX0+ ...)
; compiling (DEFCONSTANT +AUX1+ ...)
; compiling (DEFCONSTANT +AUX2+ ...)
; compiling (DEFCONSTANT +AUX3+ ...)
; compiling (DEFCONSTANT +COLOR-INDEX+ ...)
; compiling (DEFCONSTANT +RED+ ...)
; compiling (DEFCONSTANT +GREEN+ ...)
; compiling (DEFCONSTANT +BLUE+ ...)
; compiling (DEFCONSTANT +ALPHA+ ...)
; compiling (DEFCONSTANT +LUMINANCE+ ...)
; compiling (DEFCONSTANT +LUMINANCE-ALPHA+ ...)
; compiling (DEFCONSTANT +ALPHA-BITS+ ...)
; compiling (DEFCONSTANT +RED-BITS+ ...)
; compiling (DEFCONSTANT +GREEN-BITS+ ...)
; compiling (DEFCONSTANT +BLUE-BITS+ ...)
; compiling (DEFCONSTANT +INDEX-BITS+ ...)
; compiling (DEFCONSTANT +SUBPIXEL-BITS+ ...)
; compiling (DEFCONSTANT +AUX-BUFFERS+ ...)
; compiling (DEFCONSTANT +READ-BUFFER+ ...)
; compiling (DEFCONSTANT +DRAW-BUFFER+ ...)
; compiling (DEFCONSTANT +DOUBLEBUFFER+ ...)
; compiling (DEFCONSTANT +STEREO+ ...)
; compiling (DEFCONSTANT +BITMAP+ ...)
; compiling (DEFCONSTANT +COLOR+ ...)
; compiling (DEFCONSTANT +DEPTH+ ...)
; compiling (DEFCONSTANT +STENCIL+ ...)
; compiling (DEFCONSTANT +DITHER+ ...)
; compiling (DEFCONSTANT +RGB+ ...)
; compiling (DEFCONSTANT +RGBA+ ...)
; compiling (DEFCONSTANT +MAX-LIST-NESTING+ ...)
; compiling (DEFCONSTANT +MAX-ATTRIB-STACK-DEPTH+ ...)
; compiling (DEFCONSTANT +MAX-MODELVIEW-STACK-DEPTH+ ...)
; compiling (DEFCONSTANT +MAX-NAME-STACK-DEPTH+ ...)
; compiling (DEFCONSTANT +MAX-PROJECTION-STACK-DEPTH+ ...)
; compiling (DEFCONSTANT +MAX-TEXTURE-STACK-DEPTH+ ...)
; compiling (DEFCONSTANT +MAX-EVAL-ORDER+ ...)
; compiling (DEFCONSTANT +MAX-LIGHTS+ ...)
; compiling (DEFCONSTANT +MAX-CLIP-PLANES+ ...)
; compiling (DEFCONSTANT +MAX-TEXTURE-SIZE+ ...)
; compiling (DEFCONSTANT +MAX-PIXEL-MAP-TABLE+ ...)
; compiling (DEFCONSTANT +MAX-VIEWPORT-DIMS+ ...)
; compiling (DEFCONSTANT +MAX-CLIENT-ATTRIB-STACK-DEPTH+ ...)
; compiling (DEFCONSTANT +ATTRIB-STACK-DEPTH+ ...)
; compiling (DEFCONSTANT +CLIENT-ATTRIB-STACK-DEPTH+ ...)
; compiling (DEFCONSTANT +COLOR-CLEAR-VALUE+ ...)
; compiling (DEFCONSTANT +COLOR-WRITEMASK+ ...)
; compiling (DEFCONSTANT +CURRENT-INDEX+ ...)
; compiling (DEFCONSTANT +CURRENT-COLOR+ ...)
; compiling (DEFCONSTANT +CURRENT-NORMAL+ ...)
; compiling (DEFCONSTANT +CURRENT-RASTER-COLOR+ ...)
; compiling (DEFCONSTANT +CURRENT-RASTER-DISTANCE+ ...)
; compiling (DEFCONSTANT +CURRENT-RASTER-INDEX+ ...)
; compiling (DEFCONSTANT +CURRENT-RASTER-POSITION+ ...)
; compiling (DEFCONSTANT +CURRENT-RASTER-TEXTURE-COORDS+ ...)
; compiling (DEFCONSTANT +CURRENT-RASTER-POSITION-VALID+ ...)
; compiling (DEFCONSTANT +CURRENT-TEXTURE-COORDS+ ...)
; compiling (DEFCONSTANT +INDEX-CLEAR-VALUE+ ...)
; compiling (DEFCONSTANT +INDEX-MODE+ ...)
; compiling (DEFCONSTANT +INDEX-WRITEMASK+ ...)
; compiling (DEFCONSTANT +MODELVIEW-MATRIX+ ...)
; compiling (DEFCONSTANT +MODELVIEW-STACK-DEPTH+ ...)
; compiling (DEFCONSTANT +NAME-STACK-DEPTH+ ...)
; compiling (DEFCONSTANT +PROJECTION-MATRIX+ ...)
; compiling (DEFCONSTANT +PROJECTION-STACK-DEPTH+ ...)
; compiling (DEFCONSTANT +RENDER-MODE+ ...)
; compiling (DEFCONSTANT +RGBA-MODE+ ...)
; compiling (DEFCONSTANT +TEXTURE-MATRIX+ ...)
; compiling (DEFCONSTANT +TEXTURE-STACK-DEPTH+ ...)
; compiling (DEFCONSTANT +VIEWPORT+ ...)
; compiling (DEFCONSTANT +AUTO-NORMAL+ ...)
; compiling (DEFCONSTANT +MAP1-COLOR-4+ ...)
; compiling (DEFCONSTANT +MAP1-GRID-DOMAIN+ ...)
; compiling (DEFCONSTANT +MAP1-GRID-SEGMENTS+ ...)
; compiling (DEFCONSTANT +MAP1-INDEX+ ...)
; compiling (DEFCONSTANT +MAP1-NORMAL+ ...)
; compiling (DEFCONSTANT +MAP1-TEXTURE-COORD-1+ ...)
; compiling (DEFCONSTANT +MAP1-TEXTURE-COORD-2+ ...)
; compiling (DEFCONSTANT +MAP1-TEXTURE-COORD-3+ ...)
; compiling (DEFCONSTANT +MAP1-TEXTURE-COORD-4+ ...)
; compiling (DEFCONSTANT +MAP1-VERTEX-3+ ...)
; compiling (DEFCONSTANT +MAP1-VERTEX-4+ ...)
; compiling (DEFCONSTANT +MAP2-COLOR-4+ ...)
; compiling (DEFCONSTANT +MAP2-GRID-DOMAIN+ ...)
; compiling (DEFCONSTANT +MAP2-GRID-SEGMENTS+ ...)
; compiling (DEFCONSTANT +MAP2-INDEX+ ...)
; compiling (DEFCONSTANT +MAP2-NORMAL+ ...)
; compiling (DEFCONSTANT +MAP2-TEXTURE-COORD-1+ ...)
; compiling (DEFCONSTANT +MAP2-TEXTURE-COORD-2+ ...)
; compiling (DEFCONSTANT +MAP2-TEXTURE-COORD-3+ ...)
; compiling (DEFCONSTANT +MAP2-TEXTURE-COORD-4+ ...)
; compiling (DEFCONSTANT +MAP2-VERTEX-3+ ...)
; compiling (DEFCONSTANT +MAP2-VERTEX-4+ ...)
; compiling (DEFCONSTANT +COEFF+ ...)
; compiling (DEFCONSTANT +DOMAIN+ ...)
; compiling (DEFCONSTANT +ORDER+ ...)
; compiling (DEFCONSTANT +FOG-HINT+ ...)
; compiling (DEFCONSTANT +LINE-SMOOTH-HINT+ ...)
; compiling (DEFCONSTANT +PERSPECTIVE-CORRECTION-HINT+ ...)
; compiling (DEFCONSTANT +POINT-SMOOTH-HINT+ ...)
; compiling (DEFCONSTANT +POLYGON-SMOOTH-HINT+ ...)
; compiling (DEFCONSTANT +DONT-CARE+ ...)
; compiling (DEFCONSTANT +FASTEST+ ...)
; compiling (DEFCONSTANT +NICEST+ ...)
; compiling (DEFCONSTANT +SCISSOR-TEST+ ...)
; compiling (DEFCONSTANT +SCISSOR-BOX+ ...)
; compiling (DEFCONSTANT +MAP-COLOR+ ...)
; compiling (DEFCONSTANT +MAP-STENCIL+ ...)
; compiling (DEFCONSTANT +INDEX-SHIFT+ ...)
; compiling (DEFCONSTANT +INDEX-OFFSET+ ...)
; compiling (DEFCONSTANT +RED-SCALE+ ...)
; compiling (DEFCONSTANT +RED-BIAS+ ...)
; compiling (DEFCONSTANT +GREEN-SCALE+ ...)
; compiling (DEFCONSTANT +GREEN-BIAS+ ...)
; compiling (DEFCONSTANT +BLUE-SCALE+ ...)
; compiling (DEFCONSTANT +BLUE-BIAS+ ...)
; compiling (DEFCONSTANT +ALPHA-SCALE+ ...)
; compiling (DEFCONSTANT +ALPHA-BIAS+ ...)
; compiling (DEFCONSTANT +DEPTH-SCALE+ ...)
; compiling (DEFCONSTANT +DEPTH-BIAS+ ...)
; compiling (DEFCONSTANT +PIXEL-MAP-S-TO-S-SIZE+ ...)
; compiling (DEFCONSTANT +PIXEL-MAP-I-TO-I-SIZE+ ...)
; compiling (DEFCONSTANT +PIXEL-MAP-I-TO-R-SIZE+ ...)
; compiling (DEFCONSTANT +PIXEL-MAP-I-TO-G-SIZE+ ...)
; compiling (DEFCONSTANT +PIXEL-MAP-I-TO-B-SIZE+ ...)
; compiling (DEFCONSTANT +PIXEL-MAP-I-TO-A-SIZE+ ...)
; compiling (DEFCONSTANT +PIXEL-MAP-R-TO-R-SIZE+ ...)
; compiling (DEFCONSTANT +PIXEL-MAP-G-TO-G-SIZE+ ...)
; compiling (DEFCONSTANT +PIXEL-MAP-B-TO-B-SIZE+ ...)
; compiling (DEFCONSTANT +PIXEL-MAP-A-TO-A-SIZE+ ...)
; compiling (DEFCONSTANT +PIXEL-MAP-S-TO-S+ ...)
; compiling (DEFCONSTANT +PIXEL-MAP-I-TO-I+ ...)
; compiling (DEFCONSTANT +PIXEL-MAP-I-TO-R+ ...)
; compiling (DEFCONSTANT +PIXEL-MAP-I-TO-G+ ...)
; compiling (DEFCONSTANT +PIXEL-MAP-I-TO-B+ ...)
; compiling (DEFCONSTANT +PIXEL-MAP-I-TO-A+ ...)
; compiling (DEFCONSTANT +PIXEL-MAP-R-TO-R+ ...)
; compiling (DEFCONSTANT +PIXEL-MAP-G-TO-G+ ...)
; compiling (DEFCONSTANT +PIXEL-MAP-B-TO-B+ ...)
; compiling (DEFCONSTANT +PIXEL-MAP-A-TO-A+ ...)
; compiling (DEFCONSTANT +PACK-ALIGNMENT+ ...)
; compiling (DEFCONSTANT +PACK-LSB-FIRST+ ...)
; compiling (DEFCONSTANT +PACK-ROW-LENGTH+ ...)
; compiling (DEFCONSTANT +PACK-SKIP-PIXELS+ ...)
; compiling (DEFCONSTANT +PACK-SKIP-ROWS+ ...)
; compiling (DEFCONSTANT +PACK-SWAP-BYTES+ ...)
; compiling (DEFCONSTANT +UNPACK-ALIGNMENT+ ...)
; compiling (DEFCONSTANT +UNPACK-LSB-FIRST+ ...)
; compiling (DEFCONSTANT +UNPACK-ROW-LENGTH+ ...)
; compiling (DEFCONSTANT +UNPACK-SKIP-PIXELS+ ...)
; compiling (DEFCONSTANT +UNPACK-SKIP-ROWS+ ...)
; compiling (DEFCONSTANT +UNPACK-SWAP-BYTES+ ...)
; compiling (DEFCONSTANT +ZOOM-X+ ...)
; compiling (DEFCONSTANT +ZOOM-Y+ ...)
; compiling (DEFCONSTANT +TEXTURE-ENV+ ...)
; compiling (DEFCONSTANT +TEXTURE-ENV-MODE+ ...)
; compiling (DEFCONSTANT +TEXTURE-1D+ ...)
; compiling (DEFCONSTANT +TEXTURE-2D+ ...)
; compiling (DEFCONSTANT +TEXTURE-WRAP-S+ ...)
; compiling (DEFCONSTANT +TEXTURE-WRAP-T+ ...)
; compiling (DEFCONSTANT +TEXTURE-MAG-FILTER+ ...)
; compiling (DEFCONSTANT +TEXTURE-MIN-FILTER+ ...)
; compiling (DEFCONSTANT +TEXTURE-ENV-COLOR+ ...)
; compiling (DEFCONSTANT +TEXTURE-GEN-S+ ...)
; compiling (DEFCONSTANT +TEXTURE-GEN-T+ ...)
; compiling (DEFCONSTANT +TEXTURE-GEN-MODE+ ...)
; compiling (DEFCONSTANT +TEXTURE-BORDER-COLOR+ ...)
; compiling (DEFCONSTANT +TEXTURE-WIDTH+ ...)
; compiling (DEFCONSTANT +TEXTURE-HEIGHT+ ...)
; compiling (DEFCONSTANT +TEXTURE-BORDER+ ...)
; compiling (DEFCONSTANT +TEXTURE-COMPONENTS+ ...)
; compiling (DEFCONSTANT +TEXTURE-RED-SIZE+ ...)
; compiling (DEFCONSTANT +TEXTURE-GREEN-SIZE+ ...)
; compiling (DEFCONSTANT +TEXTURE-BLUE-SIZE+ ...)
; compiling (DEFCONSTANT +TEXTURE-ALPHA-SIZE+ ...)
; compiling (DEFCONSTANT +TEXTURE-LUMINANCE-SIZE+ ...)
; compiling (DEFCONSTANT +TEXTURE-INTENSITY-SIZE+ ...)
; compiling (DEFCONSTANT +NEAREST-MIPMAP-NEAREST+ ...)
; compiling (DEFCONSTANT +NEAREST-MIPMAP-LINEAR+ ...)
; compiling (DEFCONSTANT +LINEAR-MIPMAP-NEAREST+ ...)
; compiling (DEFCONSTANT +LINEAR-MIPMAP-LINEAR+ ...)
; compiling (DEFCONSTANT +OBJECT-LINEAR+ ...)
; compiling (DEFCONSTANT +OBJECT-PLANE+ ...)
; compiling (DEFCONSTANT +EYE-LINEAR+ ...)
; compiling (DEFCONSTANT +EYE-PLANE+ ...)
; compiling (DEFCONSTANT +SPHERE-MAP+ ...)
; compiling (DEFCONSTANT +DECAL+ ...)
; compiling (DEFCONSTANT +MODULATE+ ...)
; compiling (DEFCONSTANT +NEAREST+ ...)
; compiling (DEFCONSTANT +REPEAT+ ...)
; compiling (DEFCONSTANT +CLAMP+ ...)
; compiling (DEFCONSTANT +S+ ...)
; compiling (DEFCONSTANT +T+ ...)
; compiling (DEFCONSTANT +R+ ...)
; compiling (DEFCONSTANT +Q+ ...)
; compiling (DEFCONSTANT +TEXTURE-GEN-R+ ...)
; compiling (DEFCONSTANT +TEXTURE-GEN-Q+ ...)
; compiling (DEFCONSTANT +PROXY-TEXTURE-1D+ ...)
; compiling (DEFCONSTANT +PROXY-TEXTURE-2D+ ...)
; compiling (DEFCONSTANT +TEXTURE-PRIORITY+ ...)
; compiling (DEFCONSTANT +TEXTURE-RESIDENT+ ...)
; compiling (DEFCONSTANT +TEXTURE-BINDING-1D+ ...)
; compiling (DEFCONSTANT +TEXTURE-BINDING-2D+ ...)
; compiling (DEFCONSTANT +TEXTURE-INTERNAL-FORMAT+ ...)
; compiling (DEFCONSTANT +PACK-SKIP-IMAGES+ ...)
; compiling (DEFCONSTANT +PACK-IMAGE-HEIGHT+ ...)
; compiling (DEFCONSTANT +UNPACK-SKIP-IMAGES+ ...)
; compiling (DEFCONSTANT +UNPACK-IMAGE-HEIGHT+ ...)
; compiling (DEFCONSTANT +TEXTURE-3D+ ...)
; compiling (DEFCONSTANT +PROXY-TEXTURE-3D+ ...)
; compiling (DEFCONSTANT +TEXTURE-DEPTH+ ...)
; compiling (DEFCONSTANT +TEXTURE-WRAP-R+ ...)
; compiling (DEFCONSTANT +MAX-3D-TEXTURE-SIZE+ ...)
; compiling (DEFCONSTANT +TEXTURE-BINDING-3D+ ...)
; compiling (DEFCONSTANT +ALPHA4+ ...)
; compiling (DEFCONSTANT +ALPHA8+ ...)
; compiling (DEFCONSTANT +ALPHA12+ ...)
; compiling (DEFCONSTANT +ALPHA16+ ...)
; compiling (DEFCONSTANT +LUMINANCE4+ ...)
; compiling (DEFCONSTANT +LUMINANCE8+ ...)
; compiling (DEFCONSTANT +LUMINANCE12+ ...)
; compiling (DEFCONSTANT +LUMINANCE16+ ...)
; compiling (DEFCONSTANT +LUMINANCE4-ALPHA4+ ...)
; compiling (DEFCONSTANT +LUMINANCE6-ALPHA2+ ...)
; compiling (DEFCONSTANT +LUMINANCE8-ALPHA8+ ...)
; compiling (DEFCONSTANT +LUMINANCE12-ALPHA4+ ...)
; compiling (DEFCONSTANT +LUMINANCE12-ALPHA12+ ...)
; compiling (DEFCONSTANT +LUMINANCE16-ALPHA16+ ...)
; compiling (DEFCONSTANT +INTENSITY+ ...)
; compiling (DEFCONSTANT +INTENSITY4+ ...)
; compiling (DEFCONSTANT +INTENSITY8+ ...)
; compiling (DEFCONSTANT +INTENSITY12+ ...)
; compiling (DEFCONSTANT +INTENSITY16+ ...)
; compiling (DEFCONSTANT +R3-G3-B2+ ...)
; compiling (DEFCONSTANT +RGB4+ ...)
; compiling (DEFCONSTANT +RGB5+ ...)
; compiling (DEFCONSTANT +RGB8+ ...)
; compiling (DEFCONSTANT +RGB10+ ...)
; compiling (DEFCONSTANT +RGB12+ ...)
; compiling (DEFCONSTANT +RGB16+ ...)
; compiling (DEFCONSTANT +RGBA2+ ...)
; compiling (DEFCONSTANT +RGBA4+ ...)
; compiling (DEFCONSTANT +RGB5-A1+ ...)
; compiling (DEFCONSTANT +RGBA8+ ...)
; compiling (DEFCONSTANT +RGB10-A2+ ...)
; compiling (DEFCONSTANT +RGBA12+ ...)
; compiling (DEFCONSTANT +RGBA16+ ...)
; compiling (DEFCONSTANT +VENDOR+ ...)
; compiling (DEFCONSTANT +RENDERER+ ...)
; compiling (DEFCONSTANT +VERSION+ ...)
; compiling (DEFCONSTANT +EXTENSIONS+ ...)
; compiling (DEFCONSTANT +NO-ERROR+ ...)
; compiling (DEFCONSTANT +INVALID-VALUE+ ...)
; compiling (DEFCONSTANT +INVALID-ENUM+ ...)
; compiling (DEFCONSTANT +INVALID-OPERATION+ ...)
; compiling (DEFCONSTANT +STACK-OVERFLOW+ ...)
; compiling (DEFCONSTANT +STACK-UNDERFLOW+ ...)
; compiling (DEFCONSTANT +OUT-OF-MEMORY+ ...)
; compiling (DEFCONSTANT +RESCALE-NORMAL+ ...)
; compiling (DEFCONSTANT +CLAMP-TO-EDGE+ ...)
; compiling (DEFCONSTANT +MAX-ELEMENTS-VERTICES+ ...)
; compiling (DEFCONSTANT +MAX-ELEMENTS-INDICES+ ...)
; compiling (DEFCONSTANT +BGR+ ...)
; compiling (DEFCONSTANT +BGRA+ ...)
; compiling (DEFCONSTANT +UNSIGNED-BYTE-3-3-2+ ...)
; compiling (DEFCONSTANT +UNSIGNED-BYTE-2-3-3-REV+ ...)
; compiling (DEFCONSTANT +UNSIGNED-SHORT-5-6-5+ ...)
; compiling (DEFCONSTANT +UNSIGNED-SHORT-5-6-5-REV+ ...)
; compiling (DEFCONSTANT +UNSIGNED-SHORT-4-4-4-4+ ...)
; compiling (DEFCONSTANT +UNSIGNED-SHORT-4-4-4-4-REV+ ...)
; compiling (DEFCONSTANT +UNSIGNED-SHORT-5-5-5-1+ ...)
; compiling (DEFCONSTANT +UNSIGNED-SHORT-1-5-5-5-REV+ ...)
; compiling (DEFCONSTANT +UNSIGNED-INT-8-8-8-8+ ...)
; compiling (DEFCONSTANT +UNSIGNED-INT-8-8-8-8-REV+ ...)
; compiling (DEFCONSTANT +UNSIGNED-INT-10-10-10-2+ ...)
; compiling (DEFCONSTANT +UNSIGNED-INT-2-10-10-10-REV+ ...)
; compiling (DEFCONSTANT +LIGHT-MODEL-COLOR-CONTROL+ ...)
; compiling (DEFCONSTANT +SINGLE-COLOR+ ...)
; compiling (DEFCONSTANT +SEPARATE-SPECULAR-COLOR+ ...)
; compiling (DEFCONSTANT +TEXTURE-MIN-LOD+ ...)
; compiling (DEFCONSTANT +TEXTURE-MAX-LOD+ ...)
; compiling (DEFCONSTANT +TEXTURE-BASE-LEVEL+ ...)
; compiling (DEFCONSTANT +TEXTURE-MAX-LEVEL+ ...)
; compiling (DEFCONSTANT +SMOOTH-POINT-SIZE-RANGE+ ...)
; compiling (DEFCONSTANT +SMOOTH-POINT-SIZE-GRANULARITY+ ...)
; compiling (DEFCONSTANT +SMOOTH-LINE-WIDTH-RANGE+ ...)
; compiling (DEFCONSTANT +SMOOTH-LINE-WIDTH-GRANULARITY+ ...)
; compiling (DEFCONSTANT +ALIASED-POINT-SIZE-RANGE+ ...)
; compiling (DEFCONSTANT +ALIASED-LINE-WIDTH-RANGE+ ...)
; compiling (DEFCONSTANT +COLOR-TABLE+ ...)
; compiling (DEFCONSTANT +POST-CONVOLUTION-COLOR-TABLE+ ...)
; compiling (DEFCONSTANT +POST-COLOR-MATRIX-COLOR-TABLE+ ...)
; compiling (DEFCONSTANT +PROXY-COLOR-TABLE+ ...)
; compiling (DEFCONSTANT +PROXY-POST-CONVOLUTION-COLOR-TABLE+ ...)
; compiling (DEFCONSTANT +PROXY-POST-COLOR-MATRIX-COLOR-TABLE+ ...)
; compiling (DEFCONSTANT +COLOR-TABLE-SCALE+ ...)
; compiling (DEFCONSTANT +COLOR-TABLE-BIAS+ ...)
; compiling (DEFCONSTANT +COLOR-TABLE-FORMAT+ ...)
; compiling (DEFCONSTANT +COLOR-TABLE-WIDTH+ ...)
; compiling (DEFCONSTANT +COLOR-TABLE-RED-SIZE+ ...)
; compiling (DEFCONSTANT +COLOR-TABLE-GREEN-SIZE+ ...)
; compiling (DEFCONSTANT +COLOR-TABLE-BLUE-SIZE+ ...)
; compiling (DEFCONSTANT +COLOR-TABLE-ALPHA-SIZE+ ...)
; compiling (DEFCONSTANT +COLOR-TABLE-LUMINANCE-SIZE+ ...)
; compiling (DEFCONSTANT +COLOR-TABLE-INTENSITY-SIZE+ ...)
; compiling (DEFCONSTANT +CONVOLUTION-1D+ ...)
; compiling (DEFCONSTANT +CONVOLUTION-2D+ ...)
; compiling (DEFCONSTANT +SEPARABLE-2D+ ...)
; compiling (DEFCONSTANT +CONVOLUTION-BORDER-MODE+ ...)
; compiling (DEFCONSTANT +CONVOLUTION-FILTER-SCALE+ ...)
; compiling (DEFCONSTANT +CONVOLUTION-FILTER-BIAS+ ...)
; compiling (DEFCONSTANT +REDUCE+ ...)
; compiling (DEFCONSTANT +CONVOLUTION-FORMAT+ ...)
; compiling (DEFCONSTANT +CONVOLUTION-WIDTH+ ...)
; compiling (DEFCONSTANT +CONVOLUTION-HEIGHT+ ...)
; compiling (DEFCONSTANT +MAX-CONVOLUTION-WIDTH+ ...)
; compiling (DEFCONSTANT +MAX-CONVOLUTION-HEIGHT+ ...)
; compiling (DEFCONSTANT +POST-CONVOLUTION-RED-SCALE+ ...)
; compiling (DEFCONSTANT +POST-CONVOLUTION-GREEN-SCALE+ ...)
; compiling (DEFCONSTANT +POST-CONVOLUTION-BLUE-SCALE+ ...)
; compiling (DEFCONSTANT +POST-CONVOLUTION-ALPHA-SCALE+ ...)
; compiling (DEFCONSTANT +POST-CONVOLUTION-RED-BIAS+ ...)
; compiling (DEFCONSTANT +POST-CONVOLUTION-GREEN-BIAS+ ...)
; compiling (DEFCONSTANT +POST-CONVOLUTION-BLUE-BIAS+ ...)
; compiling (DEFCONSTANT +POST-CONVOLUTION-ALPHA-BIAS+ ...)
; compiling (DEFCONSTANT +CONSTANT-BORDER+ ...)
; compiling (DEFCONSTANT +REPLICATE-BORDER+ ...)
; compiling (DEFCONSTANT +CONVOLUTION-BORDER-COLOR+ ...)
; compiling (DEFCONSTANT +COLOR-MATRIX+ ...)
; compiling (DEFCONSTANT +COLOR-MATRIX-STACK-DEPTH+ ...)
; compiling (DEFCONSTANT +MAX-COLOR-MATRIX-STACK-DEPTH+ ...)
; compiling (DEFCONSTANT +POST-COLOR-MATRIX-RED-SCALE+ ...)
; compiling (DEFCONSTANT +POST-COLOR-MATRIX-GREEN-SCALE+ ...)
; compiling (DEFCONSTANT +POST-COLOR-MATRIX-BLUE-SCALE+ ...)
; compiling (DEFCONSTANT +POST-COLOR-MATRIX-ALPHA-SCALE+ ...)
; compiling (DEFCONSTANT +POST-COLOR-MATRIX-RED-BIAS+ ...)
; compiling (DEFCONSTANT +POST-COLOR-MATRIX-GREEN-BIAS+ ...)
; compiling (DEFCONSTANT +POST-COLOR-MATRIX-BLUE-BIAS+ ...)
; compiling (DEFCONSTANT +POST-COLOR-MATRIX-ALPHA-BIAS+ ...)
; compiling (DEFCONSTANT +HISTOGRAM+ ...)
; compiling (DEFCONSTANT +PROXY-HISTOGRAM+ ...)
; compiling (DEFCONSTANT +HISTOGRAM-WIDTH+ ...)
; compiling (DEFCONSTANT +HISTOGRAM-FORMAT+ ...)
; compiling (DEFCONSTANT +HISTOGRAM-RED-SIZE+ ...)
; compiling (DEFCONSTANT +HISTOGRAM-GREEN-SIZE+ ...)
; compiling (DEFCONSTANT +HISTOGRAM-BLUE-SIZE+ ...)
; compiling (DEFCONSTANT +HISTOGRAM-ALPHA-SIZE+ ...)
; compiling (DEFCONSTANT +HISTOGRAM-LUMINANCE-SIZE+ ...)
; compiling (DEFCONSTANT +HISTOGRAM-SINK+ ...)
; compiling (DEFCONSTANT +MINMAX+ ...)
; compiling (DEFCONSTANT +MINMAX-FORMAT+ ...)
; compiling (DEFCONSTANT +MINMAX-SINK+ ...)
; compiling (DEFCONSTANT +TABLE-TOO-LARGE+ ...)
; compiling (DEFCONSTANT +BLEND-EQUATION+ ...)
; compiling (DEFCONSTANT +MIN+ ...)
; compiling (DEFCONSTANT +MAX+ ...)
; compiling (DEFCONSTANT +FUNC-ADD+ ...)
; compiling (DEFCONSTANT +FUNC-SUBTRACT+ ...)
; compiling (DEFCONSTANT +FUNC-REVERSE-SUBTRACT+ ...)
; compiling (DEFCONSTANT +CURRENT-BIT+ ...)
; compiling (DEFCONSTANT +POINT-BIT+ ...)
; compiling (DEFCONSTANT +LINE-BIT+ ...)
; compiling (DEFCONSTANT +POLYGON-BIT+ ...)
; compiling (DEFCONSTANT +POLYGON-STIPPLE-BIT+ ...)
; compiling (DEFCONSTANT +PIXEL-MODE-BIT+ ...)
; compiling (DEFCONSTANT +LIGHTING-BIT+ ...)
; compiling (DEFCONSTANT +FOG-BIT+ ...)
; compiling (DEFCONSTANT +DEPTH-BUFFER-BIT+ ...)
; compiling (DEFCONSTANT +ACCUM-BUFFER-BIT+ ...)
; compiling (DEFCONSTANT +STENCIL-BUFFER-BIT+ ...)
; compiling (DEFCONSTANT +VIEWPORT-BIT+ ...)
; compiling (DEFCONSTANT +TRANSFORM-BIT+ ...)
; compiling (DEFCONSTANT +ENABLE-BIT+ ...)
; compiling (DEFCONSTANT +COLOR-BUFFER-BIT+ ...)
; compiling (DEFCONSTANT +HINT-BIT+ ...)
; compiling (DEFCONSTANT +EVAL-BIT+ ...)
; compiling (DEFCONSTANT +LIST-BIT+ ...)
; compiling (DEFCONSTANT +TEXTURE-BIT+ ...)
; compiling (DEFCONSTANT +SCISSOR-BIT+ ...)
; compiling (DEFCONSTANT +ALL-ATTRIB-BITS+ ...)
; compiling (DEFCONSTANT +CLIENT-PIXEL-STORE-BIT+ ...)
; compiling (DEFCONSTANT +CLIENT-VERTEX-ARRAY-BIT+ ...)
; compiling (DEFCONSTANT +CLIENT-ALL-ATTRIB-BITS+ ...)
; compiling (DEFCONSTANT +ARB-MULTITEXTURE+ ...)
; compiling (DEFCONSTANT +TEXTURE0-ARB+ ...)
; compiling (DEFCONSTANT +TEXTURE1-ARB+ ...)
; compiling (DEFCONSTANT +TEXTURE2-ARB+ ...)
; compiling (DEFCONSTANT +TEXTURE3-ARB+ ...)
; compiling (DEFCONSTANT +TEXTURE4-ARB+ ...)
; compiling (DEFCONSTANT +TEXTURE5-ARB+ ...)
; compiling (DEFCONSTANT +TEXTURE6-ARB+ ...)
; compiling (DEFCONSTANT +TEXTURE7-ARB+ ...)
; compiling (DEFCONSTANT +TEXTURE8-ARB+ ...)
; compiling (DEFCONSTANT +TEXTURE9-ARB+ ...)
; compiling (DEFCONSTANT +TEXTURE10-ARB+ ...)
; compiling (DEFCONSTANT +TEXTURE11-ARB+ ...)
; compiling (DEFCONSTANT +TEXTURE12-ARB+ ...)
; compiling (DEFCONSTANT +TEXTURE13-ARB+ ...)
; compiling (DEFCONSTANT +TEXTURE14-ARB+ ...)
; compiling (DEFCONSTANT +TEXTURE15-ARB+ ...)
; compiling (DEFCONSTANT +TEXTURE16-ARB+ ...)
; compiling (DEFCONSTANT +TEXTURE17-ARB+ ...)
; compiling (DEFCONSTANT +TEXTURE18-ARB+ ...)
; compiling (DEFCONSTANT +TEXTURE19-ARB+ ...)
; compiling (DEFCONSTANT +TEXTURE20-ARB+ ...)
; compiling (DEFCONSTANT +TEXTURE21-ARB+ ...)
; compiling (DEFCONSTANT +TEXTURE22-ARB+ ...)
; compiling (DEFCONSTANT +TEXTURE23-ARB+ ...)
; compiling (DEFCONSTANT +TEXTURE24-ARB+ ...)
; compiling (DEFCONSTANT +TEXTURE25-ARB+ ...)
; compiling (DEFCONSTANT +TEXTURE26-ARB+ ...)
; compiling (DEFCONSTANT +TEXTURE27-ARB+ ...)
; compiling (DEFCONSTANT +TEXTURE28-ARB+ ...)
; compiling (DEFCONSTANT +TEXTURE29-ARB+ ...)
; compiling (DEFCONSTANT +TEXTURE30-ARB+ ...)
; compiling (DEFCONSTANT +TEXTURE31-ARB+ ...)
; compiling (DEFCONSTANT +ACTIVE-TEXTURE-ARB+ ...)
; compiling (DEFCONSTANT +CLIENT-ACTIVE-TEXTURE-ARB+ ...)
; compiling (DEFCONSTANT +MAX-TEXTURE-UNITS-ARB+ ...)
; compiling (DEFCONSTANT +EXT-ABGR+ ...)
; compiling (DEFCONSTANT +ABGR-EXT+ ...)
; compiling (DEFCONSTANT +EXT-BLEND-COLOR+ ...)
; compiling (DEFCONSTANT +CONSTANT-COLOR-EXT+ ...)
; compiling (DEFCONSTANT +ONE-MINUS-CONSTANT-COLOR-EXT+ ...)
; compiling (DEFCONSTANT +CONSTANT-ALPHA-EXT+ ...)
; compiling (DEFCONSTANT +ONE-MINUS-CONSTANT-ALPHA-EXT+ ...)
; compiling (DEFCONSTANT +BLEND-COLOR-EXT+ ...)
; compiling (DEFCONSTANT +EXT-POLYGON-OFFSET+ ...)
; compiling (DEFCONSTANT +POLYGON-OFFSET-EXT+ ...)
; compiling (DEFCONSTANT +POLYGON-OFFSET-FACTOR-EXT+ ...)
; compiling (DEFCONSTANT +POLYGON-OFFSET-BIAS-EXT+ ...)
; compiling (DEFCONSTANT +EXT-TEXTURE3D+ ...)
; compiling (DEFCONSTANT +PACK-SKIP-IMAGES-EXT+ ...)
; compiling (DEFCONSTANT +PACK-IMAGE-HEIGHT-EXT+ ...)
; compiling (DEFCONSTANT +UNPACK-SKIP-IMAGES-EXT+ ...)
; compiling (DEFCONSTANT +UNPACK-IMAGE-HEIGHT-EXT+ ...)
; compiling (DEFCONSTANT +TEXTURE-3D-EXT+ ...)
; compiling (DEFCONSTANT +PROXY-TEXTURE-3D-EXT+ ...)
; compiling (DEFCONSTANT +TEXTURE-DEPTH-EXT+ ...)
; compiling (DEFCONSTANT +TEXTURE-WRAP-R-EXT+ ...)
; compiling (DEFCONSTANT +MAX-3D-TEXTURE-SIZE-EXT+ ...)
; compiling (DEFCONSTANT +TEXTURE-3D-BINDING-EXT+ ...)
; compiling (DEFCONSTANT +EXT-TEXTURE-OBJECT+ ...)
; compiling (DEFCONSTANT +TEXTURE-PRIORITY-EXT+ ...)
; compiling (DEFCONSTANT +TEXTURE-RESIDENT-EXT+ ...)
; compiling (DEFCONSTANT +TEXTURE-1D-BINDING-EXT+ ...)
; compiling (DEFCONSTANT +TEXTURE-2D-BINDING-EXT+ ...)
; compiling (DEFCONSTANT +EXT-RESCALE-NORMAL+ ...)
; compiling (DEFCONSTANT +RESCALE-NORMAL-EXT+ ...)
; compiling (DEFCONSTANT +EXT-VERTEX-ARRAY+ ...)
; compiling (DEFCONSTANT +VERTEX-ARRAY-EXT+ ...)
; compiling (DEFCONSTANT +NORMAL-ARRAY-EXT+ ...)
; compiling (DEFCONSTANT +COLOR-ARRAY-EXT+ ...)
; compiling (DEFCONSTANT +INDEX-ARRAY-EXT+ ...)
; compiling (DEFCONSTANT +TEXTURE-COORD-ARRAY-EXT+ ...)
; compiling (DEFCONSTANT +EDGE-FLAG-ARRAY-EXT+ ...)
; compiling (DEFCONSTANT +VERTEX-ARRAY-SIZE-EXT+ ...)
; compiling (DEFCONSTANT +VERTEX-ARRAY-TYPE-EXT+ ...)
; compiling (DEFCONSTANT +VERTEX-ARRAY-STRIDE-EXT+ ...)
; compiling (DEFCONSTANT +VERTEX-ARRAY-COUNT-EXT+ ...)
; compiling (DEFCONSTANT +NORMAL-ARRAY-TYPE-EXT+ ...)
; compiling (DEFCONSTANT +NORMAL-ARRAY-STRIDE-EXT+ ...)
; compiling (DEFCONSTANT +NORMAL-ARRAY-COUNT-EXT+ ...)
; compiling (DEFCONSTANT +COLOR-ARRAY-SIZE-EXT+ ...)
; compiling (DEFCONSTANT +COLOR-ARRAY-TYPE-EXT+ ...)
; compiling (DEFCONSTANT +COLOR-ARRAY-STRIDE-EXT+ ...)
; compiling (DEFCONSTANT +COLOR-ARRAY-COUNT-EXT+ ...)
; compiling (DEFCONSTANT +INDEX-ARRAY-TYPE-EXT+ ...)
; compiling (DEFCONSTANT +INDEX-ARRAY-STRIDE-EXT+ ...)
; compiling (DEFCONSTANT +INDEX-ARRAY-COUNT-EXT+ ...)
; compiling (DEFCONSTANT +TEXTURE-COORD-ARRAY-SIZE-EXT+ ...)
; compiling (DEFCONSTANT +TEXTURE-COORD-ARRAY-TYPE-EXT+ ...)
; compiling (DEFCONSTANT +TEXTURE-COORD-ARRAY-STRIDE-EXT+ ...)
; compiling (DEFCONSTANT +TEXTURE-COORD-ARRAY-COUNT-EXT+ ...)
; compiling (DEFCONSTANT +EDGE-FLAG-ARRAY-STRIDE-EXT+ ...)
; compiling (DEFCONSTANT +EDGE-FLAG-ARRAY-COUNT-EXT+ ...)
; compiling (DEFCONSTANT +VERTEX-ARRAY-POINTER-EXT+ ...)
; compiling (DEFCONSTANT +NORMAL-ARRAY-POINTER-EXT+ ...)
; compiling (DEFCONSTANT +COLOR-ARRAY-POINTER-EXT+ ...)
; compiling (DEFCONSTANT +INDEX-ARRAY-POINTER-EXT+ ...)
; compiling (DEFCONSTANT +TEXTURE-COORD-ARRAY-POINTER-EXT+ ...)
; compiling (DEFCONSTANT +EDGE-FLAG-ARRAY-POINTER-EXT+ ...)
; compiling (DEFCONSTANT +SGIS-TEXTURE-EDGE-CLAMP+ ...)
; compiling (DEFCONSTANT +CLAMP-TO-EDGE-SGIS+ ...)
; compiling (DEFCONSTANT +EXT-BLEND-MINMAX+ ...)
; compiling (DEFCONSTANT +FUNC-ADD-EXT+ ...)
; compiling (DEFCONSTANT +MIN-EXT+ ...)
; compiling (DEFCONSTANT +MAX-EXT+ ...)
; compiling (DEFCONSTANT +BLEND-EQUATION-EXT+ ...)
; compiling (DEFCONSTANT +EXT-BLEND-SUBTRACT+ ...)
; compiling (DEFCONSTANT +FUNC-SUBTRACT-EXT+ ...)
; compiling (DEFCONSTANT +FUNC-REVERSE-SUBTRACT-EXT+ ...)
; compiling (DEFCONSTANT +EXT-BLEND-LOGIC-OP+ ...)
; compiling (DEFCONSTANT +EXT-POINT-PARAMETERS+ ...)
; compiling (DEFCONSTANT +POINT-SIZE-MIN-EXT+ ...)
; compiling (DEFCONSTANT +POINT-SIZE-MAX-EXT+ ...)
; compiling (DEFCONSTANT +POINT-FADE-THRESHOLD-SIZE-EXT+ ...)
; compiling (DEFCONSTANT +DISTANCE-ATTENUATION-EXT+ ...)
; compiling (DEFCONSTANT +EXT-PALETTED-TEXTURE+ ...)
; compiling (DEFCONSTANT +TABLE-TOO-LARGE-EXT+ ...)
; compiling (DEFCONSTANT +COLOR-TABLE-FORMAT-EXT+ ...)
; compiling (DEFCONSTANT +COLOR-TABLE-WIDTH-EXT+ ...)
; compiling (DEFCONSTANT +COLOR-TABLE-RED-SIZE-EXT+ ...)
; compiling (DEFCONSTANT +COLOR-TABLE-GREEN-SIZE-EXT+ ...)
; compiling (DEFCONSTANT +COLOR-TABLE-BLUE-SIZE-EXT+ ...)
; compiling (DEFCONSTANT +COLOR-TABLE-ALPHA-SIZE-EXT+ ...)
; compiling (DEFCONSTANT +COLOR-TABLE-LUMINANCE-SIZE-EXT+ ...)
; compiling (DEFCONSTANT +COLOR-TABLE-INTENSITY-SIZE-EXT+ ...)
; compiling (DEFCONSTANT +TEXTURE-INDEX-SIZE-EXT+ ...)
; compiling (DEFCONSTANT +COLOR-INDEX1-EXT+ ...)
; compiling (DEFCONSTANT +COLOR-INDEX2-EXT+ ...)
; compiling (DEFCONSTANT +COLOR-INDEX4-EXT+ ...)
; compiling (DEFCONSTANT +COLOR-INDEX8-EXT+ ...)
; compiling (DEFCONSTANT +COLOR-INDEX12-EXT+ ...)
; compiling (DEFCONSTANT +COLOR-INDEX16-EXT+ ...)
; compiling (DEFCONSTANT +EXT-CLIP-VOLUME-HINT+ ...)
; compiling (DEFCONSTANT +CLIP-VOLUME-CLIPPING-HINT-EXT+ ...)
; compiling (DEFCONSTANT +EXT-COMPILED-VERTEX-ARRAY+ ...)
; compiling (DEFCONSTANT +ARRAY-ELEMENT-LOCK-FIRST-EXT+ ...)
; compiling (DEFCONSTANT +ARRAY-ELEMENT-LOCK-COUNT-EXT+ ...)
; compiling (DEFCONSTANT +HP-OCCLUSION-TEST+ ...)
; compiling (DEFCONSTANT +OCCLUSION-TEST-HP+ ...)
; compiling (DEFCONSTANT +OCCLUSION-TEST-RESULT-HP+ ...)
; compiling (DEFCONSTANT +EXT-SHARED-TEXTURE-PALETTE+ ...)
; compiling (DEFCONSTANT +SHARED-TEXTURE-PALETTE-EXT+ ...)
; compiling (DEFCONSTANT +EXT-STENCIL-WRAP+ ...)
; compiling (DEFCONSTANT +INCR-WRAP-EXT+ ...)
; compiling (DEFCONSTANT +DECR-WRAP-EXT+ ...)
; compiling (DEFCONSTANT +NV-TEXGEN-REFLECTION+ ...)
; compiling (DEFCONSTANT +NORMAL-MAP-NV+ ...)
; compiling (DEFCONSTANT +REFLECTION-MAP-NV+ ...)
; compiling (DEFCONSTANT +EXT-TEXTURE-ENV-ADD+ ...)
; compiling (DEFCONSTANT +MESA-WINDOW-POS+ ...)
; compiling (DEFCONSTANT +MESA-RESIZE-BUFFERS+ ...)
; compiling (DEFTYPE BOOL ...)
; compiling (DEFTYPE FLOAT32 ...)
; compiling (DEFTYPE FLOAT64 ...)
; compiling (DECLAIM (INLINE ASET-FLOAT32 ...))
; compiling (DEFUN ASET-FLOAT32 ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFUN ASET-FLOAT32
;     (XLIB::ASET-CARD32 GL::BITS ARRAY GL::INDEX)
; 
; note: doing signed word to integer coercion (cost 20)

; compiling (DEFUN ASET-FLOAT64 ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFUN ASET-FLOAT64
;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

; compiling (DEFUN BYTE-WIDTH ...)
; compiling (DEFUN SETTER ...)
; compiling (DEFUN SEQUENCE-SETTER ...)
; compiling (DEFMACRO DEFINE-SEQUENCE-SETTER ...)
; compiling (DEFINE-SEQUENCE-SETTER INT8); in: LAMBDA NIL
;     (LENGTH GL::SEQ)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a VECTOR.
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a VECTOR.

;     (AREF GL::SEQ GL::I)
; --> LET* 
; ==>
;   (SB-KERNEL:HAIRY-DATA-VECTOR-REF ARRAY SB-INT:INDEX)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a (SIMPLE-ARRAY * (*)), not a SIMPLE-STRING.
; 
; note: unable to
;   avoid runtime dispatch on array element type
; because:
;   Upgraded element type of array is not known at compile time.

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFMACRO DEFINE-SEQUENCE-SETTER
;     (LENGTH GL::SEQ)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a VECTOR.
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a VECTOR.

;     (AREF GL::SEQ GL::I)
; --> LET* 
; ==>
;   (SB-KERNEL:HAIRY-DATA-VECTOR-REF ARRAY SB-INT:INDEX)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a (SIMPLE-ARRAY * (*)), not a SIMPLE-STRING.
; 
; note: unable to
;   avoid runtime dispatch on array element type
; because:
;   Upgraded element type of array is not known at compile time.

; compiling (DEFINE-SEQUENCE-SETTER INT16); in: LAMBDA NIL
;     (LENGTH GL::SEQ)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a VECTOR.
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a VECTOR.

;     (AREF GL::SEQ GL::I)
; --> LET* 
; ==>
;   (SB-KERNEL:HAIRY-DATA-VECTOR-REF ARRAY SB-INT:INDEX)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a (SIMPLE-ARRAY * (*)), not a SIMPLE-STRING.
; 
; note: unable to
;   avoid runtime dispatch on array element type
; because:
;   Upgraded element type of array is not known at compile time.

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFMACRO DEFINE-SEQUENCE-SETTER
;     (LENGTH GL::SEQ)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a VECTOR.
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a VECTOR.

;     (AREF GL::SEQ GL::I)
; --> LET* 
; ==>
;   (SB-KERNEL:HAIRY-DATA-VECTOR-REF ARRAY SB-INT:INDEX)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a (SIMPLE-ARRAY * (*)), not a SIMPLE-STRING.
; 
; note: unable to
;   avoid runtime dispatch on array element type
; because:
;   Upgraded element type of array is not known at compile time.

; compiling (DEFINE-SEQUENCE-SETTER INT32); in: LAMBDA NIL
;     (LENGTH GL::SEQ)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a VECTOR.
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a VECTOR.

;     (AREF GL::SEQ GL::I)
; --> LET* 
; ==>
;   (SB-KERNEL:HAIRY-DATA-VECTOR-REF ARRAY SB-INT:INDEX)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a (SIMPLE-ARRAY * (*)), not a SIMPLE-STRING.
; 
; note: unable to
;   avoid runtime dispatch on array element type
; because:
;   Upgraded element type of array is not known at compile time.

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFMACRO DEFINE-SEQUENCE-SETTER
;     (LENGTH GL::SEQ)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a VECTOR.
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a VECTOR.

;     (AREF GL::SEQ GL::I)
; --> LET* 
; ==>
;   (SB-KERNEL:HAIRY-DATA-VECTOR-REF ARRAY SB-INT:INDEX)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a (SIMPLE-ARRAY * (*)), not a SIMPLE-STRING.
; 
; note: unable to
;   avoid runtime dispatch on array element type
; because:
;   Upgraded element type of array is not known at compile time.

; compiling (DEFINE-SEQUENCE-SETTER BOOL); in: LAMBDA NIL
;     (LENGTH GL::SEQ)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a VECTOR.
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a VECTOR.

;     (AREF GL::SEQ GL::I)
; --> LET* 
; ==>
;   (SB-KERNEL:HAIRY-DATA-VECTOR-REF ARRAY SB-INT:INDEX)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a (SIMPLE-ARRAY * (*)), not a SIMPLE-STRING.
; 
; note: unable to
;   avoid runtime dispatch on array element type
; because:
;   Upgraded element type of array is not known at compile time.

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFMACRO DEFINE-SEQUENCE-SETTER
;     (LENGTH GL::SEQ)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a VECTOR.
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a VECTOR.

;     (AREF GL::SEQ GL::I)
; --> LET* 
; ==>
;   (SB-KERNEL:HAIRY-DATA-VECTOR-REF ARRAY SB-INT:INDEX)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a (SIMPLE-ARRAY * (*)), not a SIMPLE-STRING.
; 
; note: unable to
;   avoid runtime dispatch on array element type
; because:
;   Upgraded element type of array is not known at compile time.

; compiling (DEFINE-SEQUENCE-SETTER CARD8); in: LAMBDA NIL
;     (LENGTH GL::SEQ)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a VECTOR.
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a VECTOR.

;     (AREF GL::SEQ GL::I)
; --> LET* 
; ==>
;   (SB-KERNEL:HAIRY-DATA-VECTOR-REF ARRAY SB-INT:INDEX)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a (SIMPLE-ARRAY * (*)), not a SIMPLE-STRING.
; 
; note: unable to
;   avoid runtime dispatch on array element type
; because:
;   Upgraded element type of array is not known at compile time.

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFMACRO DEFINE-SEQUENCE-SETTER
;     (LENGTH GL::SEQ)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a VECTOR.
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a VECTOR.

;     (AREF GL::SEQ GL::I)
; --> LET* 
; ==>
;   (SB-KERNEL:HAIRY-DATA-VECTOR-REF ARRAY SB-INT:INDEX)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a (SIMPLE-ARRAY * (*)), not a SIMPLE-STRING.
; 
; note: unable to
;   avoid runtime dispatch on array element type
; because:
;   Upgraded element type of array is not known at compile time.

; compiling (DEFINE-SEQUENCE-SETTER CARD16); in: LAMBDA NIL
;     (LENGTH GL::SEQ)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a VECTOR.
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a VECTOR.

;     (AREF GL::SEQ GL::I)
; --> LET* 
; ==>
;   (SB-KERNEL:HAIRY-DATA-VECTOR-REF ARRAY SB-INT:INDEX)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a (SIMPLE-ARRAY * (*)), not a SIMPLE-STRING.
; 
; note: unable to
;   avoid runtime dispatch on array element type
; because:
;   Upgraded element type of array is not known at compile time.

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFMACRO DEFINE-SEQUENCE-SETTER
;     (LENGTH GL::SEQ)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a VECTOR.
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a VECTOR.

;     (AREF GL::SEQ GL::I)
; --> LET* 
; ==>
;   (SB-KERNEL:HAIRY-DATA-VECTOR-REF ARRAY SB-INT:INDEX)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a (SIMPLE-ARRAY * (*)), not a SIMPLE-STRING.
; 
; note: unable to
;   avoid runtime dispatch on array element type
; because:
;   Upgraded element type of array is not known at compile time.

; compiling (DEFINE-SEQUENCE-SETTER CARD32); in: LAMBDA NIL
;     (LENGTH GL::SEQ)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a VECTOR.
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a VECTOR.

;     (AREF GL::SEQ GL::I)
; --> LET* 
; ==>
;   (SB-KERNEL:HAIRY-DATA-VECTOR-REF ARRAY SB-INT:INDEX)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a (SIMPLE-ARRAY * (*)), not a SIMPLE-STRING.
; 
; note: unable to
;   avoid runtime dispatch on array element type
; because:
;   Upgraded element type of array is not known at compile time.

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFMACRO DEFINE-SEQUENCE-SETTER
;     (LENGTH GL::SEQ)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a VECTOR.
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a VECTOR.

;     (AREF GL::SEQ GL::I)
; --> LET* 
; ==>
;   (SB-KERNEL:HAIRY-DATA-VECTOR-REF ARRAY SB-INT:INDEX)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a (SIMPLE-ARRAY * (*)), not a SIMPLE-STRING.
; 
; note: unable to
;   avoid runtime dispatch on array element type
; because:
;   Upgraded element type of array is not known at compile time.

; compiling (DEFINE-SEQUENCE-SETTER FLOAT32); in: LAMBDA NIL
;     (LENGTH GL::SEQ)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a VECTOR.
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a VECTOR.

;     (AREF GL::SEQ GL::I)
; --> LET* 
; ==>
;   (SB-KERNEL:HAIRY-DATA-VECTOR-REF ARRAY SB-INT:INDEX)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a (SIMPLE-ARRAY * (*)), not a SIMPLE-STRING.
; 
; note: unable to
;   avoid runtime dispatch on array element type
; because:
;   Upgraded element type of array is not known at compile time.

;     (GL::ASET-FLOAT32 GL::N
;                     GL::BUFFER
;                     (THE XLIB:ARRAY-INDEX (+ GL::START GL::OFFSET)))
; --> BLOCK LET 
; ==>
;   (XLIB::ASET-CARD32 GL::BITS ARRAY GL::INDEX)
; 
; note: doing signed word to integer coercion (cost 20)

;     (GL::ASET-FLOAT32 (SVREF GL::SEQ GL::I)
;                     GL::BUFFER
;                     (THE XLIB:ARRAY-INDEX (+ GL::START (* GL::I 4))))
; --> BLOCK LET 
; ==>
;   (XLIB::ASET-CARD32 GL::BITS ARRAY GL::INDEX)
; 
; note: doing signed word to integer coercion (cost 20)

;     (GL::ASET-FLOAT32 (AREF GL::SEQ GL::I)
;                     GL::BUFFER
;                     (THE XLIB:ARRAY-INDEX (+ GL::START (* GL::I 4))))
; --> BLOCK LET 
; ==>
;   (XLIB::ASET-CARD32 GL::BITS ARRAY GL::INDEX)
; 
; note: doing signed word to integer coercion (cost 20)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFMACRO DEFINE-SEQUENCE-SETTER
;     (LENGTH GL::SEQ)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a VECTOR.
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a VECTOR.

;     (AREF GL::SEQ GL::I)
; --> LET* 
; ==>
;   (SB-KERNEL:HAIRY-DATA-VECTOR-REF ARRAY SB-INT:INDEX)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a (SIMPLE-ARRAY * (*)), not a SIMPLE-STRING.
; 
; note: unable to
;   avoid runtime dispatch on array element type
; because:
;   Upgraded element type of array is not known at compile time.

; in: DEFUN ASET-FLOAT32
;     (XLIB::ASET-CARD32 GL::BITS ARRAY GL::INDEX)
; 
; note: doing signed word to integer coercion (cost 20)
; 
; note: doing signed word to integer coercion (cost 20)
; 
; note: doing signed word to integer coercion (cost 20)

; compiling (DEFINE-SEQUENCE-SETTER FLOAT64); in: LAMBDA NIL
;     (LENGTH GL::SEQ)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a VECTOR.
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a VECTOR.

;     (AREF GL::SEQ GL::I)
; --> LET* 
; ==>
;   (SB-KERNEL:HAIRY-DATA-VECTOR-REF ARRAY SB-INT:INDEX)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a (SIMPLE-ARRAY * (*)), not a SIMPLE-STRING.
; 
; note: unable to
;   avoid runtime dispatch on array element type
; because:
;   Upgraded element type of array is not known at compile time.

;     (GL::ASET-FLOAT64 GL::N
;                     GL::BUFFER
;                     (THE XLIB:ARRAY-INDEX (+ GL::START GL::OFFSET)))
; --> BLOCK LET 
; ==>
;   (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

; ==>
;   (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

;     (GL::ASET-FLOAT64 (SVREF GL::SEQ GL::I)
;                     GL::BUFFER
;                     (THE XLIB:ARRAY-INDEX (+ GL::START (* GL::I 8))))
; --> BLOCK LET 
; ==>
;   (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

; ==>
;   (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

;     (GL::ASET-FLOAT64 (AREF GL::SEQ GL::I)
;                     GL::BUFFER
;                     (THE XLIB:ARRAY-INDEX (+ GL::START (* GL::I 8))))
; --> BLOCK LET 
; ==>
;   (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

; ==>
;   (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFMACRO DEFINE-SEQUENCE-SETTER
;     (LENGTH GL::SEQ)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a VECTOR.
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a VECTOR.

;     (AREF GL::SEQ GL::I)
; --> LET* 
; ==>
;   (SB-KERNEL:HAIRY-DATA-VECTOR-REF ARRAY SB-INT:INDEX)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a (SIMPLE-ARRAY * (*)), not a SIMPLE-STRING.
; 
; note: unable to
;   avoid runtime dispatch on array element type
; because:
;   Upgraded element type of array is not known at compile time.

; in: DEFUN ASET-FLOAT64
;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

; compiling (DEFUN MAKE-ARGSPECS ...)
; compiling (DEFUN BYTE-WIDTH-CALCULATION ...)
; compiling (DEFUN COMPOSITE-ARGS ...)
; compiling (DEFUN MAKE-SETTER-FORMS ...)
; compiling (DEFMACRO DEFINE-RENDERING-COMMAND ...)
; compiling (DEFUN GET-STRING ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFUN GET-STRING
;     (XLIB::WITH-BUFFER-REQUEST-AND-REPLY
;    (XLIB:DISPLAY (XLIB:EXTENSION-OPCODE XLIB:DISPLAY "GLX") NIL)
;    ((XLIB::DATA GL::+GET-STRING+) (XLIB:CARD32 (GLX::CONTEXT-TAG GL::CTX))
;     (XLIB:CARD32 GL::NAME))
;    (LET* ((LENGTH (XLIB::CARD32-GET 12))
;           (GL::BYTES
;            (XLIB::SEQUENCE-GET :FORMAT
;                                XLIB:CARD8
;                                :RESULT-TYPE
;                                '#
;                                :INDEX
;                                32
;                                :LENGTH
;                                LENGTH)))
;      (DECLARE (TYPE (SIMPLE-ARRAY XLIB:CARD8 #) GL::BYTES)
;               (TYPE FIXNUM LENGTH))
;      (MAP-INTO (MAKE-STRING (1- LENGTH)) #'CODE-CHAR GL::BYTES)))
; --> LET UNWIND-PROTECT FLET BLOCK MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> BLOCK SB-C::%WITHIN-CLEANUP RETURN-FROM PROGN XLIB::WITH-BUFFER MACROLET 
; --> LET XLIB::HOLDING-LOCK SB-THREAD:WITH-RECURSIVE-LOCK LOCALLY 
; --> XLIB::WITHOUT-ABORTS PROGN XLIB::WITH-BUFFER-REQUEST-INTERNAL 
; --> XLIB::WITH-BUFFER-OUTPUT LET LET* XLIB::CHECK-PUT LET XLIB::CARD32-PUT 
; --> XLIB::WRITE-CARD32 
; ==>
;   (XLIB::ASET-CARD32 (THE XLIB:CARD32 XLIB::.VALUE.)
;                      XLIB::BUFFER-BBUF
;                      (XLIB::INDEX+ XLIB::BUFFER-BOFFSET 4))
; 
; note: doing unsigned word to integer coercion (cost 20)

; compiling (DEFINE-RENDERING-COMMAND ACCUM ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFUN ASET-FLOAT32
;     (XLIB::ASET-CARD32 GL::BITS ARRAY GL::INDEX)
; 
; note: doing signed word to integer coercion (cost 20)

; compiling (DEFINE-RENDERING-COMMAND ACTIVE-TEXTURE-ARB ...)
; compiling (DEFINE-RENDERING-COMMAND ALPHA-FUNC ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFUN ASET-FLOAT32
;     (XLIB::ASET-CARD32 GL::BITS ARRAY GL::INDEX)
; 
; note: doing signed word to integer coercion (cost 20)

; compiling (DEFINE-RENDERING-COMMAND BEGIN ...)
; compiling (DEFINE-RENDERING-COMMAND BIND-TEXTURE ...)
; compiling (DEFINE-RENDERING-COMMAND BLEND-COLOR ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFUN ASET-FLOAT32
;     (XLIB::ASET-CARD32 GL::BITS ARRAY GL::INDEX)
; 
; note: doing signed word to integer coercion (cost 20)
; 
; note: doing signed word to integer coercion (cost 20)
; 
; note: doing signed word to integer coercion (cost 20)
; 
; note: doing signed word to integer coercion (cost 20)

; compiling (DEFINE-RENDERING-COMMAND BLEND-EQUOTION ...)
; compiling (DEFINE-RENDERING-COMMAND BLEND-FUNC ...)
; compiling (DEFINE-RENDERING-COMMAND CALL-LIST ...)
; compiling (DEFINE-RENDERING-COMMAND CLEAR ...)
; compiling (DEFINE-RENDERING-COMMAND CLEAR-ACCUM ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFUN ASET-FLOAT32
;     (XLIB::ASET-CARD32 GL::BITS ARRAY GL::INDEX)
; 
; note: doing signed word to integer coercion (cost 20)
; 
; note: doing signed word to integer coercion (cost 20)
; 
; note: doing signed word to integer coercion (cost 20)
; 
; note: doing signed word to integer coercion (cost 20)

; compiling (DEFINE-RENDERING-COMMAND CLEAR-COLOR ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFUN ASET-FLOAT32
;     (XLIB::ASET-CARD32 GL::BITS ARRAY GL::INDEX)
; 
; note: doing signed word to integer coercion (cost 20)
; 
; note: doing signed word to integer coercion (cost 20)
; 
; note: doing signed word to integer coercion (cost 20)
; 
; note: doing signed word to integer coercion (cost 20)

; compiling (DEFINE-RENDERING-COMMAND CLEAR-DEPTH ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFUN ASET-FLOAT64
;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

; compiling (DEFINE-RENDERING-COMMAND CLEAR-INDEX ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFUN ASET-FLOAT32
;     (XLIB::ASET-CARD32 GL::BITS ARRAY GL::INDEX)
; 
; note: doing signed word to integer coercion (cost 20)

; compiling (DEFINE-RENDERING-COMMAND CLEAR-STENCIL ...)
; compiling (DEFINE-RENDERING-COMMAND CLIP-PLANE ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFUN ASET-FLOAT64
;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

; compiling (DEFINE-RENDERING-COMMAND COLOR-3B ...)
; compiling (DEFINE-RENDERING-COMMAND COLOR-3D ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFUN ASET-FLOAT64
;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

; compiling (DEFINE-RENDERING-COMMAND COLOR-3F ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFUN ASET-FLOAT32
;     (XLIB::ASET-CARD32 GL::BITS ARRAY GL::INDEX)
; 
; note: doing signed word to integer coercion (cost 20)
; 
; note: doing signed word to integer coercion (cost 20)
; 
; note: doing signed word to integer coercion (cost 20)

; compiling (DEFINE-RENDERING-COMMAND COLOR-3I ...)
; compiling (DEFINE-RENDERING-COMMAND COLOR-3S ...)
; compiling (DEFINE-RENDERING-COMMAND COLOR-3UB ...)
; compiling (DEFINE-RENDERING-COMMAND COLOR-3UI ...)
; compiling (DEFINE-RENDERING-COMMAND COLOR-3US ...)
; compiling (DEFINE-RENDERING-COMMAND COLOR-4B ...)
; compiling (DEFINE-RENDERING-COMMAND COLOR-4D ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFUN ASET-FLOAT64
;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

; compiling (DEFINE-RENDERING-COMMAND COLOR-4F ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFUN ASET-FLOAT32
;     (XLIB::ASET-CARD32 GL::BITS ARRAY GL::INDEX)
; 
; note: doing signed word to integer coercion (cost 20)
; 
; note: doing signed word to integer coercion (cost 20)
; 
; note: doing signed word to integer coercion (cost 20)
; 
; note: doing signed word to integer coercion (cost 20)

; compiling (DEFINE-RENDERING-COMMAND COLOR-4I ...)
; compiling (DEFINE-RENDERING-COMMAND COLOR-4S ...)
; compiling (DEFINE-RENDERING-COMMAND COLOR-4UB ...)
; compiling (DEFINE-RENDERING-COMMAND COLOR-4UI ...)
; compiling (DEFINE-RENDERING-COMMAND COLOR-4US ...)
; compiling (DEFINE-RENDERING-COMMAND COLOR-MASK ...)
; compiling (DEFINE-RENDERING-COMMAND COLOR-MATERIAL ...)
; compiling (DEFINE-RENDERING-COMMAND COLOR-TABLE-PARAMETER-FV ...)
; compiling (DEFINE-RENDERING-COMMAND COLOR-TABLE-PARAMETER-IV ...)
; compiling (DEFINE-RENDERING-COMMAND CONVOLUTION-PARAMETER-F ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFUN ASET-FLOAT32
;     (XLIB::ASET-CARD32 GL::BITS ARRAY GL::INDEX)
; 
; note: doing signed word to integer coercion (cost 20)

; compiling (DEFINE-RENDERING-COMMAND CONVOLUTION-PARAMETER-FV ...)
; compiling (DEFINE-RENDERING-COMMAND CONVOLUTION-PARAMETER-I ...)
; compiling (DEFINE-RENDERING-COMMAND CONVOLUTION-PARAMETER-IV ...)
; compiling (DEFINE-RENDERING-COMMAND COPY-COLOR-SUB-TABLE ...)
; compiling (DEFINE-RENDERING-COMMAND COPY-COLOR-TABLE ...)
; compiling (DEFINE-RENDERING-COMMAND COPY-CONVOLUTION-FILTER-ID ...)
; compiling (DEFINE-RENDERING-COMMAND COPY-CONVOLUTION-FILTER-2D ...)
; compiling (DEFINE-RENDERING-COMMAND COPY-PIXELS ...)
; compiling (DEFINE-RENDERING-COMMAND COPY-TEX-IMAGE-1D ...)
; compiling (DEFINE-RENDERING-COMMAND COPY-TEX-IMAGE-2D ...)
; compiling (DEFINE-RENDERING-COMMAND COPY-TEX-SUB-IMAGE-1D ...)
; compiling (DEFINE-RENDERING-COMMAND COPY-TEX-SUB-IMAGE-2D ...)
; compiling (DEFINE-RENDERING-COMMAND COPY-TEX-SUB-IMAGE-3D ...)
; compiling (DEFINE-RENDERING-COMMAND CULL-FACE ...)
; compiling (DEFINE-RENDERING-COMMAND DEPTH-FUNC ...)
; compiling (DEFINE-RENDERING-COMMAND DEPTH-MASK ...)
; compiling (DEFINE-RENDERING-COMMAND DEPTH-RANGE ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFUN ASET-FLOAT64
;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

; compiling (DEFINE-RENDERING-COMMAND DRAW-BUFFER ...)
; compiling (DEFINE-RENDERING-COMMAND EDGE-FLAG-V ...)
; compiling (DEFINE-RENDERING-COMMAND END ...)
; compiling (DEFINE-RENDERING-COMMAND EVAL-COORD-1D ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFUN ASET-FLOAT64
;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

; compiling (DEFINE-RENDERING-COMMAND EVAL-COORD-1F ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFUN ASET-FLOAT32
;     (XLIB::ASET-CARD32 GL::BITS ARRAY GL::INDEX)
; 
; note: doing signed word to integer coercion (cost 20)

; compiling (DEFINE-RENDERING-COMMAND EVAL-COORD-2D ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFUN ASET-FLOAT64
;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

; compiling (DEFINE-RENDERING-COMMAND EVAL-COORD-2F ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFUN ASET-FLOAT32
;     (XLIB::ASET-CARD32 GL::BITS ARRAY GL::INDEX)
; 
; note: doing signed word to integer coercion (cost 20)
; 
; note: doing signed word to integer coercion (cost 20)

; compiling (DEFINE-RENDERING-COMMAND EVAL-MESH-1 ...)
; compiling (DEFINE-RENDERING-COMMAND EVAL-MESH-2 ...)
; compiling (DEFINE-RENDERING-COMMAND EVAL-POINT-1 ...)
; compiling (DEFINE-RENDERING-COMMAND EVAL-POINT-2 ...)
; compiling (DEFINE-RENDERING-COMMAND FOG-F ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFUN ASET-FLOAT32
;     (XLIB::ASET-CARD32 GL::BITS ARRAY GL::INDEX)
; 
; note: doing signed word to integer coercion (cost 20)

; compiling (DEFINE-RENDERING-COMMAND FOG-FV ...)
; compiling (DEFINE-RENDERING-COMMAND FOG-I ...)
; compiling (DEFINE-RENDERING-COMMAND FOG-IV ...)
; compiling (DEFINE-RENDERING-COMMAND FRONT-FACE ...)
; compiling (DEFINE-RENDERING-COMMAND FRUSTUM ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFUN ASET-FLOAT64
;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

; compiling (DEFINE-RENDERING-COMMAND HINT ...)
; compiling (DEFINE-RENDERING-COMMAND HISTOGRAM ...)
; compiling (DEFINE-RENDERING-COMMAND INDEX-MASK ...)
; compiling (DEFINE-RENDERING-COMMAND INDEX-D ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFUN ASET-FLOAT64
;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

; compiling (DEFINE-RENDERING-COMMAND INDEX-F ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFUN ASET-FLOAT32
;     (XLIB::ASET-CARD32 GL::BITS ARRAY GL::INDEX)
; 
; note: doing signed word to integer coercion (cost 20)

; compiling (DEFINE-RENDERING-COMMAND INDEX-I ...)
; compiling (DEFINE-RENDERING-COMMAND INDEX-S ...)
; compiling (DEFINE-RENDERING-COMMAND INDEX-UB ...)
; compiling (DEFINE-RENDERING-COMMAND INIT-NAMES ...)
; compiling (DEFINE-RENDERING-COMMAND LIGHT-MODEL-F ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFUN ASET-FLOAT32
;     (XLIB::ASET-CARD32 GL::BITS ARRAY GL::INDEX)
; 
; note: doing signed word to integer coercion (cost 20)

; compiling (DEFINE-RENDERING-COMMAND LIGHT-MODEL-FV ...)
; compiling (DEFINE-RENDERING-COMMAND LIGHT-MODEL-I ...)
; compiling (DEFINE-RENDERING-COMMAND LIGHT-MODEL-IV ...)
; compiling (DEFINE-RENDERING-COMMAND LIGHT-F ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFUN ASET-FLOAT32
;     (XLIB::ASET-CARD32 GL::BITS ARRAY GL::INDEX)
; 
; note: doing signed word to integer coercion (cost 20)

; compiling (DEFINE-RENDERING-COMMAND LIGHT-FV ...)
; compiling (DEFINE-RENDERING-COMMAND LIGHT-I ...)
; compiling (DEFINE-RENDERING-COMMAND LIGHT-IV ...)
; compiling (DEFINE-RENDERING-COMMAND LINE-STIPPLE ...)
; compiling (DEFINE-RENDERING-COMMAND LINE-WIDTH ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFUN ASET-FLOAT32
;     (XLIB::ASET-CARD32 GL::BITS ARRAY GL::INDEX)
; 
; note: doing signed word to integer coercion (cost 20)

; compiling (DEFINE-RENDERING-COMMAND LIST-BASE ...)
; compiling (DEFINE-RENDERING-COMMAND LOAD-IDENTITY ...)
; compiling (DEFINE-RENDERING-COMMAND LOAD-MATRIX-D ...)
; compiling (DEFINE-RENDERING-COMMAND LOAD-MATRIX-F ...)
; compiling (DEFINE-RENDERING-COMMAND LOAD-NAME ...)
; compiling (DEFINE-RENDERING-COMMAND LOGIC-OP ...)
; compiling (DEFINE-RENDERING-COMMAND MAP-GRID-1D ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFUN ASET-FLOAT64
;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

; compiling (DEFINE-RENDERING-COMMAND MAP-GRID-1F ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFUN ASET-FLOAT32
;     (XLIB::ASET-CARD32 GL::BITS ARRAY GL::INDEX)
; 
; note: doing signed word to integer coercion (cost 20)
; 
; note: doing signed word to integer coercion (cost 20)

; compiling (DEFINE-RENDERING-COMMAND MAP-GRID-2D ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFUN ASET-FLOAT64
;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

; compiling (DEFINE-RENDERING-COMMAND MAP-GRID-2F ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFUN ASET-FLOAT32
;     (XLIB::ASET-CARD32 GL::BITS ARRAY GL::INDEX)
; 
; note: doing signed word to integer coercion (cost 20)
; 
; note: doing signed word to integer coercion (cost 20)
; 
; note: doing signed word to integer coercion (cost 20)
; 
; note: doing signed word to integer coercion (cost 20)

; compiling (DEFINE-RENDERING-COMMAND MATERIAL-F ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFUN ASET-FLOAT32
;     (XLIB::ASET-CARD32 GL::BITS ARRAY GL::INDEX)
; 
; note: doing signed word to integer coercion (cost 20)

; compiling (DEFINE-RENDERING-COMMAND MATERIAL-FV ...)
; compiling (DEFINE-RENDERING-COMMAND MATERIAL-I ...)
; compiling (DEFINE-RENDERING-COMMAND MATERIAL-IV ...)
; compiling (DEFINE-RENDERING-COMMAND MATRIX-MODE ...)
; compiling (DEFINE-RENDERING-COMMAND MINMAX ...)
; compiling (DEFINE-RENDERING-COMMAND MULT-MATRIX-D ...)
; compiling (DEFINE-RENDERING-COMMAND MULT-MATRIX-F ...)
; compiling (DEFINE-RENDERING-COMMAND MULTI-TEX-COORD-1D-ARB ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFUN ASET-FLOAT64
;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

; compiling (DEFINE-RENDERING-COMMAND MULTI-TEX-COORD-1F-ARB ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFUN ASET-FLOAT32
;     (XLIB::ASET-CARD32 GL::BITS ARRAY GL::INDEX)
; 
; note: doing signed word to integer coercion (cost 20)

; compiling (DEFINE-RENDERING-COMMAND MULTI-TEX-COORD-1I-ARB ...)
; compiling (DEFINE-RENDERING-COMMAND MULTI-TEX-COORD-1S-ARB ...)
; compiling (DEFINE-RENDERING-COMMAND MULTI-TEX-COORD-2D-ARB ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFUN ASET-FLOAT64
;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

; compiling (DEFINE-RENDERING-COMMAND MULTI-TEX-COORD-2F-ARB ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFUN ASET-FLOAT32
;     (XLIB::ASET-CARD32 GL::BITS ARRAY GL::INDEX)
; 
; note: doing signed word to integer coercion (cost 20)
; 
; note: doing signed word to integer coercion (cost 20)

; compiling (DEFINE-RENDERING-COMMAND MULTI-TEX-COORD-2I-ARB ...)
; compiling (DEFINE-RENDERING-COMMAND MULTI-TEX-COORD-2S-ARB ...)
; compiling (DEFINE-RENDERING-COMMAND MULTI-TEX-COORD-3D-ARB ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFUN ASET-FLOAT64
;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

; compiling (DEFINE-RENDERING-COMMAND MULTI-TEX-COORD-3F-ARB ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFUN ASET-FLOAT32
;     (XLIB::ASET-CARD32 GL::BITS ARRAY GL::INDEX)
; 
; note: doing signed word to integer coercion (cost 20)
; 
; note: doing signed word to integer coercion (cost 20)
; 
; note: doing signed word to integer coercion (cost 20)

; compiling (DEFINE-RENDERING-COMMAND MULTI-TEX-COORD-3I-ARB ...)
; compiling (DEFINE-RENDERING-COMMAND MULTI-TEX-COORD-3S-ARB ...)
; compiling (DEFINE-RENDERING-COMMAND MULTI-TEX-COORD-4D-ARB ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFUN ASET-FLOAT64
;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

; compiling (DEFINE-RENDERING-COMMAND MULTI-TEX-COORD-4F-ARB ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFUN ASET-FLOAT32
;     (XLIB::ASET-CARD32 GL::BITS ARRAY GL::INDEX)
; 
; note: doing signed word to integer coercion (cost 20)
; 
; note: doing signed word to integer coercion (cost 20)
; 
; note: doing signed word to integer coercion (cost 20)
; 
; note: doing signed word to integer coercion (cost 20)

; compiling (DEFINE-RENDERING-COMMAND MULTI-TEX-COORD-4I-ARB ...)
; compiling (DEFINE-RENDERING-COMMAND MULTI-TEX-COORD-4S-ARB ...)
; compiling (DEFINE-RENDERING-COMMAND NORMAL-3B ...)
; compiling (DEFINE-RENDERING-COMMAND NORMAL-3D ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFUN ASET-FLOAT64
;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

; compiling (DEFINE-RENDERING-COMMAND NORMAL-3F ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFUN ASET-FLOAT32
;     (XLIB::ASET-CARD32 GL::BITS ARRAY GL::INDEX)
; 
; note: doing signed word to integer coercion (cost 20)
; 
; note: doing signed word to integer coercion (cost 20)
; 
; note: doing signed word to integer coercion (cost 20)

; compiling (DEFINE-RENDERING-COMMAND NORMAL-3I ...)
; compiling (DEFINE-RENDERING-COMMAND NORMAL-3S ...)
; compiling (DEFINE-RENDERING-COMMAND ORTHO ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFUN ASET-FLOAT64
;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

; compiling (DEFINE-RENDERING-COMMAND PASS-THROUGH ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFUN ASET-FLOAT32
;     (XLIB::ASET-CARD32 GL::BITS ARRAY GL::INDEX)
; 
; note: doing signed word to integer coercion (cost 20)

; compiling (DEFINE-RENDERING-COMMAND PIXEL-TRANSFER-F ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFUN ASET-FLOAT32
;     (XLIB::ASET-CARD32 GL::BITS ARRAY GL::INDEX)
; 
; note: doing signed word to integer coercion (cost 20)

; compiling (DEFINE-RENDERING-COMMAND PIXEL-TRANSFER-I ...)
; compiling (DEFINE-RENDERING-COMMAND PIXEL-ZOOM ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFUN ASET-FLOAT32
;     (XLIB::ASET-CARD32 GL::BITS ARRAY GL::INDEX)
; 
; note: doing signed word to integer coercion (cost 20)
; 
; note: doing signed word to integer coercion (cost 20)

; compiling (DEFINE-RENDERING-COMMAND POINT-SIZE ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFUN ASET-FLOAT32
;     (XLIB::ASET-CARD32 GL::BITS ARRAY GL::INDEX)
; 
; note: doing signed word to integer coercion (cost 20)

; compiling (DEFINE-RENDERING-COMMAND POLYGON-MODE ...)
; compiling (DEFINE-RENDERING-COMMAND POLYGON-OFFSET ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFUN ASET-FLOAT32
;     (XLIB::ASET-CARD32 GL::BITS ARRAY GL::INDEX)
; 
; note: doing signed word to integer coercion (cost 20)
; 
; note: doing signed word to integer coercion (cost 20)

; compiling (DEFINE-RENDERING-COMMAND POP-ATTRIB ...)
; compiling (DEFINE-RENDERING-COMMAND POP-MATRIX ...)
; compiling (DEFINE-RENDERING-COMMAND POP-NAME ...)
; compiling (DEFINE-RENDERING-COMMAND PRIORITIZE-TEXTURES ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFINE-RENDERING-COMMAND PRIORITIZE-TEXTURES
;     (GL::DEFINE-RENDERING-COMMAND GL::PRIORITIZE-TEXTURES
;                                 4118
;                                 (GL::N XLIB:INT32)
;                                 (GL::TEXTURES (LIST XLIB:CARD32 GL::N))
;                                 (GL::PRIORITIES (LIST GL::FLOAT32 GL::N)))
; --> DEFUN PROGN EVAL-WHEN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA 
; --> FUNCTION BLOCK LET* + * CEILING + + + * * 
; ==>
;   (ASH SB-C::X 2)
; 
; note: forced to do full call
;       unable to do inline ASH (cost 2) because:
;       The first argument is a (SIGNED-BYTE 32), not a FIXNUM.
;       The result is a (VALUES (INTEGER -8589934592 8589934588)
;                               &OPTIONAL), not a (VALUES FIXNUM &REST T).
;       unable to do inline ASH (cost 3) because:
;       The result is a (VALUES (INTEGER -8589934592 8589934588)
;                               &OPTIONAL), not a (VALUES (SIGNED-BYTE 32)
;                                                         &REST
;                                                         T).
;       etc.

; --> DEFUN PROGN EVAL-WHEN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA 
; --> FUNCTION BLOCK LET* + * CEILING + + + 
; ==>
;   (+ SB-C::Y 4)
; 
; note: forced to do GENERIC-+ (cost 10)
;       unable to do inline fixnum arithmetic (cost 1) because:
;       The first argument is a (INTEGER -8589934592 8589934588), not a FIXNUM.
;       The result is a (VALUES (INTEGER -8589934588 8589934592)
;                               &OPTIONAL), not a (VALUES FIXNUM &REST T).
;       unable to do inline fixnum arithmetic (cost 2) because:
;       The first argument is a (INTEGER -8589934592 8589934588), not a FIXNUM.
;       The result is a (VALUES (INTEGER -8589934588 8589934592)
;                               &OPTIONAL), not a (VALUES FIXNUM &REST T).
;       etc.

; --> DEFUN PROGN EVAL-WHEN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA 
; --> FUNCTION BLOCK LET* + * CEILING + + * * 
; ==>
;   (ASH SB-C::X 2)
; 
; note: forced to do full call
;       unable to do inline ASH (cost 2) because:
;       The first argument is a (SIGNED-BYTE 32), not a FIXNUM.
;       The result is a (VALUES (INTEGER -8589934592 8589934588)
;                               &OPTIONAL), not a (VALUES FIXNUM &REST T).
;       unable to do inline ASH (cost 3) because:
;       The result is a (VALUES (INTEGER -8589934592 8589934588)
;                               &OPTIONAL), not a (VALUES (SIGNED-BYTE 32)
;                                                         &REST
;                                                         T).
;       etc.

; --> DEFUN PROGN EVAL-WHEN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA 
; --> FUNCTION BLOCK LET* + * CEILING + 
; ==>
;   (+ (+ 4 (* 4 GL::N)) (* 4 GL::N))
; 
; note: forced to do GENERIC-+ (cost 10)
;       unable to do inline fixnum arithmetic (cost 2) because:
;       The first argument is a (INTEGER -8589934588 8589934592), not a FIXNUM.
;       The second argument is a (INTEGER -8589934592 8589934588), not a FIXNUM.
;       The result is a (VALUES (INTEGER -17179869180 17179869180)
;                               &OPTIONAL), not a (VALUES FIXNUM &REST T).
;       unable to do safe inline fixnum arithmetic (cost 4) because:
;       The first argument is a (INTEGER -8589934588 8589934592), not a FIXNUM.
;       The second argument is a (INTEGER -8589934592 8589934588), not a FIXNUM.
;       The result is a (VALUES (INTEGER -17179869180 17179869180)
;                               &OPTIONAL), not a (VALUES FIXNUM &REST T).
;       etc.

; --> DEFUN PROGN EVAL-WHEN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA 
; --> FUNCTION BLOCK LET* + * CEILING LET 
; ==>
;   (+ SB-C::X 3)
; 
; note: forced to do GENERIC-+ (cost 10)
;       unable to do inline fixnum arithmetic (cost 1) because:
;       The first argument is a (INTEGER -17179869180 17179869180), not a FIXNUM.
;       The result is a (VALUES (INTEGER -17179869177 17179869183)
;                               &OPTIONAL), not a (VALUES FIXNUM &REST T).
;       unable to do inline fixnum arithmetic (cost 2) because:
;       The first argument is a (INTEGER -17179869180 17179869180), not a FIXNUM.
;       The result is a (VALUES (INTEGER -17179869177 17179869183)
;                               &OPTIONAL), not a (VALUES FIXNUM &REST T).
;       etc.

; --> DEFUN PROGN EVAL-WHEN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA 
; --> FUNCTION BLOCK LET* + * CEILING LET VALUES 
; ==>
;   (ASH SB-C::X -2)
; 
; note: forced to do full call
;       unable to do inline ASH (cost 3) because:
;       The first argument is a (INTEGER -17179869177
;                                        17179869183), not a (SIGNED-BYTE 32).
;       The result is a (VALUES (INTEGER -4294967295 4294967295)
;                               &OPTIONAL), not a (VALUES (SIGNED-BYTE 32)
;                                                         &REST
;                                                         T).
;       unable to do inline constant ASH (cost 4) because:
;       The first argument is a (INTEGER -17179869177
;                                        17179869183), not a (UNSIGNED-BYTE 32).
;       The result is a (VALUES (INTEGER -4294967295 4294967295)
;                               &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 32)
;                                                         &REST
;                                                         T).
;       etc.

; --> DEFUN PROGN EVAL-WHEN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA 
; --> FUNCTION BLOCK LET* + * * 
; ==>
;   (ASH SB-C::X 2)
; 
; note: forced to do full call
;       unable to do inline ASH (cost 2) because:
;       The first argument is a (INTEGER -4294967295 4294967295), not a FIXNUM.
;       The result is a (VALUES (INTEGER -17179869180 17179869180)
;                               &OPTIONAL), not a (VALUES FIXNUM &REST T).
;       unable to do inline ASH (cost 3) because:
;       The first argument is a (INTEGER -4294967295
;                                        4294967295), not a (SIGNED-BYTE 32).
;       The result is a (VALUES (INTEGER -17179869180 17179869180)
;                               &OPTIONAL), not a (VALUES (SIGNED-BYTE 32)
;                                                         &REST
;                                                         T).
;       etc.

; --> DEFUN PROGN EVAL-WHEN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA 
; --> FUNCTION BLOCK LET* + 
; ==>
;   (+ SB-C::Y 4)
; 
; note: forced to do GENERIC-+ (cost 10)
;       unable to do inline fixnum arithmetic (cost 1) because:
;       The first argument is a (INTEGER -17179869180 17179869180), not a FIXNUM.
;       unable to do inline fixnum arithmetic (cost 2) because:
;       The first argument is a (INTEGER -17179869180 17179869180), not a FIXNUM.
;       etc.

; compiling (DEFINE-RENDERING-COMMAND PUSH-ATTRIB ...)
; compiling (DEFINE-RENDERING-COMMAND PUSH-MATRIX ...)
; compiling (DEFINE-RENDERING-COMMAND PUSH-NAME ...)
; compiling (DEFINE-RENDERING-COMMAND RASTER-POS-2D ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFUN ASET-FLOAT64
;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

; compiling (DEFINE-RENDERING-COMMAND RASTER-POS-2F ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFUN ASET-FLOAT32
;     (XLIB::ASET-CARD32 GL::BITS ARRAY GL::INDEX)
; 
; note: doing signed word to integer coercion (cost 20)
; 
; note: doing signed word to integer coercion (cost 20)

; compiling (DEFINE-RENDERING-COMMAND RASTER-POS-2I ...)
; compiling (DEFINE-RENDERING-COMMAND RASTER-POS-2S ...)
; compiling (DEFINE-RENDERING-COMMAND RASTER-POS-3D ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFUN ASET-FLOAT64
;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

; compiling (DEFINE-RENDERING-COMMAND RASTER-POS-3F ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFUN ASET-FLOAT32
;     (XLIB::ASET-CARD32 GL::BITS ARRAY GL::INDEX)
; 
; note: doing signed word to integer coercion (cost 20)
; 
; note: doing signed word to integer coercion (cost 20)
; 
; note: doing signed word to integer coercion (cost 20)

; compiling (DEFINE-RENDERING-COMMAND RASTER-POS-3I ...)
; compiling (DEFINE-RENDERING-COMMAND RASTER-POS-3S ...)
; compiling (DEFINE-RENDERING-COMMAND RASTER-POS-4D ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFUN ASET-FLOAT64
;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

; compiling (DEFINE-RENDERING-COMMAND RASTER-POS-4F ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFUN ASET-FLOAT32
;     (XLIB::ASET-CARD32 GL::BITS ARRAY GL::INDEX)
; 
; note: doing signed word to integer coercion (cost 20)
; 
; note: doing signed word to integer coercion (cost 20)
; 
; note: doing signed word to integer coercion (cost 20)
; 
; note: doing signed word to integer coercion (cost 20)

; compiling (DEFINE-RENDERING-COMMAND RASTER-POS-4I ...)
; compiling (DEFINE-RENDERING-COMMAND RASTER-POS-4S ...)
; compiling (DEFINE-RENDERING-COMMAND READ-BUFFER ...)
; compiling (DEFINE-RENDERING-COMMAND RECT-D ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFUN ASET-FLOAT64
;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

; compiling (DEFINE-RENDERING-COMMAND RECT-F ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFUN ASET-FLOAT32
;     (XLIB::ASET-CARD32 GL::BITS ARRAY GL::INDEX)
; 
; note: doing signed word to integer coercion (cost 20)
; 
; note: doing signed word to integer coercion (cost 20)
; 
; note: doing signed word to integer coercion (cost 20)
; 
; note: doing signed word to integer coercion (cost 20)

; compiling (DEFINE-RENDERING-COMMAND RECT-I ...)
; compiling (DEFINE-RENDERING-COMMAND RECT-S ...)
; compiling (DEFINE-RENDERING-COMMAND RESET-HISTOGRAM ...)
; compiling (DEFINE-RENDERING-COMMAND RESET-MINMAX ...)
; compiling (DEFINE-RENDERING-COMMAND ROTATE-D ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFUN ASET-FLOAT64
;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

; compiling (DEFINE-RENDERING-COMMAND ROTATE-F ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFUN ASET-FLOAT32
;     (XLIB::ASET-CARD32 GL::BITS ARRAY GL::INDEX)
; 
; note: doing signed word to integer coercion (cost 20)
; 
; note: doing signed word to integer coercion (cost 20)
; 
; note: doing signed word to integer coercion (cost 20)
; 
; note: doing signed word to integer coercion (cost 20)

; compiling (DEFINE-RENDERING-COMMAND SCALE-D ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFUN ASET-FLOAT64
;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

; compiling (DEFINE-RENDERING-COMMAND SCALE-F ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFUN ASET-FLOAT32
;     (XLIB::ASET-CARD32 GL::BITS ARRAY GL::INDEX)
; 
; note: doing signed word to integer coercion (cost 20)
; 
; note: doing signed word to integer coercion (cost 20)
; 
; note: doing signed word to integer coercion (cost 20)

; compiling (DEFINE-RENDERING-COMMAND SCISSOR ...)
; compiling (DEFINE-RENDERING-COMMAND SHADE-MODEL ...)
; compiling (DEFINE-RENDERING-COMMAND STENCIL-FUNC ...)
; compiling (DEFINE-RENDERING-COMMAND STENCIL-MASK ...)
; compiling (DEFINE-RENDERING-COMMAND STENCIL-OP ...)
; compiling (DEFINE-RENDERING-COMMAND TEX-ENV-F ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFUN ASET-FLOAT32
;     (XLIB::ASET-CARD32 GL::BITS ARRAY GL::INDEX)
; 
; note: doing signed word to integer coercion (cost 20)

; compiling (DEFINE-RENDERING-COMMAND TEX-ENV-FV ...)
; compiling (DEFINE-RENDERING-COMMAND TEX-ENV-I ...)
; compiling (DEFINE-RENDERING-COMMAND TEX-ENV-IV ...)
; compiling (DEFINE-RENDERING-COMMAND TEX-GEN-D ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFUN ASET-FLOAT64
;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

; compiling (DEFINE-RENDERING-COMMAND TEX-GEN-DV ...)
; compiling (DEFINE-RENDERING-COMMAND TEX-GEN-F ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFUN ASET-FLOAT32
;     (XLIB::ASET-CARD32 GL::BITS ARRAY GL::INDEX)
; 
; note: doing signed word to integer coercion (cost 20)

; compiling (DEFINE-RENDERING-COMMAND TEX-GEN-FV ...)
; compiling (DEFINE-RENDERING-COMMAND TEX-GEN-I ...)
; compiling (DEFINE-RENDERING-COMMAND TEX-GEN-IV ...)
; compiling (DEFINE-RENDERING-COMMAND TEX-PARAMETER-F ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFUN ASET-FLOAT32
;     (XLIB::ASET-CARD32 GL::BITS ARRAY GL::INDEX)
; 
; note: doing signed word to integer coercion (cost 20)

; compiling (DEFINE-RENDERING-COMMAND TEX-PARAMETER-FV ...)
; compiling (DEFINE-RENDERING-COMMAND TEX-PARAMETER-I ...)
; compiling (DEFINE-RENDERING-COMMAND TEX-PARAMETER-IV ...)
; compiling (DEFINE-RENDERING-COMMAND TRANSLATE-D ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFUN ASET-FLOAT64
;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

; compiling (DEFINE-RENDERING-COMMAND TRANSLATE-F ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFUN ASET-FLOAT32
;     (XLIB::ASET-CARD32 GL::BITS ARRAY GL::INDEX)
; 
; note: doing signed word to integer coercion (cost 20)
; 
; note: doing signed word to integer coercion (cost 20)
; 
; note: doing signed word to integer coercion (cost 20)

; compiling (DEFINE-RENDERING-COMMAND VERTEX-2D ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFUN ASET-FLOAT64
;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

; compiling (DEFINE-RENDERING-COMMAND VERTEX-2F ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFUN ASET-FLOAT32
;     (XLIB::ASET-CARD32 GL::BITS ARRAY GL::INDEX)
; 
; note: doing signed word to integer coercion (cost 20)
; 
; note: doing signed word to integer coercion (cost 20)

; compiling (DEFINE-RENDERING-COMMAND VERTEX-2I ...)
; compiling (DEFINE-RENDERING-COMMAND VERTEX-2S ...)
; compiling (DEFINE-RENDERING-COMMAND VERTEX-3D ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFUN ASET-FLOAT64
;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

; compiling (DEFINE-RENDERING-COMMAND VERTEX-3F ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFUN ASET-FLOAT32
;     (XLIB::ASET-CARD32 GL::BITS ARRAY GL::INDEX)
; 
; note: doing signed word to integer coercion (cost 20)
; 
; note: doing signed word to integer coercion (cost 20)
; 
; note: doing signed word to integer coercion (cost 20)

; compiling (DEFINE-RENDERING-COMMAND VERTEX-3I ...)
; compiling (DEFINE-RENDERING-COMMAND VERTEX-3S ...)
; compiling (DEFINE-RENDERING-COMMAND VERTEX-4D ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFUN ASET-FLOAT64
;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::LOW ARRAY GL::INDEX)
; 
; note: doing unsigned word to integer coercion (cost 20)

;     (XLIB::ASET-CARD32 GL::HIGH ARRAY (THE XLIB:ARRAY-INDEX (+ GL::INDEX 4)))
; 
; note: doing signed word to integer coercion (cost 20)

; compiling (DEFINE-RENDERING-COMMAND VERTEX-4F ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFUN ASET-FLOAT32
;     (XLIB::ASET-CARD32 GL::BITS ARRAY GL::INDEX)
; 
; note: doing signed word to integer coercion (cost 20)
; 
; note: doing signed word to integer coercion (cost 20)
; 
; note: doing signed word to integer coercion (cost 20)
; 
; note: doing signed word to integer coercion (cost 20)

; compiling (DEFINE-RENDERING-COMMAND VERTEX-4I ...)
; compiling (DEFINE-RENDERING-COMMAND VERTEX-4S ...)
; compiling (DEFINE-RENDERING-COMMAND VIEWPORT ...)
; compiling (DEFUN NEW-LIST ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFUN NEW-LIST
;     (XLIB::WITH-BUFFER-REQUEST
;    (XLIB:DISPLAY (XLIB:EXTENSION-OPCODE XLIB:DISPLAY "GLX"))
;    (XLIB::DATA GL::+NEW-LIST+)
;    (XLIB:CARD32 (GLX::CONTEXT-TAG GL::CTX))
;    (XLIB:CARD32 LIST)
;    (XLIB:CARD32 GL::MODE))
; --> LET XLIB::WITH-BUFFER MACROLET LET XLIB::HOLDING-LOCK 
; --> SB-THREAD:WITH-RECURSIVE-LOCK LOCALLY MULTIPLE-VALUE-PROG1 
; --> XLIB::WITHOUT-ABORTS PROGN XLIB::WITH-BUFFER-REQUEST-INTERNAL 
; --> XLIB::WITH-BUFFER-OUTPUT LET LET* XLIB::CHECK-PUT LET XLIB::CARD32-PUT 
; --> XLIB::WRITE-CARD32 
; ==>
;   (XLIB::ASET-CARD32 (THE XLIB:CARD32 XLIB::.VALUE.)
;                      XLIB::BUFFER-BBUF
;                      (XLIB::INDEX+ XLIB::BUFFER-BOFFSET 4))
; 
; note: doing unsigned word to integer coercion (cost 20)

; compiling (DEFUN GEN-LISTS ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFUN GEN-LISTS
;     (XLIB::WITH-BUFFER-REQUEST-AND-REPLY
;    (XLIB:DISPLAY (XLIB:EXTENSION-OPCODE XLIB:DISPLAY "GLX") NIL)
;    ((XLIB::DATA GL::+GEN-LISTS+) (XLIB:CARD32 (GLX::CONTEXT-TAG GL::CTX))
;     (INTEGER GL::RANGE))
;    (XLIB::CARD32-GET 8))
; --> LET UNWIND-PROTECT FLET BLOCK MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> BLOCK SB-C::%WITHIN-CLEANUP RETURN-FROM PROGN XLIB::WITH-BUFFER MACROLET 
; --> LET XLIB::HOLDING-LOCK SB-THREAD:WITH-RECURSIVE-LOCK LOCALLY 
; --> XLIB::WITHOUT-ABORTS PROGN XLIB::WITH-BUFFER-REQUEST-INTERNAL 
; --> XLIB::WITH-BUFFER-OUTPUT LET LET* XLIB::CHECK-PUT LET XLIB::CARD32-PUT 
; --> XLIB::WRITE-CARD32 
; ==>
;   (XLIB::ASET-CARD32 (THE XLIB:CARD32 XLIB::.VALUE.)
;                      XLIB::BUFFER-BBUF
;                      (XLIB::INDEX+ XLIB::BUFFER-BOFFSET 4))
; 
; note: doing unsigned word to integer coercion (cost 20)

; compiling (DEFUN END-LIST ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFUN END-LIST
;     (XLIB::WITH-BUFFER-REQUEST
;    (XLIB:DISPLAY (XLIB:EXTENSION-OPCODE XLIB:DISPLAY "GLX"))
;    (XLIB::DATA GL::+END-LIST+)
;    (XLIB:CARD32 (GLX::CONTEXT-TAG GL::CTX)))
; --> LET XLIB::WITH-BUFFER MACROLET LET XLIB::HOLDING-LOCK 
; --> SB-THREAD:WITH-RECURSIVE-LOCK LOCALLY MULTIPLE-VALUE-PROG1 
; --> XLIB::WITHOUT-ABORTS PROGN XLIB::WITH-BUFFER-REQUEST-INTERNAL 
; --> XLIB::WITH-BUFFER-OUTPUT LET LET* XLIB::CHECK-PUT LET XLIB::CARD32-PUT 
; --> XLIB::WRITE-CARD32 
; ==>
;   (XLIB::ASET-CARD32 (THE XLIB:CARD32 XLIB::.VALUE.)
;                      XLIB::BUFFER-BBUF
;                      (XLIB::INDEX+ XLIB::BUFFER-BOFFSET 4))
; 
; note: doing unsigned word to integer coercion (cost 20)

; compiling (DEFUN ENABLE ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFUN ENABLE
;     (XLIB::WITH-BUFFER-REQUEST-AND-REPLY
;    (XLIB:DISPLAY (XLIB:EXTENSION-OPCODE XLIB:DISPLAY "GLX") NIL)
;    ((XLIB::DATA GL::+ENABLE+) (XLIB:CARD32 (GLX::CONTEXT-TAG GL::CTX))
;     (XLIB:CARD32 GL::CAP)))
; --> LET UNWIND-PROTECT FLET BLOCK MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> BLOCK SB-C::%WITHIN-CLEANUP RETURN-FROM PROGN XLIB::WITH-BUFFER MACROLET 
; --> LET XLIB::HOLDING-LOCK SB-THREAD:WITH-RECURSIVE-LOCK LOCALLY 
; --> XLIB::WITHOUT-ABORTS PROGN XLIB::WITH-BUFFER-REQUEST-INTERNAL 
; --> XLIB::WITH-BUFFER-OUTPUT LET LET* XLIB::CHECK-PUT LET XLIB::CARD32-PUT 
; --> XLIB::WRITE-CARD32 
; ==>
;   (XLIB::ASET-CARD32 (THE XLIB:CARD32 XLIB::.VALUE.)
;                      XLIB::BUFFER-BBUF
;                      (XLIB::INDEX+ XLIB::BUFFER-BOFFSET 4))
; 
; note: doing unsigned word to integer coercion (cost 20)

; compiling (DEFUN FLUSH ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFUN FLUSH
;     (XLIB::WITH-BUFFER-REQUEST
;    (XLIB:DISPLAY (XLIB:EXTENSION-OPCODE XLIB:DISPLAY "GLX"))
;    (XLIB::DATA GL::+FLUSH+)
;    (XLIB:CARD32 (GLX::CONTEXT-TAG GL::CTX)))
; --> LET XLIB::WITH-BUFFER MACROLET LET XLIB::HOLDING-LOCK 
; --> SB-THREAD:WITH-RECURSIVE-LOCK LOCALLY MULTIPLE-VALUE-PROG1 
; --> XLIB::WITHOUT-ABORTS PROGN XLIB::WITH-BUFFER-REQUEST-INTERNAL 
; --> XLIB::WITH-BUFFER-OUTPUT LET LET* XLIB::CHECK-PUT LET XLIB::CARD32-PUT 
; --> XLIB::WRITE-CARD32 
; ==>
;   (XLIB::ASET-CARD32 (THE XLIB:CARD32 XLIB::.VALUE.)
;                      XLIB::BUFFER-BBUF
;                      (XLIB::INDEX+ XLIB::BUFFER-BOFFSET 4))
; 
; note: doing unsigned word to integer coercion (cost 20)

; compiling (DEFUN FINISH ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.lisp
; in: DEFUN FINISH
;     (XLIB::WITH-BUFFER-REQUEST-AND-REPLY
;    (XLIB:DISPLAY (XLIB:EXTENSION-OPCODE XLIB:DISPLAY "GLX") NIL)
;    ((XLIB::DATA GL::+FINISH+) (XLIB:CARD32 (GLX::CONTEXT-TAG GL::CTX))))
; --> LET UNWIND-PROTECT FLET BLOCK MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> BLOCK SB-C::%WITHIN-CLEANUP RETURN-FROM PROGN XLIB::WITH-BUFFER MACROLET 
; --> LET XLIB::HOLDING-LOCK SB-THREAD:WITH-RECURSIVE-LOCK LOCALLY 
; --> XLIB::WITHOUT-ABORTS PROGN XLIB::WITH-BUFFER-REQUEST-INTERNAL 
; --> XLIB::WITH-BUFFER-OUTPUT LET LET* XLIB::CHECK-PUT LET XLIB::CARD32-PUT 
; --> XLIB::WRITE-CARD32 
; ==>
;   (XLIB::ASET-CARD32 (THE XLIB:CARD32 XLIB::.VALUE.)
;                      XLIB::BUFFER-BBUF
;                      (XLIB::INDEX+ XLIB::BUFFER-BOFFSET 4))
; 
; note: doing unsigned word to integer coercion (cost 20)

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/gl.fasl written
; compilation finished in 0:00:19
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/dpms.lisp" (written 10 JAN 2006 05:30:09 PM):
; compiling (DEFPACKAGE :DPMS ...)
; compiling (IN-PACKAGE :DPMS)
; compiling (DEFINE-EXTENSION "DPMS")
; compiling (DEFMACRO DPMS-OPCODE ...)
; compiling (DEFCONSTANT +GET-VERSION+ ...)
; compiling (DEFCONSTANT +CAPABLE+ ...)
; compiling (DEFCONSTANT +GET-TIMEOUTS+ ...)
; compiling (DEFCONSTANT +SET-TIMEOUTS+ ...)
; compiling (DEFCONSTANT +ENABLE+ ...)
; compiling (DEFCONSTANT +DISABLE+ ...)
; compiling (DEFCONSTANT +FORCE-LEVEL+ ...)
; compiling (DEFCONSTANT +INFO+ ...)
; compiling (DEFUN DPMS-GET-VERSION ...)
; compiling (DEFUN DPMS-CAPABLE ...)
; compiling (DEFUN DPMS-GET-TIMEOUTS ...)
; compiling (DEFUN DPMS-SET-TIMEOUTS ...)
; compiling (DEFUN DPMS-ENABLE ...)
; compiling (DEFUN DPMS-DISABLE ...)
; compiling (DEFUN DPMS-FORCE-LEVEL ...)
; compiling (DEFUN DPMS-INFO ...)

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/dpms.fasl written
; compilation finished in 0:00:01
STYLE-WARNING: redefining BYTE-WIDTH in DEFUN
STYLE-WARNING: redefining SETTER in DEFUN
STYLE-WARNING: redefining SEQUENCE-SETTER in DEFUN
STYLE-WARNING: redefining SSET-INT8 in DEFUN
STYLE-WARNING: redefining SSET-INT16 in DEFUN
STYLE-WARNING: redefining SSET-INT32 in DEFUN
STYLE-WARNING: redefining SSET-BOOL in DEFUN
STYLE-WARNING: redefining SSET-CARD8 in DEFUN
STYLE-WARNING: redefining SSET-CARD16 in DEFUN
STYLE-WARNING: redefining SSET-CARD32 in DEFUN
STYLE-WARNING: redefining SSET-FLOAT32 in DEFUN
STYLE-WARNING: redefining SSET-FLOAT64 in DEFUN
STYLE-WARNING: redefining MAKE-ARGSPECS in DEFUN
STYLE-WARNING: redefining BYTE-WIDTH-CALCULATION in DEFUN
STYLE-WARNING: redefining COMPOSITE-ARGS in DEFUN
STYLE-WARNING: redefining MAKE-SETTER-FORMS in DEFUN
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/demo/bezier.lisp" (written 14 JUL 2005 09:24:43 AM):
; compiling (IN-PACKAGE :XLIB)
; compiling (EXPORT (QUOTE DRAW-CURVES))
; compiling (DEFINE-EXTENSION "bezier")
; compiling (DEFUN DRAW-CURVES ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/demo/bezier.lisp
; in: DEFUN DRAW-CURVES
;     (XLIB::WITH-BUFFER-REQUEST
;    (XLIB:DISPLAY XLIB::OPCODE :GC-FORCE XLIB:GCONTEXT)
;    ((XLIB::DATA XLIB:CARD8) 1)
;    (XLIB:DRAWABLE XLIB:DRAWABLE)
;    (XLIB:GCONTEXT XLIB:GCONTEXT)
;    ((SEQUENCE :FORMAT XLIB:INT16) XLIB::POINTS))
; --> LET XLIB::WITH-BUFFER MACROLET LET XLIB::HOLDING-LOCK 
; --> SB-THREAD:WITH-RECURSIVE-LOCK LOCALLY MULTIPLE-VALUE-PROG1 
; --> XLIB::WITHOUT-ABORTS PROGN XLIB::WITH-BUFFER-REQUEST-INTERNAL 
; --> XLIB::WITH-BUFFER-OUTPUT LET LET* XLIB::CHECK-PUT XLIB::SEQUENCE-PUT LET 
; ==>
;   (LENGTH XLIB::POINTS)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a VECTOR.

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/demo/bezier.fasl written
; compilation finished in 0:00:00
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/demo/beziertest.lisp" (written 14 JUL 2005 09:24:45 AM):
; compiling (IN-PACKAGE :XLIB)
; compiling (DEFUN BEZIER-TEST ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/demo/beziertest.lisp
; in: DEFUN BEZIER-TEST
;     (ZEROP COUNT)
; ==>
;   (= COUNT 0)
; 
; note: unable to
;   open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
;   The first argument is a NUMBER, not a FLOAT.
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; 
; note: unable to open code because: The operands might not be the same type.

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/demo/beziertest.fasl written
; compilation finished in 0:00:01
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/demo/clclock.lisp" (written 14 JUL 2005 09:24:45 AM):
; compiling (DEFPACKAGE "XCLCLOCK" ...)
; compiling (IN-PACKAGE "XCLCLOCK")
; compiling (DEFVAR *DISPLAY* ...)
; compiling (DEFVAR *SCREEN* ...)
; compiling (DEFVAR *COLORMAP* ...)
; compiling (DEFVAR *FONT* ...)
; compiling (DEFVAR *WIN*)
; compiling (MULTIPLE-VALUE-BIND (WIDTH ASCENT) ...)
; compiling (DEFVAR *GCONTEXT* ...)
; compiling (DEFVAR *BACKGROUND* ...)
; compiling (DEFVAR *PALETTE* ...)
; compiling (DEFVAR *BLACK* ...)
; compiling (DEFUN ROMANIZE ...)
; compiling (DEFUN CLOCK-STRING ...)
; compiling (DEFUN UPDATE-CLOCKFACE ...)
; compiling (DEFUN CLOCK ...)

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/demo/clclock.fasl written
; compilation finished in 0:00:00
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/demo/clipboard.lisp" (written 14 JUL 2005 09:24:45 AM):
; compiling (DEFPACKAGE "CLIPBOARD" ...)
; compiling (IN-PACKAGE "CLIPBOARD")
; compiling (DEFVAR *WINDOW*)
; compiling (DEFVAR *TIME*)
; compiling (DEFVAR *DISPLAY*)
; compiling (DEFUN OWNSELECT ...)
; compiling (DEFUN DESELECT ...)
; compiling (DEFUN ASK-PASTE ...)
; compiling (DEFUN RECV-PASTE ...)
; compiling (DEFUN SEND-COPY ...)
; compiling (DEFUN MAIN ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/demo/clipboard.lisp
; in: DEFUN MAIN
;     (XLIB:EVENT-CASE (CLIPBOARD::*DISPLAY*)
;                    (:BUTTON-PRESS (CLIPBOARD::CODE TIME)
;                                   (FORMAT T "~&ButtonPress~%")
;                                   (FINISH-OUTPUT)
;                                   (CASE CLIPBOARD::CODE
;                                     (1
;                                      (SETF CLIPBOARD::*TIME* TIME)
;                                      (CLIPBOARD::OWNSELECT))
;                                     (2 (CLIPBOARD::ASK-PASTE))
;                                     (3 (CLIPBOARD::DESELECT))))
;                    (:CLIENT-MESSAGE NIL
;                                     (FORMAT T "~&ClientMessage~%")
;                                     (FINISH-OUTPUT))
;                    (:SELECTION-CLEAR (CLIPBOARD::SELECTION)
;                                      (FORMAT T
;                                              "~&SelectionClear ~S~%"
;                                              CLIPBOARD::SELECTION)
;                                      (FINISH-OUTPUT))
;                    (:SELECTION-NOTIFY
;                     (CLIPBOARD::SELECTION CLIPBOARD::TARGET
;                                           CLIPBOARD::PROPERTY)
;                     (FORMAT T
;                             "~&SelectionNotify ~S ~S ~S~%"
;                             CLIPBOARD::SELECTION
;                             CLIPBOARD::TARGET
;                             CLIPBOARD::PROPERTY)
;                     (FINISH-OUTPUT)
;                     (UNLESS (EQ CLIPBOARD::PROPERTY NIL)
;                       (CLIPBOARD::RECV-PASTE CLIPBOARD::PROPERTY))
;                     (XLIB:DISPLAY-FINISH-OUTPUT CLIPBOARD::*DISPLAY*))
;                    (:SELECTION-REQUEST
;                     (CLIPBOARD::SELECTION CLIPBOARD::TARGET
;                                           CLIPBOARD::PROPERTY
;                                           CLIPBOARD::REQUESTOR
;                                           TIME)
;                     (FORMAT T
;                             "~&SelectionRequest ~S ~S ~S~%"
;                             CLIPBOARD::SELECTION
;                             CLIPBOARD::TARGET
;                             CLIPBOARD::PROPERTY)
;                     (FINISH-OUTPUT)
;                     (CLIPBOARD::SEND-COPY CLIPBOARD::SELECTION
;                                           CLIPBOARD::TARGET
;                                           CLIPBOARD::PROPERTY
;                                           CLIPBOARD::REQUESTOR
;                                           TIME)
;                     (XLIB:DISPLAY-FINISH-OUTPUT CLIPBOARD::*DISPLAY*))
;                    (:PROPERTY-NOTIFY (ATOM CLIPBOARD::STATE)
;                                      (FORMAT T
;                                              "~&PropertyNotify ~S ~S~%"
;                                              ATOM
;                                              CLIPBOARD::STATE)
;                                      (FINISH-OUTPUT)))
; --> XLIB:EVENT-COND LET XLIB::EVENT-LOOP LET XLIB:WITH-EVENT-QUEUE MACROLET 
; --> LET XLIB::HOLDING-LOCK SB-THREAD:WITH-RECURSIVE-LOCK LOCALLY 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION PROGV LET UNWIND-PROTECT 
; --> FLET BLOCK MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL BLOCK 
; --> SB-C::%WITHIN-CLEANUP RETURN-FROM PROGN LOOP BLOCK TAGBODY PROGN 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION LET UNWIND-PROTECT FLET 
; --> BLOCK MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL BLOCK SB-C::%WITHIN-CLEANUP 
; --> RETURN-FROM PROGN LET XLIB::EVENT-DISPATCH XLIB::READING-EVENT 
; --> XLIB::WITH-BUFFER-INPUT LET LET* LET CASE LET COND IF PROGN 
; --> XLIB::BINDING-EVENT-VALUES LET LET LET MACROLET IF ZEROP 
; ==>
;   (= #:G2207 0)
; 
; note: unable to
;   open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
;   The first argument is a NUMBER, not a FLOAT.
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; 
; note: unable to open code because: The operands might not be the same type.

; --> XLIB:EVENT-COND LET XLIB::EVENT-LOOP LET XLIB:WITH-EVENT-QUEUE MACROLET 
; --> LET XLIB::HOLDING-LOCK SB-THREAD:WITH-RECURSIVE-LOCK LOCALLY 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION PROGV LET UNWIND-PROTECT 
; --> FLET BLOCK MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL BLOCK 
; --> SB-C::%WITHIN-CLEANUP RETURN-FROM PROGN LOOP BLOCK TAGBODY PROGN 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION LET UNWIND-PROTECT FLET 
; --> BLOCK MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL BLOCK SB-C::%WITHIN-CLEANUP 
; --> RETURN-FROM PROGN LET XLIB::EVENT-DISPATCH XLIB::READING-EVENT 
; --> XLIB::WITH-BUFFER-INPUT LET LET* LET CASE LET COND IF COND IF COND IF 
; --> COND IF PROGN XLIB::BINDING-EVENT-VALUES LET LET LET MACROLET IF ZEROP 
; ==>
;   (= #:G6123 0)
; 
; note: unable to
;   open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
;   The first argument is a NUMBER, not a FLOAT.
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; 
; note: unable to open code because: The operands might not be the same type.

; --> XLIB:EVENT-COND LET XLIB::EVENT-LOOP LET XLIB:WITH-EVENT-QUEUE MACROLET 
; --> LET XLIB::HOLDING-LOCK SB-THREAD:WITH-RECURSIVE-LOCK LOCALLY 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION PROGV LET UNWIND-PROTECT 
; --> FLET BLOCK MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL BLOCK 
; --> SB-C::%WITHIN-CLEANUP RETURN-FROM PROGN LOOP BLOCK TAGBODY PROGN 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION LET UNWIND-PROTECT FLET 
; --> BLOCK MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL BLOCK SB-C::%WITHIN-CLEANUP 
; --> RETURN-FROM PROGN LET XLIB::EVENT-DISPATCH XLIB::READING-EVENT 
; --> XLIB::WITH-BUFFER-INPUT LET LET* LET CASE LET COND IF COND IF COND IF 
; --> COND IF COND IF PROGN XLIB::BINDING-EVENT-VALUES LET LET LET MACROLET IF 
; --> ZEROP 
; ==>
;   (= #:G5980 0)
; 
; note: unable to
;   open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
;   The first argument is a NUMBER, not a FLOAT.
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; 
; note: unable to open code because: The operands might not be the same type.

; ==>
;   (= #:G5979 0)
; 
; note: unable to
;   open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
;   The first argument is a NUMBER, not a FLOAT.
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; 
; note: unable to open code because: The operands might not be the same type.

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/demo/clipboard.fasl written
; compilation finished in 0:00:01
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/demo/clx-demos.lisp" (written 27 MAR 2006 07:17:43 PM):
; compiling (DEFPACKAGE :DEMOS ...)
; compiling (IN-PACKAGE :DEMOS)
; compiling (DEFPARAMETER *DEMOS* ...)
; compiling (DEFVAR *DISPLAY* ...)
; compiling (DEFVAR *SCREEN* ...)
; compiling (DEFVAR *ROOT* ...)
; compiling (DEFVAR *BLACK-PIXEL* ...)
; compiling (DEFVAR *WHITE-PIXEL* ...)
; compiling (DEFVAR *WINDOW* ...)
; compiling (DEFMACRO DEFDEMO ...)
; compiling (DEFUN DO-ALL-DEMOS ...)
; compiling (DEFVAR *NAME-TO-FUNCTION* ...)
; compiling (DEFVAR *KEYWORD-PACKAGE* ...)
; compiling (DEFUN DEMO ...)
; compiling (DEFUN FULL-WINDOW-STATE ...)
; compiling (DEFUN GREYNETIC ...)
; compiling (DEFVAR *GREYNETIC-PIXMAP-ARRAY* ...)
; compiling (DEFUN GREYNETIC-PIXMAPPER ...)
; compiling (DEFSTRUCT QIX ...)
; compiling (DEFUN CONSTRUCT-QIX ...)
; compiling (DEFUN MAKE-CIRCULAR-LIST ...)
; compiling (DEFUN QIX ...)
; compiling (DEFDEMO QIX-DEMO ...)
; compiling (DEFCONSTANT D360 ...)
; compiling (DEFCONSTANT D270 ...)
; compiling (DEFCONSTANT D180 ...)
; compiling (DEFCONSTANT D90 ...)
; compiling (DEFCONSTANT VECMAX ...)
; compiling (DEFPARAMETER SIN-ARRAY ...)
; compiling (DEFMACRO PSIN ...)
; compiling (DEFMACRO PCOS ...)
; compiling (DEFMACRO HIGH-16BITS-* ...)
; compiling (DEFUN COMPLETE ...)
; compiling (DEFPARAMETER CONTINUOUS ...)
; compiling (DEFPARAMETER STYINC ...)
; compiling (DEFPARAMETER PETINC ...)
; compiling (DEFPARAMETER SCALFAC-FAC ...)
; compiling (DEFUN PETAL ...)
; compiling (DEFDEMO PETAL-DEMO ...)
; compiling (DEFPARAMETER DISK-THICKNESS ...)
; compiling (DEFPARAMETER DISK-SPACING ...)
; compiling (DEFVAR *HORIZONTAL-VELOCITY* ...)
; compiling (DEFVAR *VERTICAL-VELOCITY* ...)
; compiling (DEFVAR *HANOI-WINDOW* ...)
; compiling (DEFVAR *HANOI-WINDOW-HEIGHT* ...)
; compiling (DEFVAR *TRANSFER-HEIGHT* ...)
; compiling (DEFVAR *HANOI-GCONTEXT* ...)
; compiling (DEFSTRUCT DISK ...)
; compiling (DEFSTRUCT NEEDLE ...)
; compiling (DEFUN NEEDLE-TOP-HEIGHT ...)
; compiling (DEFVAR AVAILABLE-DISKS ...)
; compiling (DEFVAR NEEDLE-1 ...)
; compiling (DEFVAR NEEDLE-2 ...)
; compiling (DEFVAR NEEDLE-3 ...)
; compiling (DEFMACRO INVERT-RECTANGLE ...)
; compiling (DEFMACRO UPDATE-SCREEN ...)
; compiling (DEFUN SLIDE-UP ...)
; compiling (DEFUN SLIDE-DOWN ...)
; compiling (DEFUN LIFT-DISK ...)
; compiling (DEFUN DROP-DISK ...)
; compiling (DEFUN DROP-INITIAL-DISK ...)
; compiling (DEFUN SLIDE-RIGHT ...)
; compiling (DEFUN SLIDE-LEFT ...)
; compiling (DEFUN TRANSFER-DISK ...)
; compiling (DEFUN MOVE-ONE-DISK ...)
; compiling (DEFUN MOVE-N-DISKS ...)
; compiling (DEFUN HANOI ...)
; compiling (DEFDEMO SLOW-HANOI-DEMO ...)
; compiling (DEFDEMO FAST-HANOI-DEMO ...)
; compiling (DEFUN BOUNCE-WINDOW ...)
; compiling (DEFDEMO SHOVE-BOUNCE-DEMO ...)
; compiling (DEFDEMO BOUNCE-DEMO ...)
; compiling (DEFUN RECURRENCE ...)
; compiling (DEFUN DRAW-PPICT ...)
; compiling (DEFDEMO RECURRENCE-DEMO ...)
; compiling (DEFMACRO RECT-X ...)
; compiling (DEFMACRO RECT-Y ...)
; compiling (DEFMACRO RECT-WIDTH ...)
; compiling (DEFMACRO RECT-HEIGHT ...)
; compiling (DEFUN PLAID ...)
; compiling (DEFDEMO PLAID-DEMO ...)
; compiling (DEFVAR *BALL-SIZE-X* ...)
; compiling (DEFVAR *BALL-SIZE-Y* ...)
; compiling (DEFMACRO XOR-BALL ...)
; compiling (DEFCONSTANT BBALL-GRAVITY ...)
; compiling (DEFCONSTANT MAXIMUM-X-DRIFT ...)
; compiling (DEFVAR *MAX-BBALL-X*)
; compiling (DEFVAR *MAX-BBALL-Y*)
; compiling (DEFSTRUCT BALL ...)
; compiling (DEFUN GET-BOUNCE-IMAGE ...)
; compiling (DEFUN BOUNCE-1-BALL ...)
; compiling (DEFUN BOUNCE-BALLS ...)

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/demo/clx-demos.fasl written
; compilation finished in 0:00:04
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/demo/gl-test.lisp" (written 14 JUL 2005 09:24:45 AM):
; compiling (DEFPACKAGE :GL-TEST ...)
; compiling (IN-PACKAGE :GL-TEST)
; compiling (DEFUN TEST ...)
; compiling (DEFUN NO-FLOATS ...)
; compiling (DEFUN ANIM ...)
; compiling (DEFUN ANIM/LIST ...)
; compiling (DEFCONSTANT +PI+ ...)
; compiling (DECLAIM (TYPE SINGLE-FLOAT ...))
; compiling (DEFUN GEAR ...)
; compiling (DEFUN DRAW ...)
; compiling (DEFUN RESHAPE ...)
; compiling (DEFUN INIT ...)
; compiling (DEFUN GEARS* ...)
; compiling (DEFUN GEARS ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/demo/gl-test.lisp
; in: DEFUN GEARS
;     (GL-TEST::RESHAPE GL-TEST::WIDTH GL-TEST::HEIGHT)
; 
; note: deleting unreachable code

;     (FORMAT T "Key pressed: ~S~%" GL-TEST::CODE)
; 
; note: deleting unreachable code
; 
; note: deleting unreachable code

;     (GL-TEST::RESHAPE GL-TEST::WIDTH GL-TEST::HEIGHT)
; 
; note: deleting unreachable code

;     (FORMAT T "Key pressed: ~S~%" GL-TEST::CODE)
; 
; note: deleting unreachable code
; 
; note: deleting unreachable code

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/demo/gl-test.fasl written
; compilation finished in 0:00:01
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/demo/mandel.lisp" (written 14 JUL 2005 09:24:45 AM):
; compiling (DEFPACKAGE "XMANDEL" ...)
; compiling (IN-PACKAGE "XMANDEL")
; compiling (DEFVAR *DISPLAY* ...)
; compiling (DEFVAR *SCREEN* ...)
; compiling (DEFVAR *BACKING-STORE* ...)
; compiling (DEFVAR *COLMAP* ...)
; compiling (DEFVAR *HELPWIN* ...)
; compiling (DEFVAR *ZOOM-TABLE* ...)
; compiling (DEFVAR *ZOOMCOLMAP* ...)
; compiling (DEFVAR *WHITE* ...)
; compiling (DEFVAR *WINMAP* ...)
; compiling (DEFVAR *TEXTMAP* ...)
; compiling (DEFVAR *MODSTATE* ...)
; compiling (DECLAIM (LIST *MODSTATE*))
; compiling (DEFUN MAKE-SHIFT-FOO ...)
; compiling (DEFSTRUCT (MANDEL-SQUARE #) ...)
; compiling (DEFUN MAKE-QUEUE ...)
; compiling (DEFCLASS QUEUE ...)
; compiling (DEFCLASS OUT-QUEUE ...)
; compiling (DEFVAR *SYSQUEUE* ...)
; compiling (DEFGENERIC EMPTY-P ...)
; compiling (DEFGENERIC EMPTY ...)
; compiling (DEFGENERIC EMPTY-WIN ...)
; compiling (DEFGENERIC ENQUEUE ...)
; compiling (DEFGENERIC QUEUE-PUSH ...)
; compiling (DEFGENERIC DEQUEUE ...)
; compiling (DEFMETHOD EMPTY-P ...)
; compiling (DEFMETHOD EMPTY-P ...)
; compiling (DEFMETHOD EMPTY-P ...)
; compiling (DEFMETHOD EMPTY ...)
; compiling (DEFMETHOD EMPTY ...)
; compiling (DEFMETHOD EMPTY ...)
; compiling (DEFMETHOD EMPTY-WIN ...)
; compiling (DEFMETHOD ENQUEUE ...)
; compiling (DEFMETHOD ENQUEUE ...)
; compiling (DEFMETHOD QUEUE-PUSH ...)
; compiling (DEFMETHOD QUEUE-PUSH ...)
; compiling (DEFMETHOD DEQUEUE ...)
; compiling (DEFMETHOD DEQUEUE ...)
; compiling (DEFUN ITER ...)
; compiling (DEFCLASS ZOOMER ...)
; compiling (DEFUN INIT-COLOURS ...)
; compiling (DEFMACRO MODCOL ...)
; compiling (DEFUN PLOT ...)
; compiling (DEFUN DISPLAY-HELP ...)
; compiling (DEFUN REPAINT-WINDOW ...)
; compiling (DEFUN FILL-SQUARE ...)
; compiling (DEFUN MAKE-SQUARE ...)
; compiling (DEFUN MANDEL-WIN ...)
; compiling (DEFUN NEW-WINDOW ...)
; compiling (DEFUN FILL-SQUARE-P ...)
; compiling (DEFMACRO Z ...)
; compiling (DEFUN DRAW-SQUARE ...)
; compiling (DEFUN CREATE-ZOOM ...)
; compiling (DEFUN UPDATE-ZOOM ...)
; compiling (DEFUN FINISH-ZOOM ...)
; compiling (DEFUN DO-ZOOM ...)
; compiling (DEFUN QUIT-WINDOW ...)
; compiling (DEFUN EVENT-LOOP ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/demo/mandel.lisp
; in: DEFUN EVENT-LOOP
;     (XMANDEL::CREATE-ZOOM XMANDEL::WINDOW XMANDEL::X XMANDEL::Y XMANDEL::CODE)
; 
; note: deleting unreachable code

;     (XMANDEL::FINISH-ZOOM XMANDEL::WINDOW XMANDEL::X XMANDEL::Y XMANDEL::CODE)
; ==>
;   XMANDEL::WINDOW
; 
; note: deleting unreachable code

;     (XMANDEL::UPDATE-ZOOM XMANDEL::WINDOW XMANDEL::X XMANDEL::Y XMANDEL::CODE)
; ==>
;   XMANDEL::X
; 
; note: deleting unreachable code

;     (XMANDEL::REPAINT-WINDOW XMANDEL::WINDOW
;                            XMANDEL::X
;                            XMANDEL::Y
;                            (1- (+ XMANDEL::X XMANDEL::WIDTH))
;                            (1- (+ XMANDEL::Y XMANDEL::HEIGHT)))
; ==>
;   XMANDEL::X
; 
; note: deleting unreachable code

;     (XMANDEL::QUIT-WINDOW XMANDEL::WINDOW)
; 
; note: deleting unreachable code

;     (XLIB:KEYSYM->CHARACTER XMANDEL::*DISPLAY*
;                           (XLIB:KEYCODE->KEYSYM XMANDEL::*DISPLAY*
;                                                 XMANDEL::CODE
;                                                 (XMANDEL::MAKE-SHIFT-FOO)))
; ==>
;   XMANDEL::*DISPLAY*
; 
; note: deleting unreachable code

;     (XLIB:KEYSYM->CHARACTER XMANDEL::*DISPLAY*
;                           (XLIB:KEYCODE->KEYSYM XMANDEL::*DISPLAY*
;                                                 XMANDEL::CODE
;                                                 0))
; ==>
;   XMANDEL::*DISPLAY*
; 
; note: deleting unreachable code

;     (DELETE :SHIFT XMANDEL::*MODSTATE*)
; ==>
;   XMANDEL::*MODSTATE*
; 
; note: deleting unreachable code
; 
; note: deleting unreachable code
; 
; note: deleting unreachable code

;     (DELETE :CTRL XMANDEL::*MODSTATE*)
; ==>
;   XMANDEL::*MODSTATE*
; 
; note: deleting unreachable code
; 
; note: deleting unreachable code
; 
; note: deleting unreachable code

;     (DELETE :CHARACTER-SET-SWITCH XMANDEL::*MODSTATE*)
; ==>
;   XMANDEL::*MODSTATE*
; 
; note: deleting unreachable code
; 
; note: deleting unreachable code
; 
; note: deleting unreachable code

;     (PUSH :CHARACTER-SET-SWITCH XMANDEL::*MODSTATE*)
; --> LET* CONS 
; ==>
;   XMANDEL::*MODSTATE*
; 
; note: deleting unreachable code

;     (PUSH :CTRL XMANDEL::*MODSTATE*)
; --> LET* CONS 
; ==>
;   XMANDEL::*MODSTATE*
; 
; note: deleting unreachable code

;     (PUSH :SHIFT XMANDEL::*MODSTATE*)
; --> LET* CONS 
; ==>
;   XMANDEL::*MODSTATE*
; 
; note: deleting unreachable code

;     (XMANDEL::DISPLAY-HELP)
; 
; note: deleting unreachable code

;     (XMANDEL::CREATE-ZOOM XMANDEL::WINDOW XMANDEL::X XMANDEL::Y XMANDEL::CODE)
; 
; note: deleting unreachable code

;     (XMANDEL::FINISH-ZOOM XMANDEL::WINDOW XMANDEL::X XMANDEL::Y XMANDEL::CODE)
; ==>
;   XMANDEL::WINDOW
; 
; note: deleting unreachable code

;     (XMANDEL::UPDATE-ZOOM XMANDEL::WINDOW XMANDEL::X XMANDEL::Y XMANDEL::CODE)
; ==>
;   XMANDEL::X
; 
; note: deleting unreachable code

;     (XMANDEL::REPAINT-WINDOW XMANDEL::WINDOW
;                            XMANDEL::X
;                            XMANDEL::Y
;                            (1- (+ XMANDEL::X XMANDEL::WIDTH))
;                            (1- (+ XMANDEL::Y XMANDEL::HEIGHT)))
; ==>
;   XMANDEL::X
; 
; note: deleting unreachable code

;     (XMANDEL::QUIT-WINDOW XMANDEL::WINDOW)
; 
; note: deleting unreachable code

;     (XLIB:KEYSYM->CHARACTER XMANDEL::*DISPLAY*
;                           (XLIB:KEYCODE->KEYSYM XMANDEL::*DISPLAY*
;                                                 XMANDEL::CODE
;                                                 (XMANDEL::MAKE-SHIFT-FOO)))
; ==>
;   XMANDEL::*DISPLAY*
; 
; note: deleting unreachable code

;     (XLIB:KEYSYM->CHARACTER XMANDEL::*DISPLAY*
;                           (XLIB:KEYCODE->KEYSYM XMANDEL::*DISPLAY*
;                                                 XMANDEL::CODE
;                                                 0))
; ==>
;   XMANDEL::*DISPLAY*
; 
; note: deleting unreachable code

;     (XMANDEL::DISPLAY-HELP)
; 
; note: deleting unreachable code

;     (PUSH :SHIFT XMANDEL::*MODSTATE*)
; --> LET* CONS 
; ==>
;   XMANDEL::*MODSTATE*
; 
; note: deleting unreachable code

;     (PUSH :CTRL XMANDEL::*MODSTATE*)
; --> LET* CONS 
; ==>
;   XMANDEL::*MODSTATE*
; 
; note: deleting unreachable code

;     (PUSH :CHARACTER-SET-SWITCH XMANDEL::*MODSTATE*)
; --> LET* CONS 
; ==>
;   XMANDEL::*MODSTATE*
; 
; note: deleting unreachable code

;     (DELETE :CHARACTER-SET-SWITCH XMANDEL::*MODSTATE*)
; ==>
;   XMANDEL::*MODSTATE*
; 
; note: deleting unreachable code
; 
; note: deleting unreachable code
; 
; note: deleting unreachable code

;     (DELETE :CTRL XMANDEL::*MODSTATE*)
; ==>
;   XMANDEL::*MODSTATE*
; 
; note: deleting unreachable code
; 
; note: deleting unreachable code
; 
; note: deleting unreachable code

;     (DELETE :SHIFT XMANDEL::*MODSTATE*)
; ==>
;   XMANDEL::*MODSTATE*
; 
; note: deleting unreachable code
; 
; note: deleting unreachable code
; 
; note: deleting unreachable code

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/demo/mandel.fasl written
; compilation finished in 0:00:04
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/demo/menu.lisp" (written 14 JUL 2005 09:24:44 AM):
; compiling (IN-PACKAGE :XLIB)
; compiling (DEFSTRUCT (MENU) ...)
; compiling (DEFUN CREATE-MENU ...)
; compiling (DEFUN MENU-SET-ITEM-LIST ...)
; compiling (DEFPARAMETER *MENU-ITEM-MARGIN* ...)
; compiling (DEFUN MENU-RECOMPUTE-GEOMETRY ...)
; compiling (DEFUN MENU-REFRESH ...)
; compiling (DEFUN MENU-CHOOSE ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/demo/menu.lisp
; in: DEFUN MENU-CHOOSE
;     (ZEROP COUNT)
; ==>
;   (= COUNT 0)
; 
; note: unable to
;   open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
;   The first argument is a NUMBER, not a FLOAT.
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; 
; note: unable to open code because: The operands might not be the same type.

;     (ASSOC XLIB::EVENT-WINDOW XLIB::ITEMS)
; 
; note: unable to convert to EQ test because: Item might be a number.

;     (POSITION XLIB:WINDOW XLIB::ITEMS :KEY #'FIRST)
; --> NTH-VALUE MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; ==>
;   (SB-KERNEL:%FIND-POSITION SB-C::ITEM
;                             SEQUENCE
;                             SB-C::FROM-END
;                             SB-C::START
;                             SB-C::END
;                             (SB-KERNEL:EFFECTIVE-FIND-POSITION-KEY SB-C::KEY)
;                             (SB-KERNEL:EFFECTIVE-FIND-POSITION-TEST SB-C::TEST
;                                                                     SB-C::TEST-NOT))
; 
; note: unable to
;   expand inline
; due to type uncertainty:
;   The second argument is a SEQUENCE, not a LIST.
; 
; note: unable to
;   expand inline
; due to type uncertainty:
;   The second argument is a SEQUENCE, not a VECTOR.
; 
; note: unable to
;   expand inline
; due to type uncertainty:
;   The second argument is a SEQUENCE, not a LIST.
; 
; note: unable to
;   expand inline
; due to type uncertainty:
;   The second argument is a SEQUENCE, not a VECTOR.

; compiling (DEFUN MENU-HIGHLIGHT-ITEM ...)
; compiling (DEFUN MENU-UNHIGHLIGHT-ITEM ...)
; compiling (DEFUN MENU-PRESENT ...)
; compiling (DEFUN JUST-SAY-LISP ...)
; compiling (DEFUN POP-UP ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/demo/menu.lisp
; in: DEFUN POP-UP
;     (ZEROP COUNT)
; ==>
;   (= COUNT 0)
; 
; note: unable to
;   open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
;   The first argument is a NUMBER, not a FLOAT.
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; 
; note: unable to open code because: The operands might not be the same type.

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/demo/menu.fasl written
; compilation finished in 0:00:01
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/demo/zoid.lisp" (written 14 JUL 2005 09:24:43 AM):
; compiling (IN-PACKAGE :XLIB)
; compiling (EXPORT (QUOTE #))
; compiling (DEFINE-EXTENSION "ZoidExtension")
; compiling (DEFUN DRAW-FILLED-TRAPEZOIDS ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/demo/zoid.lisp
; in: DEFUN DRAW-FILLED-TRAPEZOIDS
;     (XLIB::WITH-BUFFER-REQUEST
;    (XLIB:DISPLAY XLIB::OPCODE :GC-FORCE XLIB:GCONTEXT)
;    ((XLIB::DATA XLIB:CARD8) 1)
;    (XLIB:DRAWABLE XLIB:DRAWABLE)
;    (XLIB:GCONTEXT XLIB:GCONTEXT)
;    ((SEQUENCE :FORMAT XLIB:INT16) XLIB::POINTS))
; --> LET XLIB::WITH-BUFFER MACROLET LET XLIB::HOLDING-LOCK 
; --> SB-THREAD:WITH-RECURSIVE-LOCK LOCALLY MULTIPLE-VALUE-PROG1 
; --> XLIB::WITHOUT-ABORTS PROGN XLIB::WITH-BUFFER-REQUEST-INTERNAL 
; --> XLIB::WITH-BUFFER-OUTPUT LET LET* XLIB::CHECK-PUT XLIB::SEQUENCE-PUT LET 
; ==>
;   (LENGTH XLIB::POINTS)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a SEQUENCE, not a VECTOR.

; compiling (DEFINE-GCONTEXT-ACCESSOR TRAPEZOID-ALIGNMENT ...)
; compiling (DEFUN SET-TRAPEZOID-ALIGNMENT ...)

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/demo/zoid.fasl written
; compilation finished in 0:00:00
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/test/image.lisp" (written 14 JUL 2005 09:24:45 AM):
; compiling (IN-PACKAGE :XLIB)
; compiling (EXPORT (QUOTE #))
; compiling (DEFVAR *IMAGE-TEST-HOST* ...)
; compiling (DEFVAR *IMAGE-TEST-NIMAGES* ...)
; compiling (DEFVAR *IMAGE-TEST-COPY* ...)
; compiling (DEFVAR *IMAGE-TEST-COPY-RANDOM-SUBIMAGE* ...)
; compiling (DEFVAR *IMAGE-TEST-PUT-RANDOM-SUBIMAGE* ...)
; compiling (DEFVAR *IMAGE-TEST-GET-IMAGE-RESULT-TYPE-CHOICES* ...)
; compiling (DEFVAR *IMAGE-TEST-GET-IMAGE-IMAGE-X-FORMAT-CHOICES* ...)
; compiling (DEFUN IMAGE-TEST ...)
; compiling (DEFUN IMAGE-TEST-CHOOSE ...)
; compiling (DEFUN IMAGE-TEST-GET-IMAGE ...)
; compiling (DEFUN IMAGE-TEST-SUBIMAGE-PARAMETERS ...)
; compiling (DEFUN IMAGE-TEST-COPY-IMAGE ...)
; compiling (DEFUN IMAGE-TEST-PUT-IMAGE ...)
; compiling (DEFUN IMAGE-INFO ...)

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/test/image.fasl written
; compilation finished in 0:00:01
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/test/trapezoid.lisp" (written 14 JUL 2005 09:24:45 AM):
; compiling (IN-PACKAGE :XLIB)
; compiling (DEFUN ZOID-TEST ...)

; file: /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/test/trapezoid.lisp
; in: DEFUN ZOID-TEST
;     (ZEROP COUNT)
; ==>
;   (= COUNT 0)
; 
; note: unable to
;   open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
;   The first argument is a NUMBER, not a FLOAT.
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; 
; note: unable to open code because: The operands might not be the same type.

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/clx_0.7.3/test/trapezoid.fasl written
; compilation finished in 0:00:01
; 
; compilation unit finished
;   printed 779 notes
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/mcclim-0.9.2/patch.lisp" (written 19 AUG 2005 05:34:41 PM):
; compiling (IN-PACKAGE :CL-USER)
; compiling (UNLESS (FIND-PACKAGE :CLIM-LISP-PATCH) ...)
; compiling (EXPORT (QUOTE #) ...)

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/mcclim-0.9.2/patch.fasl written
; compilation finished in 0:00:00
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/mcclim-0.9.2/Lisp-Dep/fix-sbcl.lisp" (written 22 SEP 2005 07:40:29 AM):
; compiling (UNLESS (FIND-PACKAGE #) ...)
; compiling (LOOP FOR ...)
; compiling (EXPORT (QUOTE #) ...)
; compiling (DEFMACRO CLIM-LISP-PATCH:DEFCONSTANT ...)
; compiling (DEFVAR CLIM-LISP-PATCH::*COMPILE-TIME-CLOS-NAMES* ...)
; compiling (DEFUN CLIM-LISP-PATCH::COMPILE-TIME-CLOS-CLASS-P ...)
; compiling (DEFMACRO CLIM-LISP-PATCH:DEFCLASS ...)

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/mcclim-0.9.2/Lisp-Dep/fix-sbcl.fasl written
; compilation finished in 0:00:01
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/mcclim-0.9.2/package.lisp" (written 15 MAR 2006 05:56:54 PM):
; compiling (IN-PACKAGE :COMMON-LISP-USER)
;; (DEFCLASS) is patched.
;; (DEFCONSTANT) is patched.
;; (INTERACTIVE-STREAM-P) is patched.
; compiling (DEFPACKAGE :CLIM-LISP ...)
; compiling (DEFPACKAGE :CLIM ...)
; compiling (DEFPACKAGE :CLIM-SYS ...)
; compiling (DEFPACKAGE :CLIM-EXTENSIONS ...)
; compiling (DEFPACKAGE :CLIM-BACKEND ...)
; compiling (DEFPACKAGE :CLIM-INTERNALS ...)
; compiling (DEFPACKAGE :CLIM-DEMO ...)
; compiling (DEFPACKAGE :CLIM-USER ...)
; compiling (DEFPACKAGE :GOATEE ...)
; compiling (DEFPACKAGE :CLIM-FFI ...)

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/mcclim-0.9.2/package.fasl written
; compilation finished in 0:00:00
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/mcclim-0.9.2/decls.lisp" (written 15 MAR 2006 10:38:39 AM):
; compiling (IN-PACKAGE :CLIM-INTERNALS)
; compiling (DEFMACRO DECLFUN ...)
; compiling (DEFVAR *APPLICATION-FRAME* ...)
; compiling (DEFGENERIC POINT-X ...)
; compiling (DEFGENERIC POINT-Y ...)
; compiling (DEFGENERIC RECTANGLE-EDGES* ...)
; compiling (DEFGENERIC RECTANGLE-MIN-POINT ...)
; compiling (DEFGENERIC RECTANGLE-MAX-POINT ...)
; compiling (DEFGENERIC RECTANGLE-MIN-X ...)
; compiling (DEFGENERIC RECTANGLE-MIN-Y ...)
; compiling (DEFGENERIC RECTANGLE-MAX-X ...)
; compiling (DEFGENERIC RECTANGLE-MAX-Y ...)
; compiling (DEFGENERIC RECTANGLE-WIDTH ...)
; compiling (DEFGENERIC RECTANGLE-HEIGHT ...)
; compiling (DEFGENERIC RECTANGLE-SIZE ...)
; compiling (DEFGENERIC COMPOSE-TRANSFORMATIONS ...)
; compiling (DEFGENERIC INVERT-TRANSFORMATION ...)
; compiling (DECLFUN COMPOSE-TRANSLATION-WITH-TRANSFORMATION ...)
; compiling (DECLFUN COMPOSE-SCALING-WITH-TRANSFORMATION ...)
; compiling (DECLFUN COMPOSE-ROTATION-WITH-TRANSFORMATION ...)
; compiling (DECLFUN COMPOSE-TRANSFORMATION-WITH-TRANSLATION ...)
; compiling (DECLFUN COMPOSE-TRANSFORMATION-WITH-SCALING ...)
; compiling (DECLFUN COMPOSE-TRANSFORMATION-WITH-ROTATION ...)
; compiling (DEFGENERIC TRANSFORM-REGION ...)
; compiling (DEFGENERIC UNTRANSFORM-REGION ...)
; compiling (DEFGENERIC TRANSFORM-POSITION ...)
; compiling (DEFGENERIC UNTRANSFORM-POSITION ...)
; compiling (DEFGENERIC TRANSFORM-DISTANCE ...)
; compiling (DEFGENERIC UNTRANSFORM-DISTANCE ...)
; compiling (DEFGENERIC TRANSFORM-RECTANGLE* ...)
; compiling (DEFGENERIC UNTRANSFORM-RECTANGLE* ...)
; compiling (DEFGENERIC SHEET-TRANSFORMATION ...)
; compiling (DEFGENERIC (SETF SHEET-TRANSFORMATION) ...)
; compiling (DEFGENERIC SHEET-REGION ...)
; compiling (DEFGENERIC (SETF SHEET-REGION) ...)
; compiling (DEFGENERIC MOVE-SHEET ...)
; compiling (DEFGENERIC RESIZE-SHEET ...)
; compiling (DEFGENERIC MOVE-AND-RESIZE-SHEET ...)
; compiling (DEFGENERIC MAP-SHEET-POSITION-TO-PARENT ...)
; compiling (DEFGENERIC MAP-SHEET-POSITION-TO-CHILD ...)
; compiling (DEFGENERIC MAP-SHEET-RECTANGLE*-TO-PARENT ...)
; compiling (DEFGENERIC MAP-SHEET-RECTANGLE*-TO-CHILD ...)
; compiling (DEFGENERIC MAP-OVER-SHEETS-CONTAINING-POSITION ...)
; compiling (DEFGENERIC MAP-OVER-SHEETS-OVERLAPPING-REGION ...)
; compiling (DEFGENERIC CHILD-CONTAINING-POSITION ...)
; compiling (DEFGENERIC CHILDREN-OVERLAPPING-REGION ...)
; compiling (DEFGENERIC CHILDREN-OVERLAPPING-RECTANGLE* ...)
; compiling (DEFGENERIC SHEET-DELTA-TRANSFORMATION ...)
; compiling (DEFGENERIC SHEET-ALLOCATED-REGION ...)
; compiling (DEFGENERIC PROCESS-NEXT-EVENT ...)
; compiling (DEFGENERIC EVENT-TIMESTAMP ...)
; compiling (DEFGENERIC SHEET-MEDIUM ...)
; compiling (DEFGENERIC MEDIUM-SHEET ...)
; compiling (DEFGENERIC MEDIUM-DRAWABLE ...)
; compiling (DEFGENERIC PORT ...)
; compiling (DEFGENERIC ALLOCATE-MEDIUM ...)
; compiling (DEFGENERIC DEALLOCATE-MEDIUM ...)
; compiling (DEFGENERIC MAKE-MEDIUM ...)
; compiling (DEFGENERIC ENGRAFT-MEDIUM ...)
; compiling (DEFGENERIC DEGRAFT-MEDIUM ...)
; compiling (DEFGENERIC QUEUE-REPAINT ...)
; compiling (DEFGENERIC HANDLE-REPAINT ...)
; compiling (DEFGENERIC REPAINT-SHEET ...)
; compiling (DEFGENERIC SHEET-GRAFTED-P ...)
; compiling (DECLFUN FIND-GRAFT ...)
; compiling (DEFGENERIC GRAFT ...)
; compiling (DECLFUN MAP-OVER-GRAFTS ...)
; compiling (DEFGENERIC GRAFT-ORIENTATION ...)
; compiling (DEFGENERIC GRAFT-UNITS ...)
; compiling (DEFGENERIC GRAFT-WIDTH ...)
; compiling (DEFGENERIC GRAFT-HEIGHT ...)
; compiling (DECLFUN GRAFT-PIXELS-PER-MILLIMETER ...)
; compiling (DECLFUN GRAFT-PIXELS-PER-INCH ...)
; compiling (DEFGENERIC SHEET-DIRECT-MIRROR ...)
; compiling (DEFGENERIC SHEET-MIRRORED-ANCESTOR ...)
; compiling (DEFGENERIC SHEET-MIRROR ...)
; compiling (DEFGENERIC REALIZE-MIRROR ...)
; compiling (DEFGENERIC DESTROY-MIRROR ...)
; compiling (DEFGENERIC RAISE-MIRROR ...)
; compiling (DEFGENERIC BURY-MIRROR ...)
; compiling (DEFGENERIC SHEET-NATIVE-TRANSFORMATION ...)
; compiling (DEFGENERIC SHEET-NATIVE-REGION ...)
; compiling (DEFGENERIC SHEET-DEVICE-TRANSFORMATION ...)
; compiling (DEFGENERIC SHEET-DEVICE-REGION ...)
; compiling (DEFGENERIC INVALIDATE-CACHED-TRANSFORMATIONS ...)
; compiling (DEFGENERIC INVALIDATE-CACHED-REGIONS ...)
; compiling (DEFGENERIC MEDIUM-DRAW-POINT* ...)
; compiling (DEFGENERIC MEDIUM-DRAW-POINTS* ...)
; compiling (DEFGENERIC MEDIUM-DRAW-LINE* ...)
; compiling (DEFGENERIC MEDIUM-DRAW-LINES* ...)
; compiling (DEFGENERIC MEDIUM-DRAW-POLYGON* ...)
; compiling (DEFGENERIC MEDIUM-DRAW-RECTANGLE* ...)
; compiling (DEFGENERIC MEDIUM-DRAW-ELLIPSE* ...)
; compiling (DEFGENERIC MEDIUM-DRAW-CIRCLE* ...)
; compiling (DEFGENERIC MEDIUM-DRAW-TEXT* ...)
; compiling (DEFGENERIC INVOKE-WITH-DRAWING-OPTIONS ...)
; compiling (DEFGENERIC INVOKE-WITH-IDENTITY-TRANSFORMATION ...)
; compiling (DEFGENERIC INVOKE-WITH-LOCAL-COORDINATES ...)
; compiling (DEFGENERIC INVOKE-WITH-FIRST-QUADRANT-COORDINATES ...)
; compiling (DEFGENERIC DRAW-DESIGN ...)
; compiling (DEFGENERIC CURSOR-SHEET ...)
; compiling (DEFGENERIC CURSOR-POSITION ...)
; compiling (DEFGENERIC CURSOR-ACTIVE ...)
; compiling (DEFGENERIC (SETF CURSOR-ACTIVE) ...)
; compiling (DEFGENERIC CURSOR-STATE ...)
; compiling (DEFGENERIC (SETF CURSOR-STATE) ...)
; compiling (DEFGENERIC CURSOR-FOCUS ...)
; compiling (DEFGENERIC CURSOR-VISIBILITY ...)
; compiling (DEFGENERIC (SETF CURSOR-VISIBILITY) ...)
; compiling (DEFGENERIC STREAM-TEXT-CURSOR ...)
; compiling (DEFGENERIC (SETF STREAM-TEXT-CURSOR) ...)
; compiling (DEFGENERIC STREAM-CURSOR-POSITION ...)
; compiling (DEFGENERIC STREAM-INCREMENT-CURSOR-POSITION ...)
; compiling (DEFGENERIC STREAM-CHARACTER-WIDTH ...)
; compiling (DEFGENERIC STREAM-STRING-WIDTH ...)
; compiling (DEFGENERIC STREAM-TEXT-MARGIN ...)
; compiling (DEFGENERIC (SETF STREAM-TEXT-MARGIN) ...)
; compiling (DEFGENERIC STREAM-LINE-HEIGHT ...)
; compiling (DEFGENERIC STREAM-VERTICAL-SPACING ...)
; compiling (DEFGENERIC STREAM-BASELINE ...)
; compiling (DEFGENERIC STREAM-END-OF-LINE-ACTION ...)
; compiling (DEFGENERIC (SETF STREAM-END-OF-LINE-ACTION) ...)
; compiling (DEFGENERIC STREAM-END-OF-PAGE-ACTION ...)
; compiling (DEFGENERIC (SETF STREAM-END-OF-PAGE-ACTION) ...)
; compiling (DEFGENERIC STREAM-TEXT-OUTPUT-RECORD ...)
; compiling (DEFGENERIC STREAM-CLOSE-TEXT-OUTPUT-RECORD ...)
; compiling (DEFGENERIC STREAM-ADD-CHARACTER-OUTPUT ...)
; compiling (DEFGENERIC STREAM-ADD-STRING-OUTPUT ...)
; compiling (DEFGENERIC INVOKE-WITH-OUTPUT-RECORDING-OPTIONS ...)
; compiling (DEFGENERIC INVOKE-WITH-NEW-OUTPUT-RECORD ...)
; compiling (DEFGENERIC INVOKE-WITH-OUTPUT-TO-OUTPUT-RECORD ...)
; compiling (DEFGENERIC MAKE-DESIGN-FROM-OUTPUT-RECORD ...)
; compiling (DEFGENERIC INVOKE-UPDATING-OUTPUT ...)
; compiling (DEFGENERIC PRESENTATION-REPLACE-INPUT ...)
; compiling (DEFGENERIC FRAME-FIND-INNERMOST-APPLICABLE-PRESENTATION ...)
; compiling (DEFGENERIC DEFAULT-FRAME-TOP-LEVEL ...)
; compiling (DEFGENERIC READ-FRAME-COMMAND ...)
; compiling (DEFGENERIC RUN-FRAME-TOP-LEVEL ...)
; compiling (DEFGENERIC COMMAND-ENABLED ...)
; compiling (DEFGENERIC (SETF COMMAND-NAME) ...)
; compiling (DEFGENERIC NOTE-COMMAND-ENABLED ...)
; compiling (DEFGENERIC NOTE-COMMAND-DISABLED ...)
; compiling (DEFGENERIC MAKE-PANE-1 ...)
; compiling (DEFGENERIC PANE-FRAME ...)
; compiling (DEFGENERIC PANE-NAME ...)
; compiling (DEFGENERIC PANE-FOREGROUND ...)
; compiling (DEFGENERIC PANE-BACKGROUND ...)
; compiling (DEFGENERIC PANE-TEXT-STYLE ...)
; compiling (DEFGENERIC PANE-VIEWPORT ...)
; compiling (DEFGENERIC PANE-VIEWPORT-REGION ...)
; compiling (DEFGENERIC PANE-SCROLLER ...)
; compiling (DEFGENERIC SCROLL-EXTENT ...)
; compiling (DEFGENERIC SPACE-REQUIREMENT-WIDTH ...)
; compiling (DEFGENERIC SPACE-REQUIREMENT-MIN-WIDTH ...)
; compiling (DEFGENERIC SPACE-REQUIREMENT-MAX-WIDTH ...)
; compiling (DEFGENERIC SPACE-REQUIREMENT-HEIGHT ...)
; compiling (DEFGENERIC SPACE-REQUIREMENT-MIN-HEIGHT ...)
; compiling (DEFGENERIC SPACE-REQUIREMENT-MAX-HEIGHT ...)
; compiling (DEFGENERIC SPACE-REQUIREMENT-COMPONENTS ...)
; compiling (DEFGENERIC COMPOSE-SPACE ...)
; compiling (DEFGENERIC ALLOCATE-SPACE ...)
; compiling (DEFGENERIC CHANGE-SPACE-REQUIREMENTS ...)
; compiling (DEFGENERIC NOTE-SPACE-REQUIREMENTS-CHANGED ...)
; compiling (DEFGENERIC WINDOW-CLEAR ...)
; compiling (DEFGENERIC WINDOW-REFRESH ...)
; compiling (DEFGENERIC WINDOW-VIEWPORT ...)
; compiling (DEFGENERIC WINDOW-ERASE-VIEWPORT ...)
; compiling (DEFGENERIC WINDOW-VIEWPORT-POSITION ...)
; compiling (DEFGENERIC GADGET-VALUE ...)
; compiling (DEFGENERIC (SETF GADGET-VALUE) ...)
; compiling (DEFGENERIC GADGET-MIN-VALUE ...)
; compiling (DEFGENERIC GADGET-MAX-VALUE ...)
; compiling (DEFGENERIC (SETF GADGET-MAX-VALUE) ...)
; compiling (DEFGENERIC (SETF GADGET-MIN-VALUE) ...)
; compiling (DEFGENERIC (SETF SCROLL-BAR-THUMB-SIZE) ...)
; compiling (DEFGENERIC GADGET-ORIENTATION ...)
; compiling (DEFGENERIC GADGET-CLIENT ...)
; compiling (DEFGENERIC MEDIUM-FOREGROUND ...)
; compiling (DEFGENERIC MEDIUM-BACKGROUND ...)
; compiling (DEFGENERIC MEDIUM-INK ...)
; compiling (DEFGENERIC MEDIUM-TRANSFORMATION ...)
; compiling (DEFGENERIC MEDIUM-CLIPPING-REGION ...)
; compiling (DEFGENERIC MEDIUM-LINE-STYLE ...)
; compiling (DEFGENERIC MEDIUM-TEXT-STYLE ...)
; compiling (DEFGENERIC MEDIUM-DEFAULT-TEXT-STYLE ...)
; compiling (DEFGENERIC TEXT-SIZE ...)
; compiling (DEFGENERIC TEXT-STYLE-MAPPING ...)
; compiling (DEFGENERIC (SETF MEDIUM-FOREGROUND) ...)
; compiling (DEFGENERIC (SETF MEDIUM-BACKGROUND) ...)
; compiling (DEFGENERIC (SETF MEDIUM-INK) ...)
; compiling (DEFGENERIC (SETF MEDIUM-TRANSFORMATION) ...)
; compiling (DEFGENERIC (SETF MEDIUM-CLIPPING-REGION) ...)
; compiling (DEFGENERIC (SETF MEDIUM-LINE-STYLE) ...)
; compiling (DEFGENERIC (SETF MEDIUM-TEXT-STYLE) ...)
; compiling (DEFGENERIC (SETF MEDIUM-DEFAULT-TEXT-STYLE) ...)
; compiling (DEFGENERIC (SETF TEXT-STYLE-MAPPING) ...)
; compiling (DEFGENERIC MEDIUM-MITER-LIMIT ...)
; compiling (DEFGENERIC LINE-STYLE-EFFECTIVE-THICKNESS ...)
; compiling (DEFGENERIC TEXT-STYLE-CHARACTER-WIDTH ...)
; compiling (DEFMETHOD TEXT-STYLE-CHARACTER-WIDTH ...)
; compiling (DECLFUN DRAW-RECTANGLE ...)
; compiling (DECLFUN DRAW-RECTANGLE* ...)
; compiling (DEFGENERIC MIRROR-TRANSFORMATION ...)
; compiling (DEFGENERIC PORT-SET-SHEET-REGION ...)
; compiling (DEFGENERIC PORT-SET-SHEET-TRANSFORMATION ...)
; compiling (DEFGENERIC PORT-TEXT-STYLE-MAPPINGS ...)
; compiling (DEFGENERIC PORT-LOOKUP-MIRROR ...)
; compiling (DEFGENERIC PORT-REGISTER-MIRROR ...)
; compiling (DEFGENERIC PORT-ALLOCATE-PIXMAP ...)
; compiling (DEFGENERIC PORT-DEALLOCATE-PIXMAP ...)
; compiling (DEFGENERIC PORT-MIRROR-WIDTH ...)
; compiling (DEFGENERIC PORT-MIRROR-HEIGHT ...)
; compiling (DEFGENERIC PORT-ENABLE-SHEET ...)
; compiling (DEFGENERIC PORT-DISABLE-SHEET ...)
; compiling (DEFGENERIC PORT-POINTER ...)
; compiling (DEFGENERIC POINTER-UPDATE-STATE ...)
; compiling (DEFGENERIC FRAME-EVENT-QUEUE ...)
; compiling (DEFGENERIC PRESENTATION-TRANSLATORS ...)
; compiling (DEFGENERIC STREAM-DEFAULT-VIEW ...)
; compiling (DEFGENERIC OUTPUT-RECORD-BASLINE ...)
; compiling (DEFGENERIC ENCAPSULATING-STREAM-STREAM ...)

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/mcclim-0.9.2/decls.fasl written
; compilation finished in 0:00:02
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/mcclim-0.9.2/protocol-classes.lisp" (written 10 MAR 2006 04:58:13 PM):
; compiling (IN-PACKAGE :CLIM-INTERNALS)
; compiling (DEFMACRO DEFINE-PROTOCOL-CLASS ...)
; compiling (DEFINE-PROTOCOL-CLASS BOUNDING-RECTANGLE ...)
; compiling (DEFINE-PROTOCOL-CLASS DESIGN ...)
; compiling (DEFINE-PROTOCOL-CLASS REGION ...)
; compiling (DEFINE-PROTOCOL-CLASS PATH ...)
; compiling (DEFINE-PROTOCOL-CLASS AREA ...)
; compiling (DEFINE-PROTOCOL-CLASS REGION-SET ...)
; compiling (DEFINE-PROTOCOL-CLASS POINT ...)
; compiling (DEFINE-PROTOCOL-CLASS POLYLINE ...)
; compiling (DEFINE-PROTOCOL-CLASS POLYGON ...)
; compiling (DEFINE-PROTOCOL-CLASS LINE ...)
; compiling (DEFINE-PROTOCOL-CLASS RECTANGLE ...)
; compiling (DEFINE-PROTOCOL-CLASS ELLIPSE ...)
; compiling (DEFINE-PROTOCOL-CLASS ELLIPTICAL-ARC ...)
; compiling (DEFINE-PROTOCOL-CLASS TRANSFORMATION ...)
; compiling (DEFINE-PROTOCOL-CLASS SHEET ...)
; compiling (DEFINE-PROTOCOL-CLASS EVENT ...)
; compiling (DEFINE-PROTOCOL-CLASS MEDIUM ...)
; compiling (DEFINE-PROTOCOL-CLASS PORT ...)
; compiling (DEFINE-PROTOCOL-CLASS LINE-STYLE ...)
; compiling (DEFINE-PROTOCOL-CLASS TEXT-STYLE ...)
; compiling (DEFINE-PROTOCOL-CLASS UNIFORM-DESIGN ...)
; compiling (DEFINE-PROTOCOL-CLASS COLOR ...)
; compiling (DEFINE-PROTOCOL-CLASS OPACITY ...)
; compiling (DEFINE-PROTOCOL-CLASS EXTENDED-OUTPUT-STREAM ...)
; compiling (DEFINE-PROTOCOL-CLASS CURSOR ...)
; compiling (DEFINE-PROTOCOL-CLASS OUTPUT-RECORD ...)
; compiling (DEFINE-PROTOCOL-CLASS DISPLAYED-OUTPUT-RECORD ...)
; compiling (DEFINE-PROTOCOL-CLASS GRAPHICS-DISPLAYED-OUTPUT-RECORD ...)
; compiling (DEFINE-PROTOCOL-CLASS TEXT-DISPLAYED-OUTPUT-RECORD ...)
; compiling (DEFINE-PROTOCOL-CLASS OUTPUT-RECORDING-STREAM ...)
; compiling (DEFINE-PROTOCOL-CLASS TABLE-OUTPUT-RECORD ...)
; compiling (DEFINE-PROTOCOL-CLASS ROW-OUTPUT-RECORD ...)
; compiling (DEFINE-PROTOCOL-CLASS COLUMN-OUTPUT-RECORD ...)
; compiling (DEFINE-PROTOCOL-CLASS CELL-OUTPUT-RECORD ...)
; compiling (DEFINE-PROTOCOL-CLASS ITEM-LIST-OUTPUT-RECORD ...)
; compiling (DEFINE-PROTOCOL-CLASS GRAPH-OUTPUT-RECORD ...)
; compiling (DEFINE-PROTOCOL-CLASS GRAPH-NODE-OUTPUT-RECORD ...)
; compiling (DEFINE-PROTOCOL-CLASS UPDATING-OUTPUT-RECORD ...)
; compiling (DEFINE-PROTOCOL-CLASS POINTER ...)
; compiling (DEFINE-PROTOCOL-CLASS PRESENTATION ...)
; compiling (DEFINE-PROTOCOL-CLASS VIEW ...)
; compiling (DEFINE-PROTOCOL-CLASS INPUT-EDITING-STREAM ...)
; compiling (DEFINE-PROTOCOL-CLASS COMMAND-TABLE ...)
; compiling (DEFINE-PROTOCOL-CLASS APPLICATION-FRAME ...)
; compiling (DEFINE-PROTOCOL-CLASS FRAME-MANAGER ...)
; compiling (DEFINE-PROTOCOL-CLASS GADGET ...)
; compiling (DEFINE-PROTOCOL-CLASS ENCAPSULATING-STREAM ...)

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/mcclim-0.9.2/protocol-classes.fasl written
; compilation finished in 0:00:15
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/mcclim-0.9.2/Lisp-Dep/mp-nil.lisp" (written 12 MAY 2004 08:46:49 AM):
; compiling (IN-PACKAGE :CLIM-INTERNALS)
; compiling (DEFCONSTANT *MULTIPROCESSING-P* ...)
; compiling (DEFUN MAKE-PROCESS ...)
; compiling (DEFUN DESTROY-PROCESS ...)
; compiling (DEFUN CURRENT-PROCESS ...)
; compiling (DEFUN ALL-PROCESSES ...)
; compiling (DEFUN PROCESSP ...)
; compiling (DEFUN PROCESS-NAME ...)
; compiling (DEFUN PROCESS-STATE ...)
; compiling (DEFUN PROCESS-WHOSTATE ...)
; compiling (DEFUN PROCESS-WAIT ...)
; compiling (DEFUN PROCESS-WAIT-WITH-TIMEOUT ...)
; compiling (DEFUN PROCESS-YIELD ...)
; compiling (DEFUN PROCESS-INTERRUPT ...)
; compiling (DEFUN DISABLE-PROCESS ...)
; compiling (DEFUN ENABLE-PROCESS ...)
; compiling (DEFUN RESTART-PROCESS ...)
; compiling (DEFMACRO WITHOUT-SCHEDULING ...)
; compiling (DEFMACRO ATOMIC-INCF ...)
; compiling (DEFMACRO ATOMIC-DECF ...)
; compiling (DEFUN MAKE-LOCK ...)
; compiling (DEFMACRO WITH-LOCK-HELD ...)
; compiling (DEFUN MAKE-RECURSIVE-LOCK ...)
; compiling (DEFMACRO WITH-RECURSIVE-LOCK-HELD ...)
; compiling (DEFUN MAKE-CONDITION-VARIABLE ...)
; compiling (DEFUN CONDITION-WAIT ...)
; compiling (DEFUN CONDITION-NOTIFY ...)

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/mcclim-0.9.2/Lisp-Dep/mp-nil.fasl written
; compilation finished in 0:00:01
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/mcclim-0.9.2/utils.lisp" (written 15 MAR 2006 05:56:54 PM):
; compiling (IN-PACKAGE :CLIM-INTERNALS)
; compiling (DEFUN GET-ENVIRONMENT-VARIABLE ...)
; compiling (DEFMACRO WITH-SYSTEM-REDEFINITION-ALLOWED ...)
; compiling (DEFUN LAST1 ...)
; compiling (DEFUN 2+ ...)
; compiling (DEFUN 2- ...)
; compiling (DEFUN CHECK-LETF-FORM ...)
; compiling (DEFUN VALUEIFY ...)
; compiling (DEFMACRO LETF ...)
; compiling (DEFMACRO LETF* ...)
; compiling (DEFUN MAP-REPEATED-SEQUENCE ...)
; compiling (DEFMACRO DO-SEQUENCE ...)
; compiling (DEFUN CLAMP ...)
; compiling (DEFUN CURRY ...)
; compiling (DEFINE-COMPILER-MACRO CURRY ...)
; compiling (DEFUN ALWAYS ...)
; compiling (DEFINE-COMPILER-MACRO ALWAYS ...)
; compiling (DEFINE-MODIFY-MACRO MAXF ...)
; compiling (DEFINE-MODIFY-MACRO MINF ...)
; compiling (DEFINE-MODIFY-MACRO NCONCF ...)
; compiling (DEFINE-MODIFY-MACRO ORF ...)
; compiling (DEFMACRO DO-COMMAND-TABLE-INHERITANCE ...)
; compiling (DEFMACRO WITH-GENSYMS ...)
; compiling (DEFUN PARSE-METHOD ...)
; compiling (DEFUN GET-BODY-DECLARATIONS ...)
; compiling (DEFUN DECODE-SPECIALIZER ...)
; compiling (DEFMACRO WITH-METHOD ...)
; compiling (DEFMACRO AIF ...)
; compiling (DEFMACRO AWHEN ...)
; compiling (DEFMACRO AAND ...)
; compiling (DECLAIM (INLINE MAYBE-FUNCALL ...))
; compiling (DEFUN MAYBE-FUNCALL ...)
; compiling (DEFUN MAYBE-APPLY ...)
; compiling (DEFUN REMOVE-KEYWORDS ...)
; compiling (DEFMACRO WITH-KEYWORDS-REMOVED ...)
; compiling (DEFUN SYMBOL-CONCAT ...)
; compiling (DEFUN STREAM-DESIGNATOR-SYMBOL ...)
; compiling (DEFUN DECLARE-IGNORABLE-FORM ...)
; compiling (DEFUN DECLARE-IGNORABLE-FORM* ...)
; compiling (DEFUN GEN-INVOKE-TRAMPOLINE ...)
; compiling (DEFUN PARSE-SPACE ...)
; compiling (DEFUN DELETE-1 ...)
; compiling (DEFUN PARSE-LAMBDA-LIST ...)
; compiling (DEFUN REBIND-ARGUMENTS ...)
; compiling (DEFUN MAKE-KEYWORD ...)
; compiling (DEFUN COMMAND-NAME-FROM-SYMBOL ...)
; compiling (DEFUN KEYWORD-ARG-NAME-FROM-SYMBOL ...)

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/mcclim-0.9.2/utils.fasl written
; compilation finished in 0:00:01
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/mcclim-0.9.2/design.lisp" (written 10 MAR 2006 04:58:12 PM):
; compiling (IN-PACKAGE :CLIM-INTERNALS)
; compiling (DEFGENERIC COLOR-RGB ...)
; compiling (DEFMETHOD PRINT-OBJECT ...)
; compiling (DEFCLASS STANDARD-COLOR ...)
; compiling (DEFMETHOD COLOR-RGB ...)
; compiling (DEFCLASS NAMED-COLOR ...)
; compiling (DEFMETHOD PRINT-OBJECT ...)
; compiling (DEFMETHOD MAKE-LOAD-FORM ...)
; compiling (DEFVAR *COLOR-HASH-TABLE* ...)
; compiling (DEFUN COMPUTE-COLOR-KEY ...)
; compiling (DEFUN MAKE-RGB-COLOR ...)
; compiling (DEFUN MAKE-GRAY-COLOR ...)
; compiling (DEFUN MAKE-NAMED-COLOR ...)
; compiling (DEFCONSTANT +IHS-RGB-C1+ ...)
; compiling (DEFCONSTANT +IHS-RGB-C2+ ...)
; compiling (DEFCONSTANT +IHS-RGB-C3+ ...)
; compiling (DEFUN IHS-TO-RGB ...)
; compiling (DEFUN RGB-TO-IHS ...)
; compiling (DEFGENERIC COLOR-IHS ...)
; compiling (DEFMETHOD COLOR-IHS ...)
; compiling (DEFUN MAKE-IHS-COLOR ...)
; compiling (DEFUN MAKE-CONTRASTING-INKS ...)
; compiling (DEFCLASS INDIRECT-INK ...)
; compiling (DEFVAR +FOREGROUND-INK+ ...)
; compiling (DEFVAR +BACKGROUND-INK+ ...)
; compiling (DEFMETHOD PRINT-OBJECT ...)
; compiling (DEFMETHOD PRINT-OBJECT ...)
; compiling (DEFMETHOD PRINT-OBJECT ...)
; compiling (DEFCLASS STANDARD-OPACITY ...)
; compiling (DEFVAR +TRANSPARENT-INK+ ...)
; compiling (DEFUN MAKE-OPACITY ...)
; compiling (DEFCLASS STANDARD-FLIPPING-INK ...)
; compiling (DEFVAR +FLIPPING-INK+ ...)
; compiling (DEFMETHOD PRINT-OBJECT ...)
; compiling (DEFMETHOD PRINT-OBJECT ...)
; compiling (DEFGENERIC MAKE-FLIPPING-INK ...)
; compiling (DEFMETHOD MAKE-FLIPPING-INK ...)
; compiling (DEFMETHOD MAKE-FLIPPING-INK ...)
; compiling (DEFMETHOD MAKE-FLIPPING-INK ...)
; compiling (DECLAIM (INLINE COLOR-BLEND-FUNCTION))
; compiling (DEFUN COLOR-BLEND-FUNCTION ...)
; compiling (DEFGENERIC COMPOSE-OVER ...)
; compiling (DEFGENERIC COMPOSE-IN ...)
; compiling (DEFGENERIC COMPOSE-OUT ...)
; compiling (DEFINE-PROTOCOL-CLASS PATTERN ...)
; compiling (DEFCLASS INDEXED-PATTERN ...)
; compiling (DEFUN MAKE-PATTERN ...)
; compiling (DEFGENERIC PATTERN-WIDTH ...)
; compiling (DEFMETHOD PATTERN-WIDTH ...)
; compiling (DEFGENERIC PATTERN-HEIGHT ...)
; compiling (DEFMETHOD PATTERN-HEIGHT ...)
; compiling (DEFCLASS STENCIL ...)
; compiling (DEFUN MAKE-STENCIL ...)
; compiling (DEFMETHOD PATTERN-WIDTH ...)
; compiling (DEFMETHOD PATTERN-HEIGHT ...)
; compiling (DEFCLASS TRANSFORMED-DESIGN ...)
; compiling (DEFMETHOD TRANSFORM-REGION ...)
; compiling (DEFCLASS RECTANGULAR-TILE ...)
; compiling (DEFUN MAKE-RECTANGULAR-TILE ...)
; compiling (DEFCLASS IN-COMPOSITUM ...)
; compiling (DEFMETHOD PRINT-OBJECT ...)
; compiling (DEFCLASS UNIFORM-COMPOSITUM ...)
; compiling (DEFCLASS OVER-COMPOSITUM ...)
; compiling (DEFMETHOD COMPOSE-IN ...)
; compiling (DEFMETHOD COMPOSE-OVER ...)
; compiling (DEFUN MAKE-UNIFORM-COMPOSITUM ...)
; compiling (DEFMETHOD COMPOSE-IN ...)
; compiling (DEFMETHOD COMPOSE-IN ...)
; compiling (DEFMETHOD COMPOSE-IN ...)
; compiling (DEFMETHOD COMPOSE-IN ...)
; compiling (DEFMETHOD COMPOSE-IN ...)
; compiling (DEFMETHOD COMPOSE-IN ...)
; compiling (DEFMETHOD COMPOSE-IN ...)
; compiling (DEFMETHOD COMPOSE-IN ...)
; compiling (DEFMETHOD COMPOSE-OVER ...)
; compiling (DEFMETHOD COMPOSE-OVER ...)
; compiling (DEFMETHOD COMPOSE-OVER ...)
; compiling (DEFMETHOD COMPOSE-OVER ...)
; compiling (DEFMETHOD COMPOSE-OVER ...)
; compiling (DEFMETHOD COMPOSE-OVER ...)
; compiling (DEFMETHOD COMPOSE-OVER ...)
; compiling (DEFGENERIC DESIGN-EQUALP ...)
; compiling (DEFMETHOD DESIGN-EQUALP ...)
; compiling (DEFMETHOD DESIGN-EQUALP ...)
; compiling (DEFMETHOD DESIGN-EQUALP ...)

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/mcclim-0.9.2/design.fasl written
; compilation finished in 0:00:06
STYLE-WARNING: redefining COLOR-RGB in DEFGENERIC
STYLE-WARNING: redefining PRINT-OBJECT (COLOR T) in DEFMETHOD
STYLE-WARNING: redefining COLOR-RGB (STANDARD-COLOR) in DEFMETHOD
STYLE-WARNING: redefining PRINT-OBJECT (NAMED-COLOR T) in DEFMETHOD
STYLE-WARNING: redefining MAKE-LOAD-FORM (NAMED-COLOR) in DEFMETHOD
STYLE-WARNING: redefining COMPUTE-COLOR-KEY in DEFUN
STYLE-WARNING: redefining MAKE-RGB-COLOR in DEFUN
STYLE-WARNING: redefining MAKE-GRAY-COLOR in DEFUN
STYLE-WARNING: redefining MAKE-NAMED-COLOR in DEFUN
; in: LAMBDA (#:G1345 #:G1346 #:G1347 #:G1348 #:G1353 #:G1354)
;     (EQL SB-PCL::.CASE-ARG. #:G1345)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a T, not a SINGLE-FLOAT.
;   The second argument is a T, not a SINGLE-FLOAT.
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a T, not a DOUBLE-FLOAT.
;   The second argument is a T, not a DOUBLE-FLOAT.
; 
; note: forced to do GENERIC-EQL (cost 10)
;       unable to do inline fixnum comparison (cost 4) because:
;       The first argument is a T, not a FIXNUM.
;       The second argument is a T, not a FIXNUM.
; in:
;      LAMBDA (#:G1359 #:G1360
;                  #:G1361
;                  #:G1362
;                  #:G1363
;                  #:G1364
;                  #:G1365
;                  #:G1370
;                  #:G1371)
;     (EQL SB-PCL::.CASE-ARG. #:G1359)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a T, not a SINGLE-FLOAT.
;   The second argument is a T, not a SINGLE-FLOAT.
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a T, not a DOUBLE-FLOAT.
;   The second argument is a T, not a DOUBLE-FLOAT.

;     (EQL SB-PCL::.CASE-ARG. #:G1362)
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a T, not a SINGLE-FLOAT.
;   The second argument is a T, not a SINGLE-FLOAT.
; 
; note: unable to
;   optimize
; due to type uncertainty:
;   The first argument is a T, not a DOUBLE-FLOAT.
;   The second argument is a T, not a DOUBLE-FLOAT.

;     (EQL SB-PCL::.CASE-ARG. #:G1359)
; 
; note: forced to do GENERIC-EQL (cost 10)
;       unable to do inline fixnum comparison (cost 4) because:
;       The first argument is a T, not a FIXNUM.
;       The second argument is a T, not a FIXNUM.

;     (EQL SB-PCL::.CASE-ARG. #:G1362)
; 
; note: forced to do GENERIC-EQL (cost 10)
;       unable to do inline fixnum comparison (cost 4) because:
;       The first argument is a T, not a FIXNUM.
;       The second argument is a T, not a FIXNUM.
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/mcclim-0.9.2/X11-colors.lisp" (written 21 MAR 2003 04:36:58 PM):
; compiling (IN-PACKAGE :CLIM-INTERNALS)
; compiling (DEFCONSTANT +SNOW+ ...)
; compiling (DEFCONSTANT +GHOST-WHITE+ ...)
; compiling (DEFCONSTANT +GHOSTWHITE+ ...)
; compiling (DEFCONSTANT +WHITE-SMOKE+ ...)
; compiling (DEFCONSTANT +WHITESMOKE+ ...)
; compiling (DEFCONSTANT +GAINSBORO+ ...)
; compiling (DEFCONSTANT +FLORAL-WHITE+ ...)
; compiling (DEFCONSTANT +FLORALWHITE+ ...)
; compiling (DEFCONSTANT +OLD-LACE+ ...)
; compiling (DEFCONSTANT +OLDLACE+ ...)
; compiling (DEFCONSTANT +LINEN+ ...)
; compiling (DEFCONSTANT +ANTIQUE-WHITE+ ...)
; compiling (DEFCONSTANT +ANTIQUEWHITE+ ...)
; compiling (DEFCONSTANT +PAPAYA-WHIP+ ...)
; compiling (DEFCONSTANT +PAPAYAWHIP+ ...)
; compiling (DEFCONSTANT +BLANCHED-ALMOND+ ...)
; compiling (DEFCONSTANT +BLANCHEDALMOND+ ...)
; compiling (DEFCONSTANT +BISQUE+ ...)
; compiling (DEFCONSTANT +PEACH-PUFF+ ...)
; compiling (DEFCONSTANT +PEACHPUFF+ ...)
; compiling (DEFCONSTANT +NAVAJO-WHITE+ ...)
; compiling (DEFCONSTANT +NAVAJOWHITE+ ...)
; compiling (DEFCONSTANT +MOCCASIN+ ...)
; compiling (DEFCONSTANT +CORNSILK+ ...)
; compiling (DEFCONSTANT +IVORY+ ...)
; compiling (DEFCONSTANT +LEMON-CHIFFON+ ...)
; compiling (DEFCONSTANT +LEMONCHIFFON+ ...)
; compiling (DEFCONSTANT +SEASHELL+ ...)
; compiling (DEFCONSTANT +HONEYDEW+ ...)
; compiling (DEFCONSTANT +MINT-CREAM+ ...)
; compiling (DEFCONSTANT +MINTCREAM+ ...)
; compiling (DEFCONSTANT +AZURE+ ...)
; compiling (DEFCONSTANT +ALICE-BLUE+ ...)
; compiling (DEFCONSTANT +ALICEBLUE+ ...)
; compiling (DEFCONSTANT +LAVENDER+ ...)
; compiling (DEFCONSTANT +LAVENDER-BLUSH+ ...)
; compiling (DEFCONSTANT +LAVENDERBLUSH+ ...)
; compiling (DEFCONSTANT +MISTY-ROSE+ ...)
; compiling (DEFCONSTANT +MISTYROSE+ ...)
; compiling (DEFCONSTANT +WHITE+ ...)
; compiling (DEFCONSTANT +BLACK+ ...)
; compiling (DEFCONSTANT +DARK-SLATE-GRAY+ ...)
; compiling (DEFCONSTANT +DARKSLATEGRAY+ ...)
; compiling (DEFCONSTANT +DARK-SLATE-GREY+ ...)
; compiling (DEFCONSTANT +DARKSLATEGREY+ ...)
; compiling (DEFCONSTANT +DIM-GRAY+ ...)
; compiling (DEFCONSTANT +DIMGRAY+ ...)
; compiling (DEFCONSTANT +DIM-GREY+ ...)
; compiling (DEFCONSTANT +DIMGREY+ ...)
; compiling (DEFCONSTANT +SLATE-GRAY+ ...)
; compiling (DEFCONSTANT +SLATEGRAY+ ...)
; compiling (DEFCONSTANT +SLATE-GREY+ ...)
; compiling (DEFCONSTANT +SLATEGREY+ ...)
; compiling (DEFCONSTANT +LIGHT-SLATE-GRAY+ ...)
; compiling (DEFCONSTANT +LIGHTSLATEGRAY+ ...)
; compiling (DEFCONSTANT +LIGHT-SLATE-GREY+ ...)
; compiling (DEFCONSTANT +LIGHTSLATEGREY+ ...)
; compiling (DEFCONSTANT +GRAY+ ...)
; compiling (DEFCONSTANT +GREY+ ...)
; compiling (DEFCONSTANT +LIGHT-GREY+ ...)
; compiling (DEFCONSTANT +LIGHTGREY+ ...)
; compiling (DEFCONSTANT +LIGHT-GRAY+ ...)
; compiling (DEFCONSTANT +LIGHTGRAY+ ...)
; compiling (DEFCONSTANT +MIDNIGHT-BLUE+ ...)
; compiling (DEFCONSTANT +MIDNIGHTBLUE+ ...)
; compiling (DEFCONSTANT +NAVY+ ...)
; compiling (DEFCONSTANT +NAVY-BLUE+ ...)
; compiling (DEFCONSTANT +NAVYBLUE+ ...)
; compiling (DEFCONSTANT +CORNFLOWER-BLUE+ ...)
; compiling (DEFCONSTANT +CORNFLOWERBLUE+ ...)
; compiling (DEFCONSTANT +DARK-SLATE-BLUE+ ...)
; compiling (DEFCONSTANT +DARKSLATEBLUE+ ...)
; compiling (DEFCONSTANT +SLATE-BLUE+ ...)
; compiling (DEFCONSTANT +SLATEBLUE+ ...)
; compiling (DEFCONSTANT +MEDIUM-SLATE-BLUE+ ...)
; compiling (DEFCONSTANT +MEDIUMSLATEBLUE+ ...)
; compiling (DEFCONSTANT +LIGHT-SLATE-BLUE+ ...)
; compiling (DEFCONSTANT +LIGHTSLATEBLUE+ ...)
; compiling (DEFCONSTANT +MEDIUM-BLUE+ ...)
; compiling (DEFCONSTANT +MEDIUMBLUE+ ...)
; compiling (DEFCONSTANT +ROYAL-BLUE+ ...)
; compiling (DEFCONSTANT +ROYALBLUE+ ...)
; compiling (DEFCONSTANT +BLUE+ ...)
; compiling (DEFCONSTANT +DODGER-BLUE+ ...)
; compiling (DEFCONSTANT +DODGERBLUE+ ...)
; compiling (DEFCONSTANT +DEEP-SKY-BLUE+ ...)
; compiling (DEFCONSTANT +DEEPSKYBLUE+ ...)
; compiling (DEFCONSTANT +SKY-BLUE+ ...)
; compiling (DEFCONSTANT +SKYBLUE+ ...)
; compiling (DEFCONSTANT +LIGHT-SKY-BLUE+ ...)
; compiling (DEFCONSTANT +LIGHTSKYBLUE+ ...)
; compiling (DEFCONSTANT +STEEL-BLUE+ ...)
; compiling (DEFCONSTANT +STEELBLUE+ ...)
; compiling (DEFCONSTANT +LIGHT-STEEL-BLUE+ ...)
; compiling (DEFCONSTANT +LIGHTSTEELBLUE+ ...)
; compiling (DEFCONSTANT +LIGHT-BLUE+ ...)
; compiling (DEFCONSTANT +LIGHTBLUE+ ...)
; compiling (DEFCONSTANT +POWDER-BLUE+ ...)
; compiling (DEFCONSTANT +POWDERBLUE+ ...)
; compiling (DEFCONSTANT +PALE-TURQUOISE+ ...)
; compiling (DEFCONSTANT +PALETURQUOISE+ ...)
; compiling (DEFCONSTANT +DARK-TURQUOISE+ ...)
; compiling (DEFCONSTANT +DARKTURQUOISE+ ...)
; compiling (DEFCONSTANT +MEDIUM-TURQUOISE+ ...)
; compiling (DEFCONSTANT +MEDIUMTURQUOISE+ ...)
; compiling (DEFCONSTANT +TURQUOISE+ ...)
; compiling (DEFCONSTANT +CYAN+ ...)
; compiling (DEFCONSTANT +LIGHT-CYAN+ ...)
; compiling (DEFCONSTANT +LIGHTCYAN+ ...)
; compiling (DEFCONSTANT +CADET-BLUE+ ...)
; compiling (DEFCONSTANT +CADETBLUE+ ...)
; compiling (DEFCONSTANT +MEDIUM-AQUAMARINE+ ...)
; compiling (DEFCONSTANT +MEDIUMAQUAMARINE+ ...)
; compiling (DEFCONSTANT +AQUAMARINE+ ...)
; compiling (DEFCONSTANT +DARK-GREEN+ ...)
; compiling (DEFCONSTANT +DARKGREEN+ ...)
; compiling (DEFCONSTANT +DARK-OLIVE-GREEN+ ...)
; compiling (DEFCONSTANT +DARKOLIVEGREEN+ ...)
; compiling (DEFCONSTANT +DARK-SEA-GREEN+ ...)
; compiling (DEFCONSTANT +DARKSEAGREEN+ ...)
; compiling (DEFCONSTANT +SEA-GREEN+ ...)
; compiling (DEFCONSTANT +SEAGREEN+ ...)
; compiling (DEFCONSTANT +MEDIUM-SEA-GREEN+ ...)
; compiling (DEFCONSTANT +MEDIUMSEAGREEN+ ...)
; compiling (DEFCONSTANT +LIGHT-SEA-GREEN+ ...)
; compiling (DEFCONSTANT +LIGHTSEAGREEN+ ...)
; compiling (DEFCONSTANT +PALE-GREEN+ ...)
; compiling (DEFCONSTANT +PALEGREEN+ ...)
; compiling (DEFCONSTANT +SPRING-GREEN+ ...)
; compiling (DEFCONSTANT +SPRINGGREEN+ ...)
; compiling (DEFCONSTANT +LAWN-GREEN+ ...)
; compiling (DEFCONSTANT +LAWNGREEN+ ...)
; compiling (DEFCONSTANT +GREEN+ ...)
; compiling (DEFCONSTANT +CHARTREUSE+ ...)
; compiling (DEFCONSTANT +MEDIUM-SPRING-GREEN+ ...)
; compiling (DEFCONSTANT +MEDIUMSPRINGGREEN+ ...)
; compiling (DEFCONSTANT +GREEN-YELLOW+ ...)
; compiling (DEFCONSTANT +GREENYELLOW+ ...)
; compiling (DEFCONSTANT +LIME-GREEN+ ...)
; compiling (DEFCONSTANT +LIMEGREEN+ ...)
; compiling (DEFCONSTANT +YELLOW-GREEN+ ...)
; compiling (DEFCONSTANT +YELLOWGREEN+ ...)
; compiling (DEFCONSTANT +FOREST-GREEN+ ...)
; compiling (DEFCONSTANT +FORESTGREEN+ ...)
; compiling (DEFCONSTANT +OLIVE-DRAB+ ...)
; compiling (DEFCONSTANT +OLIVEDRAB+ ...)
; compiling (DEFCONSTANT +DARK-KHAKI+ ...)
; compiling (DEFCONSTANT +DARKKHAKI+ ...)
; compiling (DEFCONSTANT +KHAKI+ ...)
; compiling (DEFCONSTANT +PALE-GOLDENROD+ ...)
; compiling (DEFCONSTANT +PALEGOLDENROD+ ...)
; compiling (DEFCONSTANT +LIGHT-GOLDENROD-YELLOW+ ...)
; compiling (DEFCONSTANT +LIGHTGOLDENRODYELLOW+ ...)
; compiling (DEFCONSTANT +LIGHT-YELLOW+ ...)
; compiling (DEFCONSTANT +LIGHTYELLOW+ ...)
; compiling (DEFCONSTANT +YELLOW+ ...)
; compiling (DEFCONSTANT +GOLD+ ...)
; compiling (DEFCONSTANT +LIGHT-GOLDENROD+ ...)
; compiling (DEFCONSTANT +LIGHTGOLDENROD+ ...)
; compiling (DEFCONSTANT +GOLDENROD+ ...)
; compiling (DEFCONSTANT +DARK-GOLDENROD+ ...)
; compiling (DEFCONSTANT +DARKGOLDENROD+ ...)
; compiling (DEFCONSTANT +ROSY-BROWN+ ...)
; compiling (DEFCONSTANT +ROSYBROWN+ ...)
; compiling (DEFCONSTANT +INDIAN-RED+ ...)
; compiling (DEFCONSTANT +INDIANRED+ ...)
; compiling (DEFCONSTANT +SADDLE-BROWN+ ...)
; compiling (DEFCONSTANT +SADDLEBROWN+ ...)
; compiling (DEFCONSTANT +SIENNA+ ...)
; compiling (DEFCONSTANT +PERU+ ...)
; compiling (DEFCONSTANT +BURLYWOOD+ ...)
; compiling (DEFCONSTANT +BEIGE+ ...)
; compiling (DEFCONSTANT +WHEAT+ ...)
; compiling (DEFCONSTANT +SANDY-BROWN+ ...)
; compiling (DEFCONSTANT +SANDYBROWN+ ...)
; compiling (DEFCONSTANT +TAN+ ...)
; compiling (DEFCONSTANT +CHOCOLATE+ ...)
; compiling (DEFCONSTANT +FIREBRICK+ ...)
; compiling (DEFCONSTANT +BROWN+ ...)
; compiling (DEFCONSTANT +DARK-SALMON+ ...)
; compiling (DEFCONSTANT +DARKSALMON+ ...)
; compiling (DEFCONSTANT +SALMON+ ...)
; compiling (DEFCONSTANT +LIGHT-SALMON+ ...)
; compiling (DEFCONSTANT +LIGHTSALMON+ ...)
; compiling (DEFCONSTANT +ORANGE+ ...)
; compiling (DEFCONSTANT +DARK-ORANGE+ ...)
; compiling (DEFCONSTANT +DARKORANGE+ ...)
; compiling (DEFCONSTANT +CORAL+ ...)
; compiling (DEFCONSTANT +LIGHT-CORAL+ ...)
; compiling (DEFCONSTANT +LIGHTCORAL+ ...)
; compiling (DEFCONSTANT +TOMATO+ ...)
; compiling (DEFCONSTANT +ORANGE-RED+ ...)
; compiling (DEFCONSTANT +ORANGERED+ ...)
; compiling (DEFCONSTANT +RED+ ...)
; compiling (DEFCONSTANT +HOT-PINK+ ...)
; compiling (DEFCONSTANT +HOTPINK+ ...)
; compiling (DEFCONSTANT +DEEP-PINK+ ...)
; compiling (DEFCONSTANT +DEEPPINK+ ...)
; compiling (DEFCONSTANT +PINK+ ...)
; compiling (DEFCONSTANT +LIGHT-PINK+ ...)
; compiling (DEFCONSTANT +LIGHTPINK+ ...)
; compiling (DEFCONSTANT +PALE-VIOLET-RED+ ...)
; compiling (DEFCONSTANT +PALEVIOLETRED+ ...)
; compiling (DEFCONSTANT +MAROON+ ...)
; compiling (DEFCONSTANT +MEDIUM-VIOLET-RED+ ...)
; compiling (DEFCONSTANT +MEDIUMVIOLETRED+ ...)
; compiling (DEFCONSTANT +VIOLET-RED+ ...)
; compiling (DEFCONSTANT +VIOLETRED+ ...)
; compiling (DEFCONSTANT +MAGENTA+ ...)
; compiling (DEFCONSTANT +VIOLET+ ...)
; compiling (DEFCONSTANT +PLUM+ ...)
; compiling (DEFCONSTANT +ORCHID+ ...)
; compiling (DEFCONSTANT +MEDIUM-ORCHID+ ...)
; compiling (DEFCONSTANT +MEDIUMORCHID+ ...)
; compiling (DEFCONSTANT +DARK-ORCHID+ ...)
; compiling (DEFCONSTANT +DARKORCHID+ ...)
; compiling (DEFCONSTANT +DARK-VIOLET+ ...)
; compiling (DEFCONSTANT +DARKVIOLET+ ...)
; compiling (DEFCONSTANT +BLUE-VIOLET+ ...)
; compiling (DEFCONSTANT +BLUEVIOLET+ ...)
; compiling (DEFCONSTANT +PURPLE+ ...)
; compiling (DEFCONSTANT +MEDIUM-PURPLE+ ...)
; compiling (DEFCONSTANT +MEDIUMPURPLE+ ...)
; compiling (DEFCONSTANT +THISTLE+ ...)
; compiling (DEFCONSTANT +SNOW1+ ...)
; compiling (DEFCONSTANT +SNOW2+ ...)
; compiling (DEFCONSTANT +SNOW3+ ...)
; compiling (DEFCONSTANT +SNOW4+ ...)
; compiling (DEFCONSTANT +SEASHELL1+ ...)
; compiling (DEFCONSTANT +SEASHELL2+ ...)
; compiling (DEFCONSTANT +SEASHELL3+ ...)
; compiling (DEFCONSTANT +SEASHELL4+ ...)
; compiling (DEFCONSTANT +ANTIQUEWHITE1+ ...)
; compiling (DEFCONSTANT +ANTIQUEWHITE2+ ...)
; compiling (DEFCONSTANT +ANTIQUEWHITE3+ ...)
; compiling (DEFCONSTANT +ANTIQUEWHITE4+ ...)
; compiling (DEFCONSTANT +BISQUE1+ ...)
; compiling (DEFCONSTANT +BISQUE2+ ...)
; compiling (DEFCONSTANT +BISQUE3+ ...)
; compiling (DEFCONSTANT +BISQUE4+ ...)
; compiling (DEFCONSTANT +PEACHPUFF1+ ...)
; compiling (DEFCONSTANT +PEACHPUFF2+ ...)
; compiling (DEFCONSTANT +PEACHPUFF3+ ...)
; compiling (DEFCONSTANT +PEACHPUFF4+ ...)
; compiling (DEFCONSTANT +NAVAJOWHITE1+ ...)
; compiling (DEFCONSTANT +NAVAJOWHITE2+ ...)
; compiling (DEFCONSTANT +NAVAJOWHITE3+ ...)
; compiling (DEFCONSTANT +NAVAJOWHITE4+ ...)
; compiling (DEFCONSTANT +LEMONCHIFFON1+ ...)
; compiling (DEFCONSTANT +LEMONCHIFFON2+ ...)
; compiling (DEFCONSTANT +LEMONCHIFFON3+ ...)
; compiling (DEFCONSTANT +LEMONCHIFFON4+ ...)
; compiling (DEFCONSTANT +CORNSILK1+ ...)
; compiling (DEFCONSTANT +CORNSILK2+ ...)
; compiling (DEFCONSTANT +CORNSILK3+ ...)
; compiling (DEFCONSTANT +CORNSILK4+ ...)
; compiling (DEFCONSTANT +IVORY1+ ...)
; compiling (DEFCONSTANT +IVORY2+ ...)
; compiling (DEFCONSTANT +IVORY3+ ...)
; compiling (DEFCONSTANT +IVORY4+ ...)
; compiling (DEFCONSTANT +HONEYDEW1+ ...)
; compiling (DEFCONSTANT +HONEYDEW2+ ...)
; compiling (DEFCONSTANT +HONEYDEW3+ ...)
; compiling (DEFCONSTANT +HONEYDEW4+ ...)
; compiling (DEFCONSTANT +LAVENDERBLUSH1+ ...)
; compiling (DEFCONSTANT +LAVENDERBLUSH2+ ...)
; compiling (DEFCONSTANT +LAVENDERBLUSH3+ ...)
; compiling (DEFCONSTANT +LAVENDERBLUSH4+ ...)
; compiling (DEFCONSTANT +MISTYROSE1+ ...)
; compiling (DEFCONSTANT +MISTYROSE2+ ...)
; compiling (DEFCONSTANT +MISTYROSE3+ ...)
; compiling (DEFCONSTANT +MISTYROSE4+ ...)
; compiling (DEFCONSTANT +AZURE1+ ...)
; compiling (DEFCONSTANT +AZURE2+ ...)
; compiling (DEFCONSTANT +AZURE3+ ...)
; compiling (DEFCONSTANT +AZURE4+ ...)
; compiling (DEFCONSTANT +SLATEBLUE1+ ...)
; compiling (DEFCONSTANT +SLATEBLUE2+ ...)
; compiling (DEFCONSTANT +SLATEBLUE3+ ...)
; compiling (DEFCONSTANT +SLATEBLUE4+ ...)
; compiling (DEFCONSTANT +ROYALBLUE1+ ...)
; compiling (DEFCONSTANT +ROYALBLUE2+ ...)
; compiling (DEFCONSTANT +ROYALBLUE3+ ...)
; compiling (DEFCONSTANT +ROYALBLUE4+ ...)
; compiling (DEFCONSTANT +BLUE1+ ...)
; compiling (DEFCONSTANT +BLUE2+ ...)
; compiling (DEFCONSTANT +BLUE3+ ...)
; compiling (DEFCONSTANT +BLUE4+ ...)
; compiling (DEFCONSTANT +DODGERBLUE1+ ...)
; compiling (DEFCONSTANT +DODGERBLUE2+ ...)
; compiling (DEFCONSTANT +DODGERBLUE3+ ...)
; compiling (DEFCONSTANT +DODGERBLUE4+ ...)
; compiling (DEFCONSTANT +STEELBLUE1+ ...)
; compiling (DEFCONSTANT +STEELBLUE2+ ...)
; compiling (DEFCONSTANT +STEELBLUE3+ ...)
; compiling (DEFCONSTANT +STEELBLUE4+ ...)
; compiling (DEFCONSTANT +DEEPSKYBLUE1+ ...)
; compiling (DEFCONSTANT +DEEPSKYBLUE2+ ...)
; compiling (DEFCONSTANT +DEEPSKYBLUE3+ ...)
; compiling (DEFCONSTANT +DEEPSKYBLUE4+ ...)
; compiling (DEFCONSTANT +SKYBLUE1+ ...)
; compiling (DEFCONSTANT +SKYBLUE2+ ...)
; compiling (DEFCONSTANT +SKYBLUE3+ ...)
; compiling (DEFCONSTANT +SKYBLUE4+ ...)
; compiling (DEFCONSTANT +LIGHTSKYBLUE1+ ...)
; compiling (DEFCONSTANT +LIGHTSKYBLUE2+ ...)
; compiling (DEFCONSTANT +LIGHTSKYBLUE3+ ...)
; compiling (DEFCONSTANT +LIGHTSKYBLUE4+ ...)
; compiling (DEFCONSTANT +SLATEGRAY1+ ...)
; compiling (DEFCONSTANT +SLATEGRAY2+ ...)
; compiling (DEFCONSTANT +SLATEGRAY3+ ...)
; compiling (DEFCONSTANT +SLATEGRAY4+ ...)
; compiling (DEFCONSTANT +LIGHTSTEELBLUE1+ ...)
; compiling (DEFCONSTANT +LIGHTSTEELBLUE2+ ...)
; compiling (DEFCONSTANT +LIGHTSTEELBLUE3+ ...)
; compiling (DEFCONSTANT +LIGHTSTEELBLUE4+ ...)
; compiling (DEFCONSTANT +LIGHTBLUE1+ ...)
; compiling (DEFCONSTANT +LIGHTBLUE2+ ...)
; compiling (DEFCONSTANT +LIGHTBLUE3+ ...)
; compiling (DEFCONSTANT +LIGHTBLUE4+ ...)
; compiling (DEFCONSTANT +LIGHTCYAN1+ ...)
; compiling (DEFCONSTANT +LIGHTCYAN2+ ...)
; compiling (DEFCONSTANT +LIGHTCYAN3+ ...)
; compiling (DEFCONSTANT +LIGHTCYAN4+ ...)
; compiling (DEFCONSTANT +PALETURQUOISE1+ ...)
; compiling (DEFCONSTANT +PALETURQUOISE2+ ...)
; compiling (DEFCONSTANT +PALETURQUOISE3+ ...)
; compiling (DEFCONSTANT +PALETURQUOISE4+ ...)
; compiling (DEFCONSTANT +CADETBLUE1+ ...)
; compiling (DEFCONSTANT +CADETBLUE2+ ...)
; compiling (DEFCONSTANT +CADETBLUE3+ ...)
; compiling (DEFCONSTANT +CADETBLUE4+ ...)
; compiling (DEFCONSTANT +TURQUOISE1+ ...)
; compiling (DEFCONSTANT +TURQUOISE2+ ...)
; compiling (DEFCONSTANT +TURQUOISE3+ ...)
; compiling (DEFCONSTANT +TURQUOISE4+ ...)
; compiling (DEFCONSTANT +CYAN1+ ...)
; compiling (DEFCONSTANT +CYAN2+ ...)
; compiling (DEFCONSTANT +CYAN3+ ...)
; compiling (DEFCONSTANT +CYAN4+ ...)
; compiling (DEFCONSTANT +DARKSLATEGRAY1+ ...)
; compiling (DEFCONSTANT +DARKSLATEGRAY2+ ...)
; compiling (DEFCONSTANT +DARKSLATEGRAY3+ ...)
; compiling (DEFCONSTANT +DARKSLATEGRAY4+ ...)
; compiling (DEFCONSTANT +AQUAMARINE1+ ...)
; compiling (DEFCONSTANT +AQUAMARINE2+ ...)
; compiling (DEFCONSTANT +AQUAMARINE3+ ...)
; compiling (DEFCONSTANT +AQUAMARINE4+ ...)
; compiling (DEFCONSTANT +DARKSEAGREEN1+ ...)
; compiling (DEFCONSTANT +DARKSEAGREEN2+ ...)
; compiling (DEFCONSTANT +DARKSEAGREEN3+ ...)
; compiling (DEFCONSTANT +DARKSEAGREEN4+ ...)
; compiling (DEFCONSTANT +SEAGREEN1+ ...)
; compiling (DEFCONSTANT +SEAGREEN2+ ...)
; compiling (DEFCONSTANT +SEAGREEN3+ ...)
; compiling (DEFCONSTANT +SEAGREEN4+ ...)
; compiling (DEFCONSTANT +PALEGREEN1+ ...)
; compiling (DEFCONSTANT +PALEGREEN2+ ...)
; compiling (DEFCONSTANT +PALEGREEN3+ ...)
; compiling (DEFCONSTANT +PALEGREEN4+ ...)
; compiling (DEFCONSTANT +SPRINGGREEN1+ ...)
; compiling (DEFCONSTANT +SPRINGGREEN2+ ...)
; compiling (DEFCONSTANT +SPRINGGREEN3+ ...)
; compiling (DEFCONSTANT +SPRINGGREEN4+ ...)
; compiling (DEFCONSTANT +GREEN1+ ...)
; compiling (DEFCONSTANT +GREEN2+ ...)
; compiling (DEFCONSTANT +GREEN3+ ...)
; compiling (DEFCONSTANT +GREEN4+ ...)
; compiling (DEFCONSTANT +CHARTREUSE1+ ...)
; compiling (DEFCONSTANT +CHARTREUSE2+ ...)
; compiling (DEFCONSTANT +CHARTREUSE3+ ...)
; compiling (DEFCONSTANT +CHARTREUSE4+ ...)
; compiling (DEFCONSTANT +OLIVEDRAB1+ ...)
; compiling (DEFCONSTANT +OLIVEDRAB2+ ...)
; compiling (DEFCONSTANT +OLIVEDRAB3+ ...)
; compiling (DEFCONSTANT +OLIVEDRAB4+ ...)
; compiling (DEFCONSTANT +DARKOLIVEGREEN1+ ...)
; compiling (DEFCONSTANT +DARKOLIVEGREEN2+ ...)
; compiling (DEFCONSTANT +DARKOLIVEGREEN3+ ...)
; compiling (DEFCONSTANT +DARKOLIVEGREEN4+ ...)
; compiling (DEFCONSTANT +KHAKI1+ ...)
; compiling (DEFCONSTANT +KHAKI2+ ...)
; compiling (DEFCONSTANT +KHAKI3+ ...)
; compiling (DEFCONSTANT +KHAKI4+ ...)
; compiling (DEFCONSTANT +LIGHTGOLDENROD1+ ...)
; compiling (DEFCONSTANT +LIGHTGOLDENROD2+ ...)
; compiling (DEFCONSTANT +LIGHTGOLDENROD3+ ...)
; compiling (DEFCONSTANT +LIGHTGOLDENROD4+ ...)
; compiling (DEFCONSTANT +LIGHTYELLOW1+ ...)
; compiling (DEFCONSTANT +LIGHTYELLOW2+ ...)
; compiling (DEFCONSTANT +LIGHTYELLOW3+ ...)
; compiling (DEFCONSTANT +LIGHTYELLOW4+ ...)
; compiling (DEFCONSTANT +YELLOW1+ ...)
; compiling (DEFCONSTANT +YELLOW2+ ...)
; compiling (DEFCONSTANT +YELLOW3+ ...)
; compiling (DEFCONSTANT +YELLOW4+ ...)
; compiling (DEFCONSTANT +GOLD1+ ...)
; compiling (DEFCONSTANT +GOLD2+ ...)
; compiling (DEFCONSTANT +GOLD3+ ...)
; compiling (DEFCONSTANT +GOLD4+ ...)
; compiling (DEFCONSTANT +GOLDENROD1+ ...)
; compiling (DEFCONSTANT +GOLDENROD2+ ...)
; compiling (DEFCONSTANT +GOLDENROD3+ ...)
; compiling (DEFCONSTANT +GOLDENROD4+ ...)
; compiling (DEFCONSTANT +DARKGOLDENROD1+ ...)
; compiling (DEFCONSTANT +DARKGOLDENROD2+ ...)
; compiling (DEFCONSTANT +DARKGOLDENROD3+ ...)
; compiling (DEFCONSTANT +DARKGOLDENROD4+ ...)
; compiling (DEFCONSTANT +ROSYBROWN1+ ...)
; compiling (DEFCONSTANT +ROSYBROWN2+ ...)
; compiling (DEFCONSTANT +ROSYBROWN3+ ...)
; compiling (DEFCONSTANT +ROSYBROWN4+ ...)
; compiling (DEFCONSTANT +INDIANRED1+ ...)
; compiling (DEFCONSTANT +INDIANRED2+ ...)
; compiling (DEFCONSTANT +INDIANRED3+ ...)
; compiling (DEFCONSTANT +INDIANRED4+ ...)
; compiling (DEFCONSTANT +SIENNA1+ ...)
; compiling (DEFCONSTANT +SIENNA2+ ...)
; compiling (DEFCONSTANT +SIENNA3+ ...)
; compiling (DEFCONSTANT +SIENNA4+ ...)
; compiling (DEFCONSTANT +BURLYWOOD1+ ...)
; compiling (DEFCONSTANT +BURLYWOOD2+ ...)
; compiling (DEFCONSTANT +BURLYWOOD3+ ...)
; compiling (DEFCONSTANT +BURLYWOOD4+ ...)
; compiling (DEFCONSTANT +WHEAT1+ ...)
; compiling (DEFCONSTANT +WHEAT2+ ...)
; compiling (DEFCONSTANT +WHEAT3+ ...)
; compiling (DEFCONSTANT +WHEAT4+ ...)
; compiling (DEFCONSTANT +TAN1+ ...)
; compiling (DEFCONSTANT +TAN2+ ...)
; compiling (DEFCONSTANT +TAN3+ ...)
; compiling (DEFCONSTANT +TAN4+ ...)
; compiling (DEFCONSTANT +CHOCOLATE1+ ...)
; compiling (DEFCONSTANT +CHOCOLATE2+ ...)
; compiling (DEFCONSTANT +CHOCOLATE3+ ...)
; compiling (DEFCONSTANT +CHOCOLATE4+ ...)
; compiling (DEFCONSTANT +FIREBRICK1+ ...)
; compiling (DEFCONSTANT +FIREBRICK2+ ...)
; compiling (DEFCONSTANT +FIREBRICK3+ ...)
; compiling (DEFCONSTANT +FIREBRICK4+ ...)
; compiling (DEFCONSTANT +BROWN1+ ...)
; compiling (DEFCONSTANT +BROWN2+ ...)
; compiling (DEFCONSTANT +BROWN3+ ...)
; compiling (DEFCONSTANT +BROWN4+ ...)
; compiling (DEFCONSTANT +SALMON1+ ...)
; compiling (DEFCONSTANT +SALMON2+ ...)
; compiling (DEFCONSTANT +SALMON3+ ...)
; compiling (DEFCONSTANT +SALMON4+ ...)
; compiling (DEFCONSTANT +LIGHTSALMON1+ ...)
; compiling (DEFCONSTANT +LIGHTSALMON2+ ...)
; compiling (DEFCONSTANT +LIGHTSALMON3+ ...)
; compiling (DEFCONSTANT +LIGHTSALMON4+ ...)
; compiling (DEFCONSTANT +ORANGE1+ ...)
; compiling (DEFCONSTANT +ORANGE2+ ...)
; compiling (DEFCONSTANT +ORANGE3+ ...)
; compiling (DEFCONSTANT +ORANGE4+ ...)
; compiling (DEFCONSTANT +DARKORANGE1+ ...)
; compiling (DEFCONSTANT +DARKORANGE2+ ...)
; compiling (DEFCONSTANT +DARKORANGE3+ ...)
; compiling (DEFCONSTANT +DARKORANGE4+ ...)
; compiling (DEFCONSTANT +CORAL1+ ...)
; compiling (DEFCONSTANT +CORAL2+ ...)
; compiling (DEFCONSTANT +CORAL3+ ...)
; compiling (DEFCONSTANT +CORAL4+ ...)
; compiling (DEFCONSTANT +TOMATO1+ ...)
; compiling (DEFCONSTANT +TOMATO2+ ...)
; compiling (DEFCONSTANT +TOMATO3+ ...)
; compiling (DEFCONSTANT +TOMATO4+ ...)
; compiling (DEFCONSTANT +ORANGERED1+ ...)
; compiling (DEFCONSTANT +ORANGERED2+ ...)
; compiling (DEFCONSTANT +ORANGERED3+ ...)
; compiling (DEFCONSTANT +ORANGERED4+ ...)
; compiling (DEFCONSTANT +RED1+ ...)
; compiling (DEFCONSTANT +RED2+ ...)
; compiling (DEFCONSTANT +RED3+ ...)
; compiling (DEFCONSTANT +RED4+ ...)
; compiling (DEFCONSTANT +DEEPPINK1+ ...)
; compiling (DEFCONSTANT +DEEPPINK2+ ...)
; compiling (DEFCONSTANT +DEEPPINK3+ ...)
; compiling (DEFCONSTANT +DEEPPINK4+ ...)
; compiling (DEFCONSTANT +HOTPINK1+ ...)
; compiling (DEFCONSTANT +HOTPINK2+ ...)
; compiling (DEFCONSTANT +HOTPINK3+ ...)
; compiling (DEFCONSTANT +HOTPINK4+ ...)
; compiling (DEFCONSTANT +PINK1+ ...)
; compiling (DEFCONSTANT +PINK2+ ...)
; compiling (DEFCONSTANT +PINK3+ ...)
; compiling (DEFCONSTANT +PINK4+ ...)
; compiling (DEFCONSTANT +LIGHTPINK1+ ...)
; compiling (DEFCONSTANT +LIGHTPINK2+ ...)
; compiling (DEFCONSTANT +LIGHTPINK3+ ...)
; compiling (DEFCONSTANT +LIGHTPINK4+ ...)
; compiling (DEFCONSTANT +PALEVIOLETRED1+ ...)
; compiling (DEFCONSTANT +PALEVIOLETRED2+ ...)
; compiling (DEFCONSTANT +PALEVIOLETRED3+ ...)
; compiling (DEFCONSTANT +PALEVIOLETRED4+ ...)
; compiling (DEFCONSTANT +MAROON1+ ...)
; compiling (DEFCONSTANT +MAROON2+ ...)
; compiling (DEFCONSTANT +MAROON3+ ...)
; compiling (DEFCONSTANT +MAROON4+ ...)
; compiling (DEFCONSTANT +VIOLETRED1+ ...)
; compiling (DEFCONSTANT +VIOLETRED2+ ...)
; compiling (DEFCONSTANT +VIOLETRED3+ ...)
; compiling (DEFCONSTANT +VIOLETRED4+ ...)
; compiling (DEFCONSTANT +MAGENTA1+ ...)
; compiling (DEFCONSTANT +MAGENTA2+ ...)
; compiling (DEFCONSTANT +MAGENTA3+ ...)
; compiling (DEFCONSTANT +MAGENTA4+ ...)
; compiling (DEFCONSTANT +ORCHID1+ ...)
; compiling (DEFCONSTANT +ORCHID2+ ...)
; compiling (DEFCONSTANT +ORCHID3+ ...)
; compiling (DEFCONSTANT +ORCHID4+ ...)
; compiling (DEFCONSTANT +PLUM1+ ...)
; compiling (DEFCONSTANT +PLUM2+ ...)
; compiling (DEFCONSTANT +PLUM3+ ...)
; compiling (DEFCONSTANT +PLUM4+ ...)
; compiling (DEFCONSTANT +MEDIUMORCHID1+ ...)
; compiling (DEFCONSTANT +MEDIUMORCHID2+ ...)
; compiling (DEFCONSTANT +MEDIUMORCHID3+ ...)
; compiling (DEFCONSTANT +MEDIUMORCHID4+ ...)
; compiling (DEFCONSTANT +DARKORCHID1+ ...)
; compiling (DEFCONSTANT +DARKORCHID2+ ...)
; compiling (DEFCONSTANT +DARKORCHID3+ ...)
; compiling (DEFCONSTANT +DARKORCHID4+ ...)
; compiling (DEFCONSTANT +PURPLE1+ ...)
; compiling (DEFCONSTANT +PURPLE2+ ...)
; compiling (DEFCONSTANT +PURPLE3+ ...)
; compiling (DEFCONSTANT +PURPLE4+ ...)
; compiling (DEFCONSTANT +MEDIUMPURPLE1+ ...)
; compiling (DEFCONSTANT +MEDIUMPURPLE2+ ...)
; compiling (DEFCONSTANT +MEDIUMPURPLE3+ ...)
; compiling (DEFCONSTANT +MEDIUMPURPLE4+ ...)
; compiling (DEFCONSTANT +THISTLE1+ ...)
; compiling (DEFCONSTANT +THISTLE2+ ...)
; compiling (DEFCONSTANT +THISTLE3+ ...)
; compiling (DEFCONSTANT +THISTLE4+ ...)
; compiling (DEFCONSTANT +GRAY0+ ...)
; compiling (DEFCONSTANT +GREY0+ ...)
; compiling (DEFCONSTANT +GRAY1+ ...)
; compiling (DEFCONSTANT +GREY1+ ...)
; compiling (DEFCONSTANT +GRAY2+ ...)
; compiling (DEFCONSTANT +GREY2+ ...)
; compiling (DEFCONSTANT +GRAY3+ ...)
; compiling (DEFCONSTANT +GREY3+ ...)
; compiling (DEFCONSTANT +GRAY4+ ...)
; compiling (DEFCONSTANT +GREY4+ ...)
; compiling (DEFCONSTANT +GRAY5+ ...)
; compiling (DEFCONSTANT +GREY5+ ...)
; compiling (DEFCONSTANT +GRAY6+ ...)
; compiling (DEFCONSTANT +GREY6+ ...)
; compiling (DEFCONSTANT +GRAY7+ ...)
; compiling (DEFCONSTANT +GREY7+ ...)
; compiling (DEFCONSTANT +GRAY8+ ...)
; compiling (DEFCONSTANT +GREY8+ ...)
; compiling (DEFCONSTANT +GRAY9+ ...)
; compiling (DEFCONSTANT +GREY9+ ...)
; compiling (DEFCONSTANT +GRAY10+ ...)
; compiling (DEFCONSTANT +GREY10+ ...)
; compiling (DEFCONSTANT +GRAY11+ ...)
; compiling (DEFCONSTANT +GREY11+ ...)
; compiling (DEFCONSTANT +GRAY12+ ...)
; compiling (DEFCONSTANT +GREY12+ ...)
; compiling (DEFCONSTANT +GRAY13+ ...)
; compiling (DEFCONSTANT +GREY13+ ...)
; compiling (DEFCONSTANT +GRAY14+ ...)
; compiling (DEFCONSTANT +GREY14+ ...)
; compiling (DEFCONSTANT +GRAY15+ ...)
; compiling (DEFCONSTANT +GREY15+ ...)
; compiling (DEFCONSTANT +GRAY16+ ...)
; compiling (DEFCONSTANT +GREY16+ ...)
; compiling (DEFCONSTANT +GRAY17+ ...)
; compiling (DEFCONSTANT +GREY17+ ...)
; compiling (DEFCONSTANT +GRAY18+ ...)
; compiling (DEFCONSTANT +GREY18+ ...)
; compiling (DEFCONSTANT +GRAY19+ ...)
; compiling (DEFCONSTANT +GREY19+ ...)
; compiling (DEFCONSTANT +GRAY20+ ...)
; compiling (DEFCONSTANT +GREY20+ ...)
; compiling (DEFCONSTANT +GRAY21+ ...)
; compiling (DEFCONSTANT +GREY21+ ...)
; compiling (DEFCONSTANT +GRAY22+ ...)
; compiling (DEFCONSTANT +GREY22+ ...)
; compiling (DEFCONSTANT +GRAY23+ ...)
; compiling (DEFCONSTANT +GREY23+ ...)
; compiling (DEFCONSTANT +GRAY24+ ...)
; compiling (DEFCONSTANT +GREY24+ ...)
; compiling (DEFCONSTANT +GRAY25+ ...)
; compiling (DEFCONSTANT +GREY25+ ...)
; compiling (DEFCONSTANT +GRAY26+ ...)
; compiling (DEFCONSTANT +GREY26+ ...)
; compiling (DEFCONSTANT +GRAY27+ ...)
; compiling (DEFCONSTANT +GREY27+ ...)
; compiling (DEFCONSTANT +GRAY28+ ...)
; compiling (DEFCONSTANT +GREY28+ ...)
; compiling (DEFCONSTANT +GRAY29+ ...)
; compiling (DEFCONSTANT +GREY29+ ...)
; compiling (DEFCONSTANT +GRAY30+ ...)
; compiling (DEFCONSTANT +GREY30+ ...)
; compiling (DEFCONSTANT +GRAY31+ ...)
; compiling (DEFCONSTANT +GREY31+ ...)
; compiling (DEFCONSTANT +GRAY32+ ...)
; compiling (DEFCONSTANT +GREY32+ ...)
; compiling (DEFCONSTANT +GRAY33+ ...)
; compiling (DEFCONSTANT +GREY33+ ...)
; compiling (DEFCONSTANT +GRAY34+ ...)
; compiling (DEFCONSTANT +GREY34+ ...)
; compiling (DEFCONSTANT +GRAY35+ ...)
; compiling (DEFCONSTANT +GREY35+ ...)
; compiling (DEFCONSTANT +GRAY36+ ...)
; compiling (DEFCONSTANT +GREY36+ ...)
; compiling (DEFCONSTANT +GRAY37+ ...)
; compiling (DEFCONSTANT +GREY37+ ...)
; compiling (DEFCONSTANT +GRAY38+ ...)
; compiling (DEFCONSTANT +GREY38+ ...)
; compiling (DEFCONSTANT +GRAY39+ ...)
; compiling (DEFCONSTANT +GREY39+ ...)
; compiling (DEFCONSTANT +GRAY40+ ...)
; compiling (DEFCONSTANT +GREY40+ ...)
; compiling (DEFCONSTANT +GRAY41+ ...)
; compiling (DEFCONSTANT +GREY41+ ...)
; compiling (DEFCONSTANT +GRAY42+ ...)
; compiling (DEFCONSTANT +GREY42+ ...)
; compiling (DEFCONSTANT +GRAY43+ ...)
; compiling (DEFCONSTANT +GREY43+ ...)
; compiling (DEFCONSTANT +GRAY44+ ...)
; compiling (DEFCONSTANT +GREY44+ ...)
; compiling (DEFCONSTANT +GRAY45+ ...)
; compiling (DEFCONSTANT +GREY45+ ...)
; compiling (DEFCONSTANT +GRAY46+ ...)
; compiling (DEFCONSTANT +GREY46+ ...)
; compiling (DEFCONSTANT +GRAY47+ ...)
; compiling (DEFCONSTANT +GREY47+ ...)
; compiling (DEFCONSTANT +GRAY48+ ...)
; compiling (DEFCONSTANT +GREY48+ ...)
; compiling (DEFCONSTANT +GRAY49+ ...)
; compiling (DEFCONSTANT +GREY49+ ...)
; compiling (DEFCONSTANT +GRAY50+ ...)
; compiling (DEFCONSTANT +GREY50+ ...)
; compiling (DEFCONSTANT +GRAY51+ ...)
; compiling (DEFCONSTANT +GREY51+ ...)
; compiling (DEFCONSTANT +GRAY52+ ...)
; compiling (DEFCONSTANT +GREY52+ ...)
; compiling (DEFCONSTANT +GRAY53+ ...)
; compiling (DEFCONSTANT +GREY53+ ...)
; compiling (DEFCONSTANT +GRAY54+ ...)
; compiling (DEFCONSTANT +GREY54+ ...)
; compiling (DEFCONSTANT +GRAY55+ ...)
; compiling (DEFCONSTANT +GREY55+ ...)
; compiling (DEFCONSTANT +GRAY56+ ...)
; compiling (DEFCONSTANT +GREY56+ ...)
; compiling (DEFCONSTANT +GRAY57+ ...)
; compiling (DEFCONSTANT +GREY57+ ...)
; compiling (DEFCONSTANT +GRAY58+ ...)
; compiling (DEFCONSTANT +GREY58+ ...)
; compiling (DEFCONSTANT +GRAY59+ ...)
; compiling (DEFCONSTANT +GREY59+ ...)
; compiling (DEFCONSTANT +GRAY60+ ...)
; compiling (DEFCONSTANT +GREY60+ ...)
; compiling (DEFCONSTANT +GRAY61+ ...)
; compiling (DEFCONSTANT +GREY61+ ...)
; compiling (DEFCONSTANT +GRAY62+ ...)
; compiling (DEFCONSTANT +GREY62+ ...)
; compiling (DEFCONSTANT +GRAY63+ ...)
; compiling (DEFCONSTANT +GREY63+ ...)
; compiling (DEFCONSTANT +GRAY64+ ...)
; compiling (DEFCONSTANT +GREY64+ ...)
; compiling (DEFCONSTANT +GRAY65+ ...)
; compiling (DEFCONSTANT +GREY65+ ...)
; compiling (DEFCONSTANT +GRAY66+ ...)
; compiling (DEFCONSTANT +GREY66+ ...)
; compiling (DEFCONSTANT +GRAY67+ ...)
; compiling (DEFCONSTANT +GREY67+ ...)
; compiling (DEFCONSTANT +GRAY68+ ...)
; compiling (DEFCONSTANT +GREY68+ ...)
; compiling (DEFCONSTANT +GRAY69+ ...)
; compiling (DEFCONSTANT +GREY69+ ...)
; compiling (DEFCONSTANT +GRAY70+ ...)
; compiling (DEFCONSTANT +GREY70+ ...)
; compiling (DEFCONSTANT +GRAY71+ ...)
; compiling (DEFCONSTANT +GREY71+ ...)
; compiling (DEFCONSTANT +GRAY72+ ...)
; compiling (DEFCONSTANT +GREY72+ ...)
; compiling (DEFCONSTANT +GRAY73+ ...)
; compiling (DEFCONSTANT +GREY73+ ...)
; compiling (DEFCONSTANT +GRAY74+ ...)
; compiling (DEFCONSTANT +GREY74+ ...)
; compiling (DEFCONSTANT +GRAY75+ ...)
; compiling (DEFCONSTANT +GREY75+ ...)
; compiling (DEFCONSTANT +GRAY76+ ...)
; compiling (DEFCONSTANT +GREY76+ ...)
; compiling (DEFCONSTANT +GRAY77+ ...)
; compiling (DEFCONSTANT +GREY77+ ...)
; compiling (DEFCONSTANT +GRAY78+ ...)
; compiling (DEFCONSTANT +GREY78+ ...)
; compiling (DEFCONSTANT +GRAY79+ ...)
; compiling (DEFCONSTANT +GREY79+ ...)
; compiling (DEFCONSTANT +GRAY80+ ...)
; compiling (DEFCONSTANT +GREY80+ ...)
; compiling (DEFCONSTANT +GRAY81+ ...)
; compiling (DEFCONSTANT +GREY81+ ...)
; compiling (DEFCONSTANT +GRAY82+ ...)
; compiling (DEFCONSTANT +GREY82+ ...)
; compiling (DEFCONSTANT +GRAY83+ ...)
; compiling (DEFCONSTANT +GREY83+ ...)
; compiling (DEFCONSTANT +GRAY84+ ...)
; compiling (DEFCONSTANT +GREY84+ ...)
; compiling (DEFCONSTANT +GRAY85+ ...)
; compiling (DEFCONSTANT +GREY85+ ...)
; compiling (DEFCONSTANT +GRAY86+ ...)
; compiling (DEFCONSTANT +GREY86+ ...)
; compiling (DEFCONSTANT +GRAY87+ ...)
; compiling (DEFCONSTANT +GREY87+ ...)
; compiling (DEFCONSTANT +GRAY88+ ...)
; compiling (DEFCONSTANT +GREY88+ ...)
; compiling (DEFCONSTANT +GRAY89+ ...)
; compiling (DEFCONSTANT +GREY89+ ...)
; compiling (DEFCONSTANT +GRAY90+ ...)
; compiling (DEFCONSTANT +GREY90+ ...)
; compiling (DEFCONSTANT +GRAY91+ ...)
; compiling (DEFCONSTANT +GREY91+ ...)
; compiling (DEFCONSTANT +GRAY92+ ...)
; compiling (DEFCONSTANT +GREY92+ ...)
; compiling (DEFCONSTANT +GRAY93+ ...)
; compiling (DEFCONSTANT +GREY93+ ...)
; compiling (DEFCONSTANT +GRAY94+ ...)
; compiling (DEFCONSTANT +GREY94+ ...)
; compiling (DEFCONSTANT +GRAY95+ ...)
; compiling (DEFCONSTANT +GREY95+ ...)
; compiling (DEFCONSTANT +GRAY96+ ...)
; compiling (DEFCONSTANT +GREY96+ ...)
; compiling (DEFCONSTANT +GRAY97+ ...)
; compiling (DEFCONSTANT +GREY97+ ...)
; compiling (DEFCONSTANT +GRAY98+ ...)
; compiling (DEFCONSTANT +GREY98+ ...)
; compiling (DEFCONSTANT +GRAY99+ ...)
; compiling (DEFCONSTANT +GREY99+ ...)
; compiling (DEFCONSTANT +GRAY100+ ...)
; compiling (DEFCONSTANT +GREY100+ ...)
; compiling (DEFCONSTANT +DARK-GREY+ ...)
; compiling (DEFCONSTANT +DARKGREY+ ...)
; compiling (DEFCONSTANT +DARK-GRAY+ ...)
; compiling (DEFCONSTANT +DARKGRAY+ ...)
; compiling (DEFCONSTANT +DARK-BLUE+ ...)
; compiling (DEFCONSTANT +DARKBLUE+ ...)
; compiling (DEFCONSTANT +DARK-CYAN+ ...)
; compiling (DEFCONSTANT +DARKCYAN+ ...)
; compiling (DEFCONSTANT +DARK-MAGENTA+ ...)
; compiling (DEFCONSTANT +DARKMAGENTA+ ...)
; compiling (DEFCONSTANT +DARK-RED+ ...)
; compiling (DEFCONSTANT +DARKRED+ ...)
; compiling (DEFCONSTANT +LIGHT-GREEN+ ...)
; compiling (DEFCONSTANT +LIGHTGREEN+ ...)
; compiling (DEFCONSTANT +CONTRASTING-COLORS+ ...)

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/mcclim-0.9.2/X11-colors.fasl written
; compilation finished in 0:00:05
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/mcclim-0.9.2/coordinates.lisp" (written 31 MAY 2003 02:18:43 PM):
; compiling (IN-PACKAGE :CLIM-INTERNALS)
; compiling (DEFTYPE COORDINATE ...)
; compiling (DECLAIM (INLINE COORDINATE))
; compiling (DEFUN COORDINATE ...)
; compiling (DECLAIM (INLINE COORDINATE-EPSILON))
; compiling (DEFUN COORDINATE-EPSILON ...)
; compiling (DECLAIM (INLINE COORDINATE=))
; compiling (DEFUN COORDINATE= ...)
; compiling (DECLAIM (INLINE COORDINATE<=))
; compiling (DEFUN COORDINATE<= ...)
; compiling (DECLAIM (INLINE COORDINATE/=))
; compiling (DEFUN COORDINATE/= ...)

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/mcclim-0.9.2/coordinates.fasl written
; compilation finished in 0:00:00
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/mcclim-0.9.2/setf-star.lisp" (written 18 JAN 2006 09:07:36 AM):
; compiling (IN-PACKAGE :CLIM-INTERNALS)
; compiling (DEFUN SETF-NAME-P ...)
; compiling (DEFUN MAKE-SETF*-GFN-NAME ...)
; compiling (DEFMACRO DEFGENERIC* ...)
; compiling (DEFMACRO DEFMETHOD* ...)

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/mcclim-0.9.2/setf-star.fasl written
; compilation finished in 0:00:00
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/mcclim-0.9.2/transforms.lisp" (written 10 MAR 2006 04:58:13 PM):
; compiling (IN-PACKAGE :CLIM-INTERNALS)
; compiling (DEFCLASS STANDARD-TRANSFORMATION ...)
; compiling (DEFCLASS STANDARD-IDENTITY-TRANSFORMATION ...)
; compiling (DEFPARAMETER +IDENTITY-TRANSFORMATION+ ...)
; compiling (DEFCLASS STANDARD-TRANSLATION ...)
; compiling (DEFCLASS CACHED-INVERSE-TRANSFORMATION-MIXIN ...)
; compiling (DEFCLASS STANDARD-HAIRY-TRANSFORMATION ...)
; compiling (DEFMETHOD PRINT-OBJECT ...)
; compiling (DEFUN MAKE-TRANSFORMATION ...)
; compiling (DEFGENERIC GET-TRANSFORMATION ...)
; compiling (DEFMETHOD GET-TRANSFORMATION ...)
; compiling (DEFMETHOD GET-TRANSFORMATION ...)
; compiling (DEFMETHOD GET-TRANSFORMATION ...)
; compiling (DEFUN MAKE-TRANSLATION-TRANSFORMATION ...)
; compiling (DEFUN MAKE-ROTATION-TRANSFORMATION ...)
; compiling (DEFUN MAKE-ROTATION-TRANSFORMATION* ...)
; compiling (DEFUN MAKE-SCALING-TRANSFORMATION ...)
; compiling (DEFUN MAKE-SCALING-TRANSFORMATION* ...)
; compiling (DEFUN MAKE-REFLECTION-TRANSFORMATION ...)
; compiling (DEFUN MAKE-REFLECTION-TRANSFORMATION* ...)
; compiling (DEFUN MAKE-3-POINT-TRANSFORMATION ...)
; compiling (DEFUN MAKE-3-POINT-TRANSFORMATION* ...)
; compiling (DEFINE-CONDITION TRANSFORMATION-ERROR ...)
; compiling (DEFINE-CONDITION TRANSFORMATION-UNDERSPECIFIED ...)
; compiling (DEFINE-CONDITION REFLECTION-UNDERSPECIFIED ...)
; compiling (DEFINE-CONDITION SINGULAR-TRANSFORMATION ...)
; compiling (DEFINE-CONDITION RECTANGLE-TRANSFORMATION-ERROR ...)
; compiling (DEFMETHOD TRANSFORMATION-EQUAL ...)
; compiling (DEFMETHOD IDENTITY-TRANSFORMATION-P ...)
; compiling (DEFMETHOD IDENTITY-TRANSFORMATION-P ...)
; compiling (DEFMETHOD TRANSLATION-TRANSFORMATION-P ...)
; compiling (DEFMETHOD TRANSLATION-TRANSFORMATION-P ...)
; compiling (DEFMETHOD TRANSLATION-TRANSFORMATION-P ...)
; compiling (DEFUN TRANSFORMATION-DETERMINANT ...)
; compiling (DEFMETHOD INVERTIBLE-TRANSFORMATION-P ...)
; compiling (DEFMETHOD REFLECTION-TRANSFORMATION-P ...)
; compiling (DEFMETHOD RIGID-TRANSFORMATION-P ...)
; compiling (DEFMETHOD EVEN-SCALING-TRANSFORMATION-P ...)
; compiling (DEFMETHOD SCALING-TRANSFORMATION-P ...)
; compiling (DEFMETHOD RECTILINEAR-TRANSFORMATION-P ...)
; compiling (DEFMETHOD Y-INVERTING-TRANSFORMATION-P ...)
; compiling (DEFMETHOD COMPOSE-TRANSFORMATIONS ...)
; compiling (DEFMETHOD INVERT-TRANSFORMATION ...)
; compiling (DEFMETHOD INVERT-TRANSFORMATION ...)
; compiling (DEFUN COMPOSE-TRANSLATION-WITH-TRANSFORMATION ...)
; compiling (DEFUN COMPOSE-SCALING-WITH-TRANSFORMATION ...)
; compiling (DEFUN COMPOSE-ROTATION-WITH-TRANSFORMATION ...)
; compiling (DEFUN COMPOSE-TRANSFORMATION-WITH-TRANSLATION ...)
; compiling (DEFUN COMPOSE-TRANSFORMATION-WITH-SCALING ...)
; compiling (DEFUN COMPOSE-TRANSFORMATION-WITH-ROTATION ...)
; compiling (DEFMACRO WITH-TRANSLATION ...)
; compiling (DEFMACRO WITH-SCALING ...)
; compiling (DEFMACRO WITH-ROTATION ...)
; compiling (DEFMACRO WITH-IDENTITY-TRANSFORMATION ...)
; compiling (DEFMACRO WITH-LOCAL-COORDINATES ...)
; compiling (DEFMACRO WITH-FIRST-QUADRANT-COORDINATES ...)
; compiling (DEFMETHOD UNTRANSFORM-REGION ...)
; compiling (DEFMETHOD TRANSFORM-POSITION ...)
; compiling (DEFMETHOD UNTRANSFORM-POSITION ...)
; compiling (DEFMETHOD TRANSFORM-DISTANCE ...)
; compiling (DEFMETHOD UNTRANSFORM-DISTANCE ...)
; compiling (DEFUN TRANSFORM-POSITIONS ...)
; compiling (DEFUN TRANSFORM-POSITION-SEQUENCE ...)
; compiling (DEFMETHOD TRANSFORM-RECTANGLE* ...)
; compiling (DEFMETHOD UNTRANSFORM-RECTANGLE* ...)
; compiling (DEFMETHOD TRANSFORMATION-TRANSFORMATOR ...)
; compiling (DEFMETHOD TRANSFORMATION-TRANSFORMATOR ...)
; compiling (DEFUN ATAN* ...)
; compiling (DEFUN CORRECT-ANGLE ...)
; compiling (DEFUN TRANSFORM-ANGLE ...)
; compiling (DEFUN UNTRANSFORM-ANGLE ...)
; compiling (DEFMETHOD COMPOSE-TRANSFORMATIONS ...)
; compiling (DEFMETHOD COMPOSE-TRANSFORMATIONS ...)
; compiling (DEFMETHOD COMPOSE-TRANSFORMATIONS ...)
; compiling (DEFMETHOD INVERT-TRANSFORMATION ...)
; compiling (DEFMETHOD INVERT-TRANSFORMATION ...)
; compiling (DEFMETHOD TRANSFORM-POSITION ...)
; compiling (DEFMETHOD TRANSFORM-POSITION ...)
; compiling (DEFMETHOD TRANSFORM-REGION ...)
; compiling (DEFMETHOD RECTILINEAR-TRANSFORMATION-P ...)
; compiling (DEFMETHOD RECTILINEAR-TRANSFORMATION-P ...)
; compiling (DEFMETHOD SCALING-TRANSFORMATION-P ...)
; compiling (DEFMETHOD SCALING-TRANSFORMATION-P ...)
; compiling (DEFMETHOD TRANSFORMATION-EQUAL ...)
; compiling (DEFMETHOD TRANSFORMATION-EQUAL ...)
; compiling (DEFMETHOD TRANSFORMATION-EQUAL ...)
; compiling (DEFMETHOD TRANSFORMATION-EQUAL ...)
; compiling (DEFMETHOD TRANSFORMATION-EQUAL ...)
; compiling (DEFMETHOD TRANSFORMATION-EQUAL ...)

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/mcclim-0.9.2/transforms.fasl written
; compilation finished in 0:00:08
STYLE-WARNING: implicitly creating new generic function TRANSFORMATION-EQUAL
STYLE-WARNING:
   implicitly creating new generic function IDENTITY-TRANSFORMATION-P
STYLE-WARNING:
   implicitly creating new generic function TRANSLATION-TRANSFORMATION-P
STYLE-WARNING:
   implicitly creating new generic function INVERTIBLE-TRANSFORMATION-P
STYLE-WARNING:
   implicitly creating new generic function REFLECTION-TRANSFORMATION-P
STYLE-WARNING: implicitly creating new generic function RIGID-TRANSFORMATION-P
STYLE-WARNING:
   implicitly creating new generic function EVEN-SCALING-TRANSFORMATION-P
STYLE-WARNING: implicitly creating new generic function SCALING-TRANSFORMATION-P
STYLE-WARNING:
   implicitly creating new generic function RECTILINEAR-TRANSFORMATION-P
STYLE-WARNING:
   implicitly creating new generic function Y-INVERTING-TRANSFORMATION-P
STYLE-WARNING:
   implicitly creating new generic function TRANSFORMATION-TRANSFORMATOR
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/mcclim-0.9.2/regions.lisp" (written 10 MAR 2006 04:58:13 PM):
; compiling (IN-PACKAGE :CLIM-INTERNALS)
; compiling (DEFCLASS NOWHERE-REGION ...)
; compiling (DEFCLASS EVERYWHERE-REGION ...)
; compiling (DEFVAR +EVERYWHERE+ ...)
; compiling (DEFVAR +NOWHERE+ ...)
; compiling (DEFGENERIC REGION-EQUAL ...)
; compiling (DEFGENERIC REGION-CONTAINS-REGION-P ...)
; compiling (DEFGENERIC REGION-CONTAINS-POSITION-P ...)
; compiling (DEFGENERIC REGION-INTERSECTS-REGION-P ...)
; compiling (DEFCLASS STANDARD-REGION-UNION ...)
; compiling (DEFCLASS STANDARD-REGION-INTERSECTION ...)
; compiling (DEFCLASS STANDARD-REGION-DIFFERENCE ...)
; compiling (DEFGENERIC REGION-SET-REGIONS ...)
; compiling (DEFGENERIC MAP-OVER-REGION-SET-REGIONS ...)
; compiling (DEFGENERIC REGION-UNION ...)
; compiling (DEFGENERIC REGION-INTERSECTION ...)
; compiling (DEFGENERIC REGION-DIFFERENCE ...)
; compiling (DEFCLASS STANDARD-POINT ...)
; compiling (DEFUN MAKE-POINT ...)
; compiling (DEFMETHOD PRINT-OBJECT ...)
; compiling (DEFGENERIC POINT-POSITION ...)
; compiling (DEFMETHOD POINT-POSITION ...)
; compiling (DEFMETHOD POINT-X ...)
; compiling (DEFMETHOD POINT-Y ...)
; compiling (DEFMETHOD TRANSFORM-REGION ...)
; compiling (DEFMETHOD REGION-CONTAINS-POSITION-P ...)
; compiling (DEFGENERIC POLYGON-POINTS ...)
; compiling (DEFGENERIC MAP-OVER-POLYGON-COORDINATES ...)
; compiling (DEFGENERIC MAP-OVER-POLYGON-SEGMENTS ...)
; compiling (DEFGENERIC POLYLINE-CLOSED ...)
; compiling (DEFCLASS STANDARD-POLYLINE ...)
; compiling (DEFCLASS STANDARD-POLYGON ...)
; compiling (DEFUN COORD-SEQ->POINT-SEQ ...)
; compiling (DEFUN MAKE-POLYLINE ...)
; compiling (DEFUN MAKE-POLYLINE* ...)
; compiling (DEFUN MAKE-POLYGON ...)
; compiling (DEFUN MAKE-POLYGON* ...)
; compiling (DEFMETHOD POLYGON-POINTS ...)
; compiling (DEFMETHOD MAP-OVER-POLYGON-COORDINATES ...)
; compiling (DEFMETHOD MAP-OVER-POLYGON-SEGMENTS ...)
; compiling (DEFMETHOD POLYGON-POINTS ...)
; compiling (DEFMETHOD MAP-OVER-POLYGON-COORDINATES ...)
; compiling (DEFMETHOD MAP-OVER-POLYGON-SEGMENTS ...)
; compiling (DEFMETHOD POLYLINE-CLOSED ...)
; compiling (DEFMETHOD TRANSFORM-REGION ...)
; compiling (DEFMETHOD TRANSFORM-REGION ...)
; compiling (DEFMETHOD REGION-CONTAINS-POSITION-P ...)
; compiling (DEFUN LINE-CONTAINS-POINT-P* ...)
; compiling (DEFUN LINE-CONTAINS-POINT-P** ...)
; compiling (DEFCLASS STANDARD-LINE ...)
; compiling (DEFUN MAKE-LINE ...)
; compiling (DEFUN MAKE-LINE* ...)
; compiling (DEFGENERIC LINE-START-POINT* ...)
; compiling (DEFGENERIC LINE-END-POINT* ...)
; compiling (DEFMETHOD LINE-START-POINT* ...)
; compiling (DEFMETHOD LINE-END-POINT* ...)
; compiling (DEFMETHOD LINE-START-POINT ...)
; compiling (DEFMETHOD LINE-END-POINT ...)
; compiling (DEFMETHOD POLYGON-POINTS ...)
; compiling (DEFMETHOD MAP-OVER-POLYGON-COORDINATES ...)
; compiling (DEFMETHOD MAP-OVER-POLYGON-SEGMENTS ...)
; compiling (DEFMETHOD POLYLINE-CLOSED ...)
; compiling (DEFMETHOD TRANSFORM-REGION ...)
; compiling (DEFMETHOD REGION-CONTAINS-POSITION-P ...)
; compiling (DEFMETHOD PRINT-OBJECT ...)
; compiling (DEFCLASS STANDARD-RECTANGLE ...)
; compiling (DEFMETHOD INITIALIZE-INSTANCE ...)
; compiling (DEFMACRO WITH-STANDARD-RECTANGLE ...)
; compiling (DEFMACRO WITH-STANDARD-RECTANGLE* ...)
; compiling (DEFUN MAKE-RECTANGLE ...)
; compiling (DEFUN MAKE-RECTANGLE* ...)
; compiling (DEFMETHOD RECTANGLE-EDGES* ...)
; compiling (DEFGENERIC* (SETF RECTANGLE-EDGES*) ...)
; compiling (DEFMETHOD* (SETF RECTANGLE-EDGES*) ...)
; compiling (DEFMETHOD RECTANGLE-MIN-POINT ...)
; compiling (DEFMETHOD RECTANGLE-MIN-POINT ...)
; compiling (DEFMETHOD RECTANGLE-MAX-POINT ...)
; compiling (DEFMETHOD RECTANGLE-MAX-POINT ...)
; compiling (DEFMETHOD RECTANGLE-MIN-X ...)
; compiling (DEFMETHOD RECTANGLE-MIN-X ...)
; compiling (DEFMETHOD RECTANGLE-MIN-Y ...)
; compiling (DEFMETHOD RECTANGLE-MIN-Y ...)
; compiling (DEFMETHOD RECTANGLE-MAX-X ...)
; compiling (DEFMETHOD RECTANGLE-MAX-X ...)
; compiling (DEFMETHOD RECTANGLE-MAX-Y ...)
; compiling (DEFMETHOD RECTANGLE-MAX-Y ...)
; compiling (DEFMETHOD RECTANGLE-WIDTH ...)
; compiling (DEFMETHOD RECTANGLE-WIDTH ...)
; compiling (DEFMETHOD RECTANGLE-HEIGHT ...)
; compiling (DEFMETHOD RECTANGLE-HEIGHT ...)
; compiling (DEFMETHOD RECTANGLE-SIZE ...)
; compiling (DEFMETHOD RECTANGLE-SIZE ...)
; compiling (DEFMETHOD POLYGON-POINTS ...)
; compiling (DEFMETHOD MAP-OVER-POLYGON-COORDINATES ...)
; compiling (DEFMETHOD MAP-OVER-POLYGON-SEGMENTS ...)
; compiling (DEFMETHOD TRANSFORM-REGION ...)
; compiling (DEFMETHOD REGION-CONTAINS-POSITION-P ...)
; compiling (DEFCLASS ELLIPTICAL-THING ...)
; compiling (DEFMETHOD PRINT-OBJECT ...)
; compiling (DEFCLASS STANDARD-ELLIPSE ...)
; compiling (DEFCLASS STANDARD-ELLIPTICAL-ARC ...)
; compiling (DEFUN MAKE-ELLIPSE ...)
; compiling (DEFUN MAKE-ELLIPSE* ...)
; compiling (DEFUN MAKE-ELLIPTICAL-ARC ...)
; compiling (DEFUN MAKE-ELLIPTICAL-ARC* ...)
; compiling (DEFUN MAKE-ELLIPICAL-THING ...)
; compiling (DEFMETHOD TRANSFORM-REGION ...)
; compiling (DEFMETHOD REGION-CONTAINS-POSITION-P ...)
; compiling (DEFMETHOD BOUNDING-RECTANGLE* ...)
; compiling (DEFUN INTERSECTION-LINE/UNIT-CIRCLE ...)
; compiling (DEFMETHOD REGION-INTERSECTION ...)
; compiling (DEFMETHOD REGION-INTERSECTION ...)
; compiling (DEFMETHOD ELLIPSE-CENTER-POINT* ...)
; compiling (DEFMETHOD ELLIPSE-CENTER-POINT ...)
; compiling (DEFMETHOD ELLIPSE-RADII ...)
; compiling (DEFMETHOD ELLIPSE-START-ANGLE ...)
; compiling (DEFMETHOD ELLIPSE-END-ANGLE ...)
; compiling (DEFUN ELLIPSE-COEFFICIENTS ...)
; compiling (DEFUN ELLIPSE-NORMAL-RADII* ...)
; compiling (DEFUN INTERSECTION-ELLIPSE/ELLIPSE ...)
; compiling (DEFUN INTERSECTION-ELLIPSE/UNIT-CIRCLE ...)
; compiling (DEFUN ELLIPSE-EQUATION ...)
; compiling (DEFUN ELLI-POLYNOM ...)
; compiling (DEFUN NEWTON-ZIEL-GERADE ...)
; compiling (DEFUN SOLVE-P1 ...)
; compiling (DEFUN SOLVE-P2 ...)
; compiling (DEFUN MAYBE-SOLVE-POLYNOM-TRIVIALLY ...)
; compiling (DEFUN CANONIZE-POLYNOM ...)
; compiling (DEFUN NEWTON-ITERATION ...)
; compiling (DEFUN HORNER-SCHEMA ...)
; compiling (DEFMETHOD REGION-UNION ...)
; compiling (DEFMETHOD REGION-INTERSECTION ...)
; compiling (DEFMETHOD REGION-EQUAL ...)
; compiling (DEFCLASS STANDARD-RECTANGLE-SET ...)
; compiling (DEFMETHOD MAP-OVER-REGION-SET-REGIONS ...)
; compiling (DEFMETHOD REGION-SET-REGIONS ...)
; compiling (DEFUN MAKE-STANDARD-RECTANGLE-SET ...)
; compiling (DEFMETHOD REGION-UNION ...)
; compiling (DEFMETHOD REGION-INTERSECTION ...)
; compiling (DEFMETHOD REGION-DIFFERENCE ...)
; compiling (DEFMETHOD REGION-UNION ...)
; compiling (DEFMETHOD REGION-UNION ...)
; compiling (DEFMETHOD REGION-DIFFERENCE ...)
; compiling (DEFMETHOD REGION-DIFFERENCE ...)
; compiling (DEFMETHOD REGION-INTERSECTION ...)
; compiling (DEFMETHOD REGION-INTERSECTION ...)
; compiling (DEFMETHOD REGION-UNION ...)
; compiling (DEFMETHOD REGION-DIFFERENCE ...)
; compiling (DEFMETHOD REGION-INTERSECTION ...)
; compiling (DEFMETHOD REGION-INTERSECTION ...)
; compiling (DEFMETHOD REGION-EQUAL ...)
; compiling (DEFMETHOD REGION-CONTAINS-POSITION-P ...)
; compiling (DEFMETHOD REGION-CONTAINS-REGION-P ...)
; compiling (DEFUN ISUM-UNION* ...)
; compiling (DEFUN ISUM-DIFFERENCE* ...)
; compiling (DEFUN ISUM-INTERSECTION* ...)
; compiling (DEFUN ISUM-OP ...)
; compiling (DEFUN BANDS-OP ...)
; compiling (DEFUN CANON-EMPTY-BANDS ...)
; compiling (DEFUN BANDS-UNION ...)
; compiling (DEFUN BANDS-INTERSECTION ...)
; compiling (DEFUN BANDS-DIFFERENCE ...)
; compiling (DEFUN RECTANGLE->XY-BANDS* ...)
; compiling (DEFUN RECTANGLE->YX-BANDS* ...)
; compiling (DEFUN XY-BANDS->YX-BANDS ...)
; compiling (DEFUN MAP-OVER-BANDS-RECTANGLES ...)
; compiling (DEFUN MAP-OVER-BANDS ...)
; compiling (DEFUN ISUM-MEMBER ...)
; compiling (DEFUN RECTANGLE->STANDARD-RECTANGLE-SET ...)
; compiling (DEFMETHOD TRANSFORM-REGION ...)
; compiling (DEFCLASS STANDARD-BOUNDING-RECTANGLE ...)
; compiling (DEFMETHOD REGION-EQUAL ...)
; compiling (DEFMETHOD REGION-EQUAL ...)
; compiling (DEFMETHOD REGION-EQUAL ...)
; compiling (DEFMETHOD REGION-EQUAL ...)
; compiling (DEFMETHOD REGION-EQUAL ...)
; compiling (DEFMETHOD REGION-EQUAL ...)
; compiling (DEFMETHOD REGION-EQUAL ...)
; compiling (DEFMETHOD REGION-EQUAL ...)
; compiling (DEFMETHOD REGION-EQUAL ...)
; compiling (DEFMETHOD TRANSFORM-REGION ...)
; compiling (DEFMETHOD TRANSFORM-REGION ...)
; compiling (DEFMETHOD REGION-CONTAINS-POSITION-P ...)
; compiling (DEFMETHOD REGION-CONTAINS-POSITION-P ...)
; compiling (DEFMETHOD REGION-CONTAINS-POSITION-P ...)
; compiling (DEFMETHOD REGION-CONTAINS-POSITION-P ...)
; compiling (DEFMETHOD REGION-CONTAINS-POSITION-P ...)
; compiling (DEFMETHOD REGION-UNION ...)
; compiling (DEFMETHOD REGION-UNION ...)
; compiling (DEFMETHOD REGION-UNION ...)
; compiling (DEFMETHOD REGION-UNION ...)
; compiling (DEFMETHOD REGION-INTERSECTION ...)
; compiling (DEFMETHOD REGION-INTERSECTION ...)
; compiling (DEFMETHOD REGION-INTERSECTION ...)
; compiling (DEFMETHOD REGION-INTERSECTION ...)
; compiling (DEFMETHOD REGION-DIFFERENCE ...)
; compiling (DEFMETHOD REGION-DIFFERENCE ...)
; compiling (DEFMETHOD REGION-DIFFERENCE ...)
; compiling (DEFMETHOD REGION-UNION ...)
; compiling (DEFMETHOD REGION-UNION ...)
; compiling (DEFMETHOD REGION-UNION ...)
; compiling (DEFMETHOD REGION-UNION ...)
; compiling (DEFMETHOD REGION-UNION ...)
; compiling (DEFMETHOD REGION-UNION ...)
; compiling (DEFMETHOD TRANSFORM-REGION ...)
; compiling (DEFMETHOD TRANSFORM-REGION ...)
; compiling (DEFMETHOD TRANSFORM-REGION ...)
; compiling (DEFMETHOD REGION-SET-REGIONS ...)
; compiling (DEFMETHOD REGION-SET-REGIONS ...)
; compiling (DEFMETHOD REGION-SET-REGIONS ...)
; compiling (DEFMETHOD REGION-SET-REGIONS ...)
; compiling (DEFMETHOD MAP-OVER-REGION-SET-REGIONS ...)
; compiling (DEFMETHOD MAP-OVER-REGION-SET-REGIONS ...)
; compiling (DEFMETHOD MAP-OVER-REGION-SET-REGIONS ...)
; compiling (DEFMETHOD MAP-OVER-REGION-SET-REGIONS ...)
; compiling (DEFUN LINE-INTERSECTION* ...)
; compiling (DEFMETHOD REGION-INTERSECTION ...)
; compiling (DEFMETHOD REGION-INTERSECTION ...)
; compiling (DEFMETHOD REGION-DIFFERENCE ...)
; compiling (DEFMETHOD REGION-DIFFERENCE ...)
; compiling (DEFMETHOD REGION-INTERSECTION ...)
; compiling (DEFMETHOD REGION-INTERSECTION ...)
; compiling (DEFMETHOD REGION-INTERSECTION ...)
; compiling (DEFMETHOD REGION-INTERSECTION ...)
; compiling (DEFMETHOD REGION-INTERSECTION ...)
; compiling (DEFMETHOD REGION-INTERSECTION ...)
; compiling (DEFMETHOD REGION-INTERSECTION ...)
; compiling (DEFMETHOD REGION-INTERSECTION ...)
; compiling (DEFMETHOD REGION-INTERSECTION ...)
; compiling (DEFMETHOD REGION-INTERSECTION ...)
; compiling (DEFMETHOD REGION-INTERSECTION ...)
; compiling (DEFMETHOD REGION-INTERSECTION ...)
; compiling (DEFMETHOD REGION-DIFFERENCE ...)
; compiling (DEFMETHOD REGION-DIFFERENCE ...)
; compiling (DEFMETHOD REGION-DIFFERENCE ...)
; compiling (DEFMETHOD REGION-DIFFERENCE ...)
; compiling (DEFMETHOD REGION-DIFFERENCE ...)
; compiling (DEFMETHOD REGION-DIFFERENCE ...)
; compiling (DEFMETHOD REGION-DIFFERENCE ...)
; compiling (DEFMETHOD REGION-DIFFERENCE ...)
; compiling (DEFMETHOD REGION-DIFFERENCE ...)
; compiling (DEFMETHOD REGION-DIFFERENCE ...)
; compiling (DEFMETHOD REGION-DIFFERENCE ...)
; compiling (DEFMETHOD REGION-DIFFERENCE ...)
; compiling (DEFMETHOD REGION-DIFFERENCE ...)
; compiling (DEFMETHOD REGION-DIFFERENCE ...)
; compiling (DEFSTRUCT (PG-EDGE #) ...)
; compiling (DEFSTRUCT PG-SPLITTER ...)
; compiling (DEFUN MAKE-PG-EDGE ...)
; compiling (DEFMETHOD REGION-INTERSECTION ...)
; compiling (DEFMETHOD REGION-UNION ...)
; compiling (DEFMETHOD REGION-DIFFERENCE ...)
; compiling (DEFMETHOD REGION-INTERSECTION ...)
; compiling (DEFMETHOD REGION-UNION ...)
; compiling (DEFMETHOD REGION-DIFFERENCE ...)
; compiling (DEFMETHOD REGION-INTERSECTION ...)
; compiling (DEFMETHOD REGION-UNION ...)
; compiling (DEFMETHOD REGION-DIFFERENCE ...)
; compiling (DEFUN POLYGON-OP ...)
; compiling (DEFUN OVER-SWEEP-BANDS ...)
; compiling (DEFUN POLYGON->PG-EDGES ...)
; compiling (DEFUN RESTRICT-LINE-ON-Y-INTERVAL* ...)
; compiling (DEFUN PG-SPLITTER->POLYGON ...)
; compiling (DEFUN CLEAN-UP-POINT-SEQUENCE ...)
; compiling (DEFUN COLINEAR-P ...)
; compiling (DEFUN LINE-INTERSECTION** ...)
; compiling (DEFMETHOD REGION-UNION ...)
; compiling (DEFMETHOD REGION-UNION ...)
; compiling (DEFMETHOD REGION-UNION ...)
; compiling (DEFMETHOD REGION-UNION ...)
; compiling (DEFMETHOD REGION-UNION ...)
; compiling (DEFMETHOD REGION-UNION ...)
; compiling (DEFMETHOD REGION-UNION ...)
; compiling (DEFMETHOD REGION-UNION ...)
; compiling (DEFMETHOD REGION-UNION ...)
; compiling (DEFMETHOD REGION-UNION ...)
; compiling (DEFUN GERADEN-SCHNITT/PRIM ...)
; compiling (DEFUN GERADEN-GLEICHUNG ...)
; compiling (DEFUN POSITION->GERADEN-FKTN-PARAMETER ...)
; compiling (DEFUN MAP-OVER-SCHNITT-GERADE/POLYGON ...)
; compiling (DEFUN SCHNITT-GERADE/POLYGON-PRIM ...)
; compiling (DEFUN SCHNITT-LINE/POLYGON ...)
; compiling (DEFMETHOD REGION-CONTAINS-POSITION-P ...)
; compiling (DEFMETHOD REGION-INTERSECTION ...)
; compiling (DEFMETHOD REGION-INTERSECTION ...)
; compiling (DEFMETHOD REGION-INTERSECTION ...)
; compiling (DEFMETHOD REGION-INTERSECTION ...)
; compiling (DEFMETHOD REGION-DIFFERENCE ...)
; compiling (DEFMETHOD REGION-DIFFERENCE ...)
; compiling (DEFUN DIFFERENZ-LINE/POLYGON ...)
; compiling (DEFMETHOD REGION-DIFFERENCE ...)
; compiling (DEFMETHOD REGION-UNION ...)
; compiling (DEFMETHOD REGION-UNION ...)
; compiling (DEFMETHOD REGION-UNION ...)
; compiling (DEFMETHOD REGION-UNION ...)
; compiling (DEFMETHOD REGION-UNION ...)
; compiling (DEFMETHOD REGION-UNION ...)
; compiling (DEFUN RECTANGLE-SET->POLYGON-UNION ...)
; compiling (DEFMETHOD REGION-UNION ...)
; compiling (DEFMETHOD REGION-UNION ...)
; compiling (DEFMETHOD REGION-EQUAL ...)
; compiling (DEFMETHOD REGION-UNION ...)
; compiling (DEFMETHOD REGION-EXCLUSIVE-OR ...)
; compiling (DEFMETHOD REGION-CONTAINS-REGION-P ...)
; compiling (DEFMETHOD REGION-CONTAINS-REGION-P ...)
; compiling (DEFMETHOD REGION-CONTAINS-REGION-P ...)
; compiling (DEFMETHOD REGION-CONTAINS-REGION-P ...)
; compiling (DEFMETHOD REGION-CONTAINS-REGION-P ...)
; compiling (DEFMETHOD REGION-CONTAINS-REGION-P ...)
; compiling (DEFMETHOD REGION-EQUAL ...)
; compiling (DEFMETHOD REGION-INTERSECTS-REGION-P ...)
; compiling (DEFMETHOD REGION-CONTAINS-REGION-P ...)
; compiling (DEFMETHOD BOUNDING-RECTANGLE* ...)
; compiling (DEFMETHOD BOUNDING-RECTANGLE* ...)
; compiling (DEFMETHOD BOUNDING-RECTANGLE* ...)
; compiling (DEFMETHOD BOUNDING-RECTANGLE* ...)
; compiling (DEFMETHOD BOUNDING-RECTANGLE* ...)
; compiling (DEFMETHOD BOUNDING-RECTANGLE* ...)
; compiling (DEFMETHOD BOUNDING-RECTANGLE* ...)
; compiling (DEFMETHOD BOUNDING-RECTANGLE* ...)
; compiling (DEFMETHOD BOUNDING-RECTANGLE* ...)
; compiling (DEFUN MAKE-BOUNDING-RECTANGLE ...)
; compiling (DEFMETHOD BOUNDING-RECTANGLE ...)
; compiling (DEFMETHOD BOUNDING-RECTANGLE ...)
; compiling (DEFMACRO WITH-BOUNDING-RECTANGLE* ...)
; compiling (DEFMETHOD BOUNDING-RECTANGLE-POSITION ...)
; compiling (DEFMETHOD SET-BOUNDING-RECTANGLE-POSITION ...)
; compiling (DEFMETHOD BOUNDING-RECTANGLE-MIN-X ...)
; compiling (DEFMETHOD BOUNDING-RECTANGLE-MIN-Y ...)
; compiling (DEFMETHOD BOUNDING-RECTANGLE-MAX-X ...)
; compiling (DEFMETHOD BOUNDING-RECTANGLE-MAX-Y ...)
; compiling (DEFMETHOD BOUNDING-RECTANGLE-WIDTH ...)
; compiling (DEFMETHOD BOUNDING-RECTANGLE-HEIGHT ...)
; compiling (DEFMETHOD BOUNDING-RECTANGLE-SIZE ...)
; compiling (DEFMETHOD PRINT-OBJECT ...)
; compiling (DEFMETHOD REGION-INTERSECTS-REGION-P ...)
; compiling (DEFMETHOD REGION-INTERSECTS-REGION-P ...)

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/mcclim-0.9.2/regions.fasl written
; compilation finished in 0:00:34
STYLE-WARNING: implicitly creating new generic function LINE-START-POINT
STYLE-WARNING: implicitly creating new generic function LINE-END-POINT
STYLE-WARNING: implicitly creating new generic function BOUNDING-RECTANGLE*
STYLE-WARNING: implicitly creating new generic function ELLIPSE-CENTER-POINT*
STYLE-WARNING: implicitly creating new generic function ELLIPSE-CENTER-POINT
STYLE-WARNING: implicitly creating new generic function ELLIPSE-RADII
STYLE-WARNING: implicitly creating new generic function ELLIPSE-START-ANGLE
STYLE-WARNING: implicitly creating new generic function ELLIPSE-END-ANGLE
STYLE-WARNING: implicitly creating new generic function REGION-EXCLUSIVE-OR
STYLE-WARNING: implicitly creating new generic function BOUNDING-RECTANGLE
STYLE-WARNING:
   implicitly creating new generic function BOUNDING-RECTANGLE-POSITION
STYLE-WARNING:
   implicitly creating new generic function SET-BOUNDING-RECTANGLE-POSITION
STYLE-WARNING: implicitly creating new generic function BOUNDING-RECTANGLE-MIN-X
STYLE-WARNING: implicitly creating new generic function BOUNDING-RECTANGLE-MIN-Y
STYLE-WARNING: implicitly creating new generic function BOUNDING-RECTANGLE-MAX-X
STYLE-WARNING: implicitly creating new generic function BOUNDING-RECTANGLE-MAX-Y
STYLE-WARNING: implicitly creating new generic function BOUNDING-RECTANGLE-WIDTH
STYLE-WARNING:
   implicitly creating new generic function BOUNDING-RECTANGLE-HEIGHT
STYLE-WARNING: implicitly creating new generic function BOUNDING-RECTANGLE-SIZE
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/mcclim-0.9.2/sheets.lisp" (written 10 MAR 2006 04:58:13 PM):
; compiling (IN-PACKAGE :CLIM-INTERNALS)
; compiling (DEFGENERIC SHEET-PARENT ...)
; compiling (DEFGENERIC SHEET-CHILDREN ...)
; compiling (DEFGENERIC SHEET-ADOPT-CHILD ...)
; compiling (DEFGENERIC SHEET-DISOWN-CHILD ...)
; compiling (DEFGENERIC SHEET-ENABLED-CHILDREN ...)
; compiling (DEFGENERIC SHEET-ANCESTOR-P ...)
; compiling (DEFGENERIC RAISE-SHEET ...)
; compiling (DEFGENERIC RAISE-SHEET-INTERNAL ...)
; compiling (DEFGENERIC BURY-SHEET ...)
; compiling (DEFGENERIC BURY-SHEET-INTERNAL ...)
; compiling (DEFGENERIC REORDER-SHEETS ...)
; compiling (DEFGENERIC SHEET-ENABLED-P ...)
; compiling (DEFGENERIC (SETF SHEET-ENABLED-P) ...)
; compiling (DEFGENERIC SHEET-VIEWABLE-P ...)
; compiling (DEFGENERIC SHEET-OCCLUDING-SHEETS ...)
; compiling (DEFGENERIC SHEET-TRANSFORMATION ...)
; compiling (DEFGENERIC (SETF SHEET-TRANSFORMATION) ...)
; compiling (DEFGENERIC SHEET-REGION ...)
; compiling (DEFGENERIC (SETF SHEET-REGION) ...)
; compiling (DEFGENERIC MAP-SHEET-POSITION-TO-PARENT ...)
; compiling (DEFGENERIC MAP-SHEET-POSITION-TO-CHILD ...)
; compiling (DEFGENERIC MAP-SHEET-RECTANGLE*-TO-PARENT ...)
; compiling (DEFGENERIC MAP-SHEET-RECTANGLE*-TO-CHILD ...)
; compiling (DEFGENERIC CHILD-CONTAINING-POSITION ...)
; compiling (DEFGENERIC CHILDREN-OVERLAPPING-REGION ...)
; compiling (DEFGENERIC CHILDREN-OVERLAPPING-RECTANGLE* ...)
; compiling (DEFGENERIC SHEET-DELTA-TRANSFORMATION ...)
; compiling (DEFGENERIC SHEET-ALLOCATED-REGION ...)
; compiling (DEFGENERIC DISPATCH-EVENT ...)
; compiling (DEFGENERIC QUEUE-EVENT ...)
; compiling (DEFGENERIC SCHEDULE-EVENT ...)
; compiling (DEFGENERIC HANDLE-EVENT ...)
; compiling (DEFGENERIC EVENT-READ ...)
; compiling (DEFGENERIC EVENT-READ-NO-HANG ...)
; compiling (DEFGENERIC EVENT-PEEK ...)
; compiling (DEFGENERIC EVENT-UNREAD ...)
; compiling (DEFGENERIC EVENT-LISTEN ...)
; compiling (DEFGENERIC DISPATCH-REPAINT ...)
; compiling (DEFGENERIC NOTE-SHEET-GRAFTED ...)
; compiling (DEFGENERIC NOTE-SHEET-DEGRAFTED ...)
; compiling (DEFGENERIC NOTE-SHEET-ADOPTED ...)
; compiling (DEFGENERIC NOTE-SHEET-DISOWNED ...)
; compiling (DEFGENERIC NOTE-SHEET-ENABLED ...)
; compiling (DEFGENERIC NOTE-SHEET-DISABLED ...)
; compiling (DEFGENERIC NOTE-SHEET-REGION-CHANGED ...)
; compiling (DEFGENERIC NOTE-SHEET-TRANSFORMATION-CHANGED ...)
; compiling (DEFCLASS BASIC-SHEET ...)
; compiling (DEFMETHOD SHEET-PARENT ...)
; compiling (DEFMETHOD SHEET-CHILDREN ...)
; compiling (DEFMETHOD SHEET-ADOPT-CHILD ...)
; compiling (DEFMETHOD SHEET-ADOPT-CHILD ...)
; compiling (DEFINE-CONDITION SHEET-IS-NOT-CHILD ...)
; compiling (DEFMETHOD SHEET-DISOWN-CHILD ...)
; compiling (DEFMETHOD SHEET-DISOWN-CHILD ...)
; compiling (DEFMETHOD SHEET-SIBLINGS ...)
; compiling (DEFMETHOD SHEET-ENABLED-CHILDREN ...)
; compiling (DEFMETHOD SHEET-ANCESTOR-P ...)
; compiling (DEFMETHOD RAISE-SHEET ...)
; compiling (DEFMETHOD BURY-SHEET ...)
; compiling (DEFINE-CONDITION SHEET-ORDERING-UNDERSPECIFIED ...)
; compiling (DEFMETHOD REORDER-SHEETS ...)
; compiling (DEFMETHOD SHEET-VIEWABLE-P ...)
; compiling (DEFMETHOD SHEET-OCCLUDING-SHEETS ...)
; compiling (DEFMETHOD MAP-OVER-SHEETS ...)
; compiling (DEFMETHOD (SETF SHEET-ENABLED-P) ...)
; compiling (DEFMETHOD SHEET-TRANSFORMATION ...)
; compiling (DEFMETHOD (SETF SHEET-TRANSFORMATION) ...)
; compiling (DEFMETHOD MOVE-SHEET ...)
; compiling (DEFMETHOD RESIZE-SHEET ...)
; compiling (DEFMETHOD MOVE-AND-RESIZE-SHEET ...)
; compiling (DEFMETHOD MAP-SHEET-POSITION-TO-PARENT ...)
; compiling (DEFMETHOD MAP-SHEET-POSITION-TO-CHILD ...)
; compiling (DEFMETHOD MAP-SHEET-RECTANGLE*-TO-PARENT ...)
; compiling (DEFMETHOD MAP-SHEET-RECTANGLE*-TO-CHILD ...)
; compiling (DEFMETHOD MAP-OVER-SHEETS-CONTAINING-POSITION ...)
; compiling (DEFMETHOD MAP-OVER-SHEETS-OVERLAPPING-REGION ...)
; compiling (DEFMETHOD CHILD-CONTAINING-POSITION ...)
; compiling (DEFMETHOD CHILDREN-OVERLAPPING-REGION ...)
; compiling (DEFMETHOD CHILDREN-OVERLAPPING-RECTANGLE* ...)
; compiling (DEFMETHOD SHEET-DELTA-TRANSFORMATION ...)
; compiling (DEFINE-CONDITION SHEET-IS-NOT-ANCESTOR ...)
; compiling (DEFMETHOD SHEET-DELTA-TRANSFORMATION ...)
; compiling (DEFMETHOD SHEET-ALLOCATED-REGION ...)
; compiling (DEFMETHOD SHEET-DIRECT-MIRROR ...)
; compiling (DEFMETHOD SHEET-MIRRORED-ANCESTOR ...)
; compiling (DEFMETHOD SHEET-MIRROR ...)
; compiling (DEFMETHOD GRAFT ...)
; compiling (DEFMETHOD NOTE-SHEET-GRAFTED ...)
; compiling (DEFMETHOD NOTE-SHEET-DEGRAFTED ...)
; compiling (DEFMETHOD NOTE-SHEET-ADOPTED ...)
; compiling (DEFMETHOD NOTE-SHEET-DISOWNED ...)
; compiling (DEFMETHOD NOTE-SHEET-ENABLED ...)
; compiling (DEFMETHOD NOTE-SHEET-DISABLED ...)
; compiling (DEFMETHOD NOTE-SHEET-REGION-CHANGED ...)
; compiling (DEFMETHOD NOTE-SHEET-TRANSFORMATION-CHANGED ...)
; compiling (DEFMETHOD SHEET-NATIVE-TRANSFORMATION ...)
; compiling (DEFMETHOD SHEET-NATIVE-REGION ...)
; compiling (DEFMETHOD SHEET-DEVICE-TRANSFORMATION ...)
; compiling (DEFMETHOD SHEET-DEVICE-REGION ...)
; compiling (DEFMETHOD INVALIDATE-CACHED-TRANSFORMATIONS ...)
; compiling (DEFMETHOD INVALIDATE-CACHED-REGIONS ...)
; compiling (DEFMETHOD (SETF SHEET-TRANSFORMATION) ...)
; compiling (DEFMETHOD (SETF SHEET-REGION) ...)
; compiling (DEFMETHOD (SETF SHEET-POINTER-CURSOR) ...)
; compiling (DEFCLASS SHEET-PARENT-MIXIN ...)
; compiling (DEFINE-CONDITION SHEET-ALREADY-HAS-PARENT ...)
; compiling (DEFINE-CONDITION SHEET-IS-ANCESTOR ...)
; compiling (DEFMETHOD SHEET-ADOPT-CHILD ...)
; compiling (DEFMETHOD SHEET-ADOPT-CHILD ...)
; compiling (DEFMETHOD SHEET-DISOWN-CHILD ...)
; compiling (DEFMETHOD RAISE-SHEET ...)
; compiling (DEFMETHOD BURY-SHEET ...)
; compiling (DEFMETHOD GRAFT ...)
; compiling (DEFMETHOD (SETF SHEET-TRANSFORMATION) ...)
; compiling (DEFMETHOD MAP-SHEET-POSITION-TO-PARENT ...)
; compiling (DEFMETHOD MAP-SHEET-POSITION-TO-CHILD ...)
; compiling (DEFMETHOD MAP-SHEET-RECTANGLE*-TO-PARENT ...)
; compiling (DEFMETHOD MAP-SHEET-RECTANGLE*-TO-CHILD ...)
; compiling (DEFCLASS SHEET-LEAF-MIXIN ...)
; compiling (DEFMETHOD SHEET-CHILDREN ...)
; compiling (DEFMETHOD SHEET-ADOPT-CHILD ...)
; compiling (DEFMETHOD SHEET-DISOWN-CHILD ...)
; compiling (DEFCLASS SHEET-SINGLE-CHILD-MIXIN ...)
; compiling (DEFMETHOD SHEET-CHILDREN ...)
; compiling (DEFINE-CONDITION SHEET-SUPPORTS-ONLY-ONE-CHILD ...)
; compiling (DEFMETHOD SHEET-ADOPT-CHILD ...)
; compiling (DEFMETHOD SHEET-ADOPT-CHILD ...)
; compiling (DEFMETHOD SHEET-DISOWN-CHILD ...)
; compiling (DEFMETHOD RAISE-SHEET-INTERNAL ...)
; compiling (DEFMETHOD BURY-SHEET-INTERNAL ...)
; compiling (DEFCLASS SHEET-MULTIPLE-CHILD-MIXIN ...)
; compiling (DEFMETHOD SHEET-ADOPT-CHILD ...)
; compiling (DEFMETHOD SHEET-DISOWN-CHILD ...)
; compiling (DEFMETHOD RAISE-SHEET-INTERNAL ...)
; compiling (DEFMETHOD BURY-SHEET-INTERNAL ...)
; compiling (DEFCLASS SHEET-IDENTITY-TRANSFORMATION-MIXIN ...)
; compiling (DEFMETHOD SHEET-TRANSFORMATION ...)
; compiling (DEFCLASS SHEET-TRANSFORMATION-MIXIN ...)
; compiling (DEFCLASS SHEET-TRANSLATION-TRANSFORMATION-MIXIN ...)
; compiling (DEFMETHOD (SETF SHEET-TRANSFORMATION) ...)
; compiling (DEFCLASS SHEET-Y-INVERTING-TRANSFORMATION-MIXIN ...)
; compiling (DEFMETHOD (SETF SHEET-TRANSFORMATION) ...)
; compiling (DEFCLASS MIRRORED-SHEET-MIXIN ...)
; compiling (DEFMETHOD SHEET-DIRECT-MIRROR ...)
; compiling (DEFMETHOD (SETF SHEET-DIRECT-MIRROR) ...)
; compiling (DEFMETHOD SHEET-MIRRORED-ANCESTOR ...)
; compiling (DEFMETHOD SHEET-MIRROR ...)
; compiling (DEFMETHOD NOTE-SHEET-GRAFTED ...)
; compiling (DEFMETHOD NOTE-SHEET-DEGRAFTED ...)
; compiling (DEFMETHOD (SETF SHEET-REGION) ...)
; compiling (DEFMETHOD NOTE-SHEET-TRANSFORMATION-CHANGED ...)
; compiling (DEFMETHOD SHEET-NATIVE-REGION ...)
; compiling (DEFMETHOD (SETF SHEET-ENABLED-P) ...)
; compiling (DEFMETHOD SHEET-MIRROR-REGION ...)
; compiling (DEFMETHOD SHEET-NATIVE-TRANSFORMATION ...)
; compiling (DEFMETHOD INVALIDATE-CACHED-TRANSFORMATIONS ...)
; compiling (DEFMETHOD EFFECTIVE-MIRROR-REGION ...)
; compiling (DEFGENERIC SHEET-MOTION-HINTS ...)
; compiling (DEFMETHOD SHEET-MOTION-HINTS ...)
; compiling (DEFGENERIC (SETF SHEET-MOTION-HINTS) ...)
; compiling (DEFMETHOD (SETF SHEET-MOTION-HINTS) ...)
; compiling (DEFUN UPDATE-MIRROR-GEOMETRY ...)
; compiling (DEFUN CARE-FOR-NEW-NATIVE-TRANSFORMATION ...)
; compiling (DEFMETHOD BOUNDING-RECTANGLE* ...)
; compiling (DEFCLASS NULL-SHEET ...)

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/mcclim-0.9.2/sheets.fasl written
; compilation finished in 0:00:12
STYLE-WARNING: redefining SHEET-TRANSFORMATION in DEFGENERIC
STYLE-WARNING: redefining (SETF SHEET-TRANSFORMATION) in DEFGENERIC
STYLE-WARNING: redefining SHEET-REGION in DEFGENERIC
STYLE-WARNING: redefining (SETF SHEET-REGION) in DEFGENERIC
STYLE-WARNING: redefining MAP-SHEET-POSITION-TO-PARENT in DEFGENERIC
STYLE-WARNING: redefining MAP-SHEET-POSITION-TO-CHILD in DEFGENERIC
STYLE-WARNING: redefining MAP-SHEET-RECTANGLE*-TO-PARENT in DEFGENERIC
STYLE-WARNING: redefining MAP-SHEET-RECTANGLE*-TO-CHILD in DEFGENERIC
STYLE-WARNING: redefining CHILD-CONTAINING-POSITION in DEFGENERIC
STYLE-WARNING: redefining CHILDREN-OVERLAPPING-REGION in DEFGENERIC
STYLE-WARNING: redefining CHILDREN-OVERLAPPING-RECTANGLE* in DEFGENERIC
STYLE-WARNING: redefining SHEET-DELTA-TRANSFORMATION in DEFGENERIC
STYLE-WARNING: redefining SHEET-ALLOCATED-REGION in DEFGENERIC
STYLE-WARNING: implicitly creating new generic function SHEET-SIBLINGS
STYLE-WARNING: implicitly creating new generic function MAP-OVER-SHEETS
STYLE-WARNING:
   implicitly creating new generic function (SETF SHEET-DIRECT-MIRROR)
STYLE-WARNING: implicitly creating new generic function SHEET-MIRROR-REGION
STYLE-WARNING: implicitly creating new generic function EFFECTIVE-MIRROR-REGION
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/mcclim-0.9.2/pixmap.lisp" (written 21 MAR 2003 04:36:59 PM):
; compiling (IN-PACKAGE :CLIM-INTERNALS)
; compiling (DEFCLASS PIXMAP ...)
; compiling (DEFGENERIC PIXMAP-MIRROR ...)
; compiling (DEFGENERIC ALLOCATE-PIXMAP ...)
; compiling (DEFGENERIC DEALLOCATE-PIXMAP ...)
; compiling (DEFGENERIC COPY-TO-PIXMAP ...)
; compiling (DEFGENERIC COPY-FROM-PIXMAP ...)
; compiling (DEFGENERIC COPY-AREA ...)
; compiling (DEFGENERIC MEDIUM-COPY-AREA ...)
; compiling (DEFCLASS MIRRORED-PIXMAP ...)
; compiling (DEFMETHOD (SETF %SHEET-MEDIUM) ...)
; compiling (DEFMETHOD INVALIDATE-CACHED-TRANSFORMATIONS ...)
; compiling (DEFMETHOD INVALIDATE-CACHED-REGIONS ...)
; compiling (DEFMETHOD INITIALIZE-INSTANCE ...)
; compiling (DEFMETHOD PIXMAP-MIRROR ...)
; compiling (DEFMETHOD ALLOCATE-PIXMAP ...)
; compiling (DEFMETHOD DEALLOCATE-PIXMAP ...)
; compiling (DEFMETHOD DEALLOCATE-PIXMAP ...)
; compiling (DEFMETHOD SHEET-NATIVE-TRANSFORMATION ...)
; compiling (DEFMETHOD SHEET-NATIVE-REGION ...)
; compiling (DEFMETHOD SHEET-DEVICE-TRANSFORMATION ...)
; compiling (DEFMETHOD SHEET-DEVICE-REGION ...)

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/mcclim-0.9.2/pixmap.fasl written
; compilation finished in 0:00:02
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/mcclim-0.9.2/events.lisp" (written 10 MAR 2006 04:58:12 PM):
; compiling (IN-PACKAGE :CLIM-INTERNALS)
; compiling (DEFVAR *LAST-TIMESTAMP* ...)
; compiling (DEFVAR *LAST-TIMESTAMP-LOCK* ...)
; compiling (DEFCLASS STANDARD-EVENT ...)
; compiling (DEFMETHOD INITIALIZE-INSTANCE ...)
; compiling (DEFCLASS DEVICE-EVENT ...)
; compiling (DEFCLASS KEYBOARD-EVENT ...)
; compiling (DEFCLASS KEY-PRESS-EVENT ...)
; compiling (DEFCLASS KEY-RELEASE-EVENT ...)
; compiling (DEFCLASS POINTER-EVENT ...)
; compiling (DEFMACRO GET-POINTER-POSITION ...)
; compiling (DEFMETHOD POINTER-EVENT-X ...)
; compiling (DEFMETHOD POINTER-EVENT-Y ...)
; compiling (DEFMETHOD POINTER-EVENT-POSITION* ...)
; compiling (DEFMETHOD DEVICE-EVENT-X ...)
; compiling (DEFMETHOD DEVICE-EVENT-Y ...)
; compiling (DEFCLASS POINTER-BUTTON-EVENT ...)
; compiling (DEFCLASS POINTER-BUTTON-PRESS-EVENT ...)
; compiling (DEFCLASS POINTER-BUTTON-RELEASE-EVENT ...)
; compiling (DEFCLASS POINTER-BUTTON-HOLD-EVENT ...)
; compiling (DEFCLASS POINTER-BUTTON-CLICK-EVENT ...)
; compiling (DEFCLASS POINTER-BUTTON-DOUBLE-CLICK-EVENT ...)
; compiling (DEFCLASS POINTER-BUTTON-CLICK-AND-HOLD-EVENT ...)
; compiling (DEFCLASS POINTER-MOTION-EVENT ...)
; compiling (DEFCLASS MOTION-HINT-MIXIN ...)
; compiling (DEFCLASS POINTER-MOTION-HINT-EVENT ...)
; compiling (DEFCLASS POINTER-BOUNDARY-EVENT ...)
; compiling (DEFCLASS POINTER-ENTER-EVENT ...)
; compiling (DEFCLASS POINTER-EXIT-EVENT ...)
; compiling (DEFCLASS POINTER-UNGRAB-EVENT ...)
; compiling (DEFCLASS WINDOW-EVENT ...)
; compiling (DEFMETHOD WINDOW-EVENT-REGION ...)
; compiling (DEFMETHOD WINDOW-EVENT-MIRRORED-SHEET ...)
; compiling (DEFCLASS WINDOW-CONFIGURATION-EVENT ...)
; compiling (DEFMACRO GET-WINDOW-POSITION ...)
; compiling (DEFMETHOD WINDOW-CONFIGURATION-EVENT-X ...)
; compiling (DEFMETHOD WINDOW-CONFIGURATION-EVENT-Y ...)
; compiling (DEFCLASS WINDOW-UNMAP-EVENT ...)
; compiling (DEFCLASS WINDOW-DESTROY-EVENT ...)
; compiling (DEFCLASS WINDOW-REPAINT-EVENT ...)
; compiling (DEFCLASS WINDOW-MANAGER-EVENT ...)
; compiling (DEFCLASS WINDOW-MANAGER-DELETE-EVENT ...)
; compiling (DEFCLASS TIMER-EVENT ...)
; compiling (DEFMETHOD EVENT-INSTANCE-SLOTS ...)
; compiling (DEFMETHOD EVENT-INSTANCE-SLOTS ...)
; compiling (DEFMETHOD EVENT-INSTANCE-SLOTS ...)
; compiling (DEFMETHOD EVENT-INSTANCE-SLOTS ...)
; compiling (DEFMETHOD EVENT-INSTANCE-SLOTS ...)
; compiling (DEFCONSTANT +POINTER-LEFT-BUTTON+ ...)
; compiling (DEFCONSTANT +POINTER-MIDDLE-BUTTON+ ...)
; compiling (DEFCONSTANT +POINTER-RIGHT-BUTTON+ ...)
; compiling (DEFCONSTANT +POINTER-WHEEL-UP+ ...)
; compiling (DEFCONSTANT +POINTER-WHEEL-DOWN+ ...)
; compiling (DEFCONSTANT +POINTER-WHEEL-LEFT+ ...)
; compiling (DEFCONSTANT +POINTER-WHEEL-RIGHT+ ...)
; compiling (DEFCONSTANT +SHIFT-KEY+ ...)
; compiling (DEFCONSTANT +CONTROL-KEY+ ...)
; compiling (DEFCONSTANT +META-KEY+ ...)
; compiling (DEFCONSTANT +SUPER-KEY+ ...)
; compiling (DEFCONSTANT +HYPER-KEY+ ...)
; compiling (DEFCONSTANT +ALT-KEY+ ...)
; compiling (DEFMACRO KEY-MODIFIER-STATE-MATCH-P ...)
; compiling (DEFMETHOD EVENT-TYPE ...)
; compiling (DEFMETHOD EVENT-TYPE ...)
; compiling (DEFMETHOD EVENT-TYPE ...)
; compiling (DEFMETHOD EVENT-TYPE ...)
; compiling (DEFMETHOD EVENT-TYPE ...)
; compiling (DEFMETHOD EVENT-TYPE ...)
; compiling (DEFMETHOD EVENT-TYPE ...)
; compiling (DEFMETHOD EVENT-TYPE ...)
; compiling (DEFMETHOD EVENT-TYPE ...)
; compiling (DEFMETHOD EVENT-TYPE ...)
; compiling (DEFMETHOD EVENT-TYPE ...)
; compiling (DEFMETHOD EVENT-TYPE ...)
; compiling (DEFMETHOD EVENT-TYPE ...)
; compiling (DEFMETHOD EVENT-TYPE ...)
; compiling (DEFMETHOD EVENT-TYPE ...)
; compiling (DEFMETHOD EVENT-TYPE ...)
; compiling (DEFMETHOD EVENT-TYPE ...)
; compiling (DEFMETHOD EVENT-TYPE ...)
; compiling (DEFMETHOD EVENT-TYPE ...)

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/mcclim-0.9.2/events.fasl written
; compilation finished in 0:00:04
STYLE-WARNING: implicitly creating new generic function POINTER-EVENT-X
STYLE-WARNING: implicitly creating new generic function POINTER-EVENT-Y
STYLE-WARNING: implicitly creating new generic function POINTER-EVENT-POSITION*
STYLE-WARNING: implicitly creating new generic function DEVICE-EVENT-X
STYLE-WARNING: implicitly creating new generic function DEVICE-EVENT-Y
STYLE-WARNING: implicitly creating new generic function WINDOW-EVENT-REGION
STYLE-WARNING:
   implicitly creating new generic function WINDOW-EVENT-MIRRORED-SHEET
STYLE-WARNING:
   implicitly creating new generic function WINDOW-CONFIGURATION-EVENT-X
STYLE-WARNING:
   implicitly creating new generic function WINDOW-CONFIGURATION-EVENT-Y
STYLE-WARNING: implicitly creating new generic function EVENT-INSTANCE-SLOTS
STYLE-WARNING: implicitly creating new generic function EVENT-TYPE
STYLE-WARNING: implicitly creating new generic function (SETF %SHEET-MEDIUM)
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/mcclim-0.9.2/ports.lisp" (written 10 MAR 2006 04:58:13 PM):
; compiling (IN-PACKAGE :CLIM-INTERNALS)
; compiling (DEFVAR *DEFAULT-SERVER-PATH* ...)
; compiling (DEFVAR *SERVER-PATH-SEARCH-ORDER* ...)
; compiling (DEFUN FIND-DEFAULT-SERVER-PATH ...)
; compiling (DEFVAR *ALL-PORTS* ...)
; compiling (DEFCLASS BASIC-PORT ...)
; compiling (DEFGENERIC PORT-KEYBOARD-INPUT-FOCUS ...)
; compiling (DEFGENERIC (SETF PORT-KEYBOARD-INPUT-FOCUS) ...)
; compiling (DEFMETHOD PORT-KEYBOARD-INPUT-FOCUS ...)
; compiling (DEFMETHOD (SETF PORT-KEYBOARD-INPUT-FOCUS) ...)
; compiling (DEFMETHOD %SET-PORT-KEYBOARD-FOCUS ...)
; compiling (DEFUN FIND-PORT ...)
; compiling (DEFMETHOD INITIALIZE-INSTANCE ...)
; compiling (DEFMETHOD DESTROY-PORT ...)
; compiling (DEFMETHOD PORT-LOOKUP-MIRROR ...)
; compiling (DEFMETHOD PORT-LOOKUP-SHEET ...)
; compiling (DEFMETHOD PORT-REGISTER-MIRROR ...)
; compiling (DEFMETHOD PORT-UNREGISTER-MIRROR ...)
; compiling (DEFMETHOD REALIZE-MIRROR ...)
; compiling (DEFMETHOD DESTROY-MIRROR ...)
; compiling (DEFMETHOD MIRROR-TRANSFORMATION ...)
; compiling (DEFMETHOD PORT-PROPERTIES ...)
; compiling (DEFMETHOD (SETF PORT-PROPERTIES) ...)
; compiling (DEFMETHOD GET-NEXT-EVENT ...)
; compiling (DEFMETHOD GET-NEXT-EVENT ...)
; compiling (DEFMETHOD PROCESS-NEXT-EVENT ...)
; compiling (DEFMETHOD DISTRIBUTE-EVENT ...)
; compiling (DEFMACRO WITH-PORT-LOCKED ...)
; compiling (DEFMETHOD INVOKE-WITH-PORT-LOCKED ...)
; compiling (DEFUN MAP-OVER-PORTS ...)
; compiling (DEFMETHOD RESTART-PORT ...)
; compiling (DEFMETHOD DESTROY-PORT ...)
; compiling (DEFMETHOD ADD-WATCHER ...)
; compiling (DEFMETHOD DELETE-WATCHER ...)
; compiling (DEFMETHOD RESET-WATCHER ...)
; compiling (DEFMETHOD MAKE-GRAFT ...)
; compiling (DEFMETHOD PORT-LOOKUP-MIRROR ...)
; compiling (DEFMETHOD PORT-LOOKUP-PIXMAP ...)
; compiling (DEFMETHOD PORT-REGISTER-MIRROR ...)
; compiling (DEFMETHOD PORT-UNREGISTER-MIRROR ...)
; compiling (DEFMETHOD REALIZE-MIRROR ...)
; compiling (DEFMETHOD DESTROY-MIRROR ...)
; compiling (DEFMETHOD PORT-ALLOCATE-PIXMAP ...)
; compiling (DEFMETHOD PORT-DEALLOCATE-PIXMAP ...)
; compiling (DEFGENERIC PORT-FORCE-OUTPUT ...)
; compiling (DEFMETHOD PORT-FORCE-OUTPUT ...)
; compiling (DEFGENERIC PORT-GRAB-POINTER ...)
; compiling (DEFGENERIC PORT-UNGRAB-POINTER ...)
; compiling (DEFMETHOD PORT-GRAB-POINTER ...)
; compiling (DEFMETHOD PORT-UNGRAB-POINTER ...)
; compiling (DEFGENERIC SET-SHEET-POINTER-CURSOR ...)
; compiling (DEFMETHOD SET-SHEET-POINTER-CURSOR ...)

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/mcclim-0.9.2/ports.fasl written
; compilation finished in 0:00:05
STYLE-WARNING: implicitly creating new generic function %SET-PORT-KEYBOARD-FOCUS
STYLE-WARNING: implicitly creating new generic function DESTROY-PORT
STYLE-WARNING: implicitly creating new generic function PORT-LOOKUP-SHEET
STYLE-WARNING: implicitly creating new generic function PORT-UNREGISTER-MIRROR
STYLE-WARNING: implicitly creating new generic function PORT-PROPERTIES
STYLE-WARNING: implicitly creating new generic function (SETF PORT-PROPERTIES)
STYLE-WARNING: implicitly creating new generic function GET-NEXT-EVENT
STYLE-WARNING: implicitly creating new generic function DISTRIBUTE-EVENT
STYLE-WARNING: implicitly creating new generic function INVOKE-WITH-PORT-LOCKED
STYLE-WARNING: implicitly creating new generic function RESTART-PORT
STYLE-WARNING: implicitly creating new generic function ADD-WATCHER
STYLE-WARNING: implicitly creating new generic function DELETE-WATCHER
STYLE-WARNING: implicitly creating new generic function RESET-WATCHER
STYLE-WARNING: implicitly creating new generic function MAKE-GRAFT
STYLE-WARNING: implicitly creating new generic function PORT-LOOKUP-PIXMAP
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/mcclim-0.9.2/grafts.lisp" (written 21 MAR 2003 04:36:59 PM):
; compiling (IN-PACKAGE :CLIM-INTERNALS)
; compiling (DEFCLASS GRAFT ...)
; compiling (DEFMETHOD INITIALIZE-INSTANCE ...)
; compiling (DEFUN GRAFTP ...)
; compiling (DEFMETHOD GRAFT ...)
; compiling (DEFMETHOD SHEET-GRAFTED-P ...)
; compiling (DEFMETHOD SHEET-GRAFTED-P ...)
; compiling (DEFMETHOD SHEET-VIEWABLE-P ...)
; compiling (DEFUN FIND-GRAFT ...)
; compiling (DEFUN MAP-OVER-GRAFTS ...)
; compiling (DEFMACRO WITH-GRAFT-LOCKED ...)
; compiling (DEFUN GRAFT-PIXELS-PER-MILLIMETER ...)
; compiling (DEFUN GRAFT-PIXELS-PER-INCH ...)
; compiling (DEFMETHOD SHEET-NATIVE-TRANSFORMATION ...)
; compiling (DEFMETHOD SHEET-NATIVE-REGION ...)

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/mcclim-0.9.2/grafts.fasl written
; compilation finished in 0:00:01
; compiling file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/mcclim-0.9.2/medium.lisp" (written 10 MAR 2006 04:58:13 PM):
; compiling (IN-PACKAGE :CLIM-INTERNALS)
; compiling (DEFGENERIC TEXT-STYLE-COMPONENTS ...)
; compiling (DEFGENERIC TEXT-STYLE-FAMILY ...)
; compiling (DEFGENERIC TEXT-STYLE-FACE ...)
; compiling (DEFGENERIC TEXT-STYLE-SIZE ...)
; compiling (DEFGENERIC MERGE-TEXT-STYLES ...)
; compiling (DEFGENERIC TEXT-STYLE-ASCENT ...)
; compiling (DEFGENERIC TEXT-STYLE-DESCENT ...)
; compiling (DEFGENERIC TEXT-STYLE-HEIGHT ...)
; compiling (DEFGENERIC TEXT-STYLE-WIDTH ...)
; compiling (DEFGENERIC TEXT-STYLE-FIXED-WIDTH-P ...)
; compiling (DEFGENERIC TEXT-STYLE-EQUALP ...)
; compiling (DEFMETHOD TEXT-STYLE-EQUALP ...)
; compiling (DEFCLASS STANDARD-TEXT-STYLE ...)
; compiling (DEFMETHOD MAKE-LOAD-FORM ...)
; compiling (DEFUN FAMILY-KEY ...)
; compiling (DEFUN FACE-KEY ...)
; compiling (DEFUN SIZE-KEY ...)
; compiling (DEFUN TEXT-STYLE-KEY ...)
; compiling (DEFVAR *TEXT-STYLE-HASH-TABLE* ...)
; compiling (DEFUN MAKE-TEXT-STYLE ...)
; compiling (DEFMETHOD PRINT-OBJECT ...)
; compiling (DEFMETHOD TEXT-STYLE-EQUALP ...)
; compiling (DEFCONSTANT *DEFAULT-TEXT-STYLE* ...)
; compiling (DEFCONSTANT *UNDEFINED-TEXT-STYLE* ...)
; compiling (DEFCONSTANT *SMALLER-SIZES* ...)
; compiling (DEFCONSTANT *FONT-SCALING-FACTOR* ...)
; compiling (DEFCONSTANT *FONT-MIN-SIZE* ...)
; compiling (DEFCONSTANT *FONT-MAX-SIZE* ...)
; compiling (DEFUN FIND-SMALLER-SIZE ...)
; compiling (DEFCONSTANT *LARGER-SIZES* ...)
; compiling (DEFUN FIND-LARGER-SIZE ...)
; compiling (DEFMETHOD TEXT-STYLE-COMPONENTS ...)
; compiling (DEFCLASS DEVICE-FONT-TEXT-STYLE ...)
; compiling (DEFMETHOD PRINT-OBJECT ...)
; compiling (DEFUN DEVICE-FONT-TEXT-STYLE-P ...)
; compiling (DEFMETHOD TEXT-STYLE-EQUALP ...)
; compiling (DEFMETHOD TEXT-STYLE-MAPPING ...)
; compiling (DEFMETHOD (SETF TEXT-STYLE-MAPPING) ...)
; compiling (DEFMETHOD (SETF TEXT-STYLE-MAPPING) ...)
; compiling (DEFGENERIC MAKE-DEVICE-FONT-TEXT-STYLE ...)
; compiling (DEFMETHOD MAKE-DEVICE-FONT-TEXT-STYLE ...)
; compiling (DEFMETHOD MERGE-TEXT-STYLES ...)
; compiling (DEFUN PARSE-TEXT-STYLE ...)
; compiling (DEFMACRO WITH-TEXT-STYLE ...)
; compiling (DEFMETHOD INVOKE-WITH-TEXT-STYLE ...)
; compiling (DEFMETHOD INVOKE-WITH-TEXT-STYLE ...)
; compiling (DEFMETHOD INVOKE-WITH-TEXT-STYLE ...)
; compiling (DEFMACRO WITH-TEXT-FAMILY ...)
; compiling (DEFMACRO WITH-TEXT-FACE ...)
; compiling (DEFMACRO WITH-TEXT-SIZE ...)
; compiling (DEFCLASS TRANSFORM-COORDINATES-MIXIN ...)
; compiling (DEFCLASS BASIC-MEDIUM ...)
; compiling (DEFCLASS UNGRAFTED-MEDIUM ...)
; compiling (DEFMETHOD INITIALIZE-INSTANCE ...)
; compiling (DEFMETHOD MEDIUM-CLIPPING-REGION ...)
; compiling (DEFMETHOD (SETF MEDIUM-CLIPPING-REGION) ...)
; compiling (DEFMETHOD (SETF MEDIUM-CLIPPING-REGION) ...)
; compiling (DEFMETHOD (SETF MEDIUM-TRANSFORMATION) ...)
; compiling (DEFMETHOD MEDIUM-MERGED-TEXT-STYLE ...)
; compiling (DEFMACRO WITH-PIXMAP-MEDIUM ...)
; compiling (DEFMETHOD MEDIUM-DEVICE-TRANSFORMATION ...)
; compiling (DEFMETHOD MEDIUM-DEVICE-REGION ...)
; compiling (DEFGENERIC LINE-STYLE-EQUALP ...)
; compiling (DEFCLASS STANDARD-LINE-STYLE ...)
; compiling (DEFMETHOD LINE-STYLE-P ...)
; compiling (DEFMETHOD LINE-STYLE-P ...)
; compiling (DEFUN MAKE-LINE-STYLE ...)
; compiling (DEFMETHOD PRINT-OBJECT ...)
; compiling (DEFMETHOD LINE-STYLE-EFFECTIVE-THICKNESS ...)
; compiling (DEFMETHOD MEDIUM-MITER-LIMIT ...)
; compiling (DEFMETHOD LINE-STYLE-EQUALP ...)
; compiling (DEFMACRO WITH-OUTPUT-BUFFERED ...)
; compiling (DEFMACRO WITH-TRANSFORMED-POSITION ...)
; compiling (DEFMACRO WITH-TRANSFORMED-DISTANCE ...)
; compiling (DEFMACRO WITH-TRANSFORMED-POSITIONS ...)
; compiling (DEFMETHOD MEDIUM-COPY-AREA ...)
; compiling (DEFMETHOD MEDIUM-COPY-AREA ...)
; compiling (DEFMETHOD MEDIUM-DRAW-POINT* ...)
; compiling (DEFMETHOD MEDIUM-DRAW-POINTS* ...)
; compiling (DEFMETHOD MEDIUM-DRAW-LINE* ...)
; compiling (DEFMETHOD MEDIUM-DRAW-LINES* ...)
; compiling (DEFMETHOD MEDIUM-DRAW-POLYGON* ...)
; compiling (DEFUN EXPAND-RECTANGLE-COORDS ...)
; compiling (DEFMETHOD MEDIUM-DRAW-RECTANGLE* ...)
; compiling (DEFMETHOD MEDIUM-DRAW-RECTANGLES* ...)
; compiling (DEFMETHOD MEDIUM-DRAW-ELLIPSE* ...)
; compiling (DEFMETHOD MEDIUM-DRAW-CIRCLE* ...)
; compiling (DEFMETHOD MEDIUM-DRAW-TEXT* ...)
; compiling (DEFMETHOD MEDIUM-DRAW-GLYPH ...)
; compiling (DEFMETHOD MEDIUM-COPY-AREA ...)
; compiling (DEFMETHOD MEDIUM-COPY-AREA ...)
; compiling (DEFMETHOD MEDIUM-DRAW-POINTS* ...)
; compiling (DEFMETHOD MEDIUM-DRAW-LINES* ...)
; compiling (DEFMETHOD MEDIUM-DRAW-RECTANGLES* ...)
; compiling (DEFMETHOD MEDIUM-FINISH-OUTPUT ...)
; compiling (DEFMETHOD MEDIUM-FORCE-OUTPUT ...)
; compiling (DEFMETHOD MEDIUM-CLEAR-AREA ...)
; compiling (DEFMETHOD MEDIUM-BEEP ...)
; compiling (DEFMETHOD ENGRAFT-MEDIUM ...)
; compiling (DEFMETHOD DEGRAFT-MEDIUM ...)
; compiling (DEFMETHOD ALLOCATE-MEDIUM ...)
; compiling (DEFMETHOD DEALLOCATE-MEDIUM ...)
; compiling (DEFMETHOD PORT ...)
; compiling (DEFMETHOD GRAFT ...)
; compiling (DEFMACRO WITH-SPECIAL-CHOICES ...)
; compiling (DEFGENERIC INVOKE-WITH-SPECIAL-CHOICES ...)
; compiling (DEFMETHOD INVOKE-WITH-SPECIAL-CHOICES ...)

; /Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/mcclim-0.9.2/medium.fasl written
; compilation finished in 0:00:10
STYLE-WARNING: redefining TEXT-STYLE-COMPONENTS in DEFGENERIC
STYLE-WARNING: redefining TEXT-STYLE-FAMILY in DEFGENERIC
STYLE-WARNING: redefining TEXT-STYLE-FACE in DEFGENERIC
STYLE-WARNING: redefining TEXT-STYLE-SIZE in DEFGENERIC
STYLE-WARNING: redefining MERGE-TEXT-STYLES in DEFGENERIC
STYLE-WARNING: redefining TEXT-STYLE-ASCENT in DEFGENERIC
STYLE-WARNING: redefining TEXT-STYLE-DESCENT in DEFGENERIC
STYLE-WARNING: redefining TEXT-STYLE-HEIGHT in DEFGENERIC
STYLE-WARNING: redefining TEXT-STYLE-WIDTH in DEFGENERIC
STYLE-WARNING: redefining TEXT-STYLE-FIXED-WIDTH-P in DEFGENERIC
STYLE-WARNING: redefining TEXT-STYLE-EQUALP in DEFGENERIC
STYLE-WARNING: redefining TEXT-STYLE-EQUALP (TEXT-STYLE TEXT-STYLE) in DEFMETHOD
STYLE-WARNING: redefining MAKE-LOAD-FORM (STANDARD-TEXT-STYLE) in DEFMETHOD
STYLE-WARNING: redefining FAMILY-KEY in DEFUN
STYLE-WARNING: redefining FACE-KEY in DEFUN
STYLE-WARNING: redefining SIZE-KEY in DEFUN
STYLE-WARNING: redefining TEXT-STYLE-KEY in DEFUN
STYLE-WARNING: redefining MAKE-TEXT-STYLE in DEFUN
STYLE-WARNING: implicitly creating new generic function INVOKE-WITH-TEXT-STYLE
STYLE-WARNING: implicitly creating new generic function MEDIUM-MERGED-TEXT-STYLE
STYLE-WARNING:
   implicitly creating new generic function MEDIUM-DEVICE-TRANSFORMATION
STYLE-WARNING: implicitly creating new generic function MEDIUM-DEVICE-REGION
STYLE-WARNING: redefining LINE-STYLE-P (LINE-STYLE) in DEFMETHOD
STYLE-WARNING: redefining LINE-STYLE-P (T) in DEFMETHOD
STYLE-WARNING: implicitly creating new generic function MEDIUM-DRAW-RECTANGLES*
STYLE-WARNING: implicitly creating new generic function MEDIUM-DRAW-GLYPH
STYLE-WARNING: implicitly creating new generic function MEDIUM-FINISH-OUTPUT
STYLE-WARNING: implicitly creating new generic function MEDIUM-FORCE-OUTPUT
STYLE-WARNING: implicitly creating new generic function MEDIUM-CLEAR-AREA
STYLE-WARNING: implicitly creating new generic function MEDIUM-BEEP
; 
; compilation unit aborted
;   caught 1 fatal ERROR condition
;   printed 9 notes
The file "/Users/gwking/temporary/asdf-test/input/sbcl0-9-9/site/mcclim-0.9.2/output.lisp" does not exist.