Index: /branches/working-0711/ccl/lib/compile-ccl.lisp
===================================================================
--- /branches/working-0711/ccl/lib/compile-ccl.lisp	(revision 7841)
+++ /branches/working-0711/ccl/lib/compile-ccl.lisp	(revision 7842)
@@ -456,7 +456,8 @@
     (:darwinx8664 "darwinx8664")))
 
-(defun rebuild-ccl (&key full clean kernel force (reload t) exit reload-arguments verbose)
+(defun rebuild-ccl (&key update full clean kernel force (reload t) exit reload-arguments verbose)
   (when full
     (setq clean t kernel t reload t))
+  (when update (update-ccl))
   (let* ((cd (current-directory)))
     (unwind-protect