anchor.diff:       do it manually. In case the DLL is absent, the LIBTEST method
        for CFFI returns :NO-RESOURCE.
     Extended status in the form 
  -     (:FAILED-TESTS <list of failed tests> :KNOWN-TO-FAIL <list of known failures>).
  +     (:FAILED-TESTS <list of failed tests> :KNOWN-TO-FAIL <list of known failures>)
  +     The test names in these lists are represented as downcased strings.
   
   If any SERIOUS-CONDITION is signalled, this is considered a failure.
   
  
positive.code: (defun add-run (run-info &optional (db *db*))
    (push run-info (getf db :runs)))
  
  (defun print-list-elements (write-to list separator elem-printer)
    (let ((maybe-separator ""))
      (dolist (elem list)
        (format write-to maybe-separator)
        (funcall elem-printer elem)
        (setf maybe-separator separator))))
  
  (defun save-db (&optional (db *db*) (stream-or-path *standard-db-file*))
    (with-open-file (out stream-or-path
  
negative.code:     (setf all-failures (union non-compiled-failures
                                (rt-api:failed-tests)))
  
      (list :failed-tests (mapcar #'string-downcase all-failures)
            :known-to-fail (mapcar #'string-downcase (rt-api:known-to-fail)))))
  
  (defmethod libtest ((library-name (eql :alexandria)))
  
  