anchor.diff:    (values))
   
   (defun dependency-ordered-tests ()
  -  "Get an iterable, ordered collection of all tests defined with
  -`define-test'.
  +  "Get an ordered collection of all tests defined with `define-test'.
   
   This returns the same tests that `all-tests' does, but it attempts to
   order the tests such that more foundational tests occur earlier than
  
positive.code:        ',name)))
  
  (defun run-test-set (tests)
    "Run the test functions in the given iterable collection."
    (let ((*suite* (make-instance 'suite :plan nil)))
      (do-iterator (test (iterator tests))
        (funcall (symbol-test test)))
      (finalize)))
  
  
negative.code:       (fset:do-set (package packages-without-linked-systems)
          (vector-push-extend package sorted-packages))
  
        (eager-flatmap-sequence
         sorted-packages
         (lambda (package)
           (fset:lookup *package-tests* package))
         (fset:empty-seq)))))
  