anchor.diff:  
   (defsystem :cl-log
     :serial t
  -  :version 1.0
  +  :version "1.0"
     :depends-on (:bordeaux-threads 
                  :cl-ppcre
                  :demacs)
  
positive.code: (defmethod perform ((op test-op) (system (eql (find-system :cl-log))))
    (operate 'load-op :cl-log.test)
    (in-package :cl-log.test)
    (declaim (optimize (debug 3)))
    (warn "(declaim (optimize (debug 3))) was issued to help later C-c C-c'ing")
    (eval (read-from-string "(stefil:funcall-test-with-feedback-message 'cl-log.test:test)"))
    (values))
  
negative.code: 
  (defsystem :cl-log.test
    :serial t
    :version "1.0"
    :depends-on (:cl-log :stefil)
    :components ((:file "test/logger")
                 (:file "test/speed")))
  