diff -ur clx-0.7.4.orig/dep-openmcl.lisp clx-0.7.4/dep-openmcl.lisp
--- clx-0.7.4.orig/dep-openmcl.lisp	2009-11-28 16:43:30.000000000 +0100
+++ clx-0.7.4/dep-openmcl.lisp	2009-11-29 22:39:36.000000000 +0100
@@ -492,7 +492,7 @@
 ;;; value changes.
 
 (defun process-block (whostate predicate &rest predicate-args)
-  (declare (dynamic-extern predicate-args))
+  (declare (dynamic-extent predicate-args))
   (apply #'ccl:process-wait whostate predicate predicate-args))
 
 ;;; PROCESS-WAKEUP: Check some other process' wait function.
@@ -1113,7 +1113,7 @@
 			    unit byte-lsb-first-p bit-lsb-first-p)
   (declare (ignore bbuf boffset pixarray x y width height
                    padded-bytes-per-line bits-per-pixel unit
-                   byte-lsb-first-p bit-lsp-first-p))
+                   byte-lsb-first-p bit-lsb-first-p))
   nil)
 
 ;;; FAST-COPY-PIXARRAY - copy part of a pixarray into another