anchor.diff:             (when (or (null last) (null dcf)
                        (> dcf last))
                (format t "~&;;;; Loading ~A ~%" base)
  -             (load base)
  +             (load cf)
                (setf (gethash base *load-dates*) dcf))))))
   
   
  
positive.code:                          (> dsf dcf)
                           (> defs-date dcf))))
             (format t "~&;;;; Compiling ~A ~%" sf )
             (compile-file base))
           (let ((dcf (file-write-date cf))
                 (last (gethash base *load-dates*)))
             (when defs
  
negative.code: (in-package :clorb)
  
  (defparameter *base-files*
    '(("clorb-pkgdcl")
  