anchor.diff:    ;; we need to clean the :anaphora system too
     (asdf:clear-system :anaphora)
   
  +  ;; Load anaphora first, because anaphora-tests
  +  ;; is defined in anaphora.asd which confuses
  +  ;; quicklisp (some versions of, see issue #1)
  +  (quicklisp:quickload :anaphora)
     (quicklisp:quickload :anaphora-test)
   
     ;; copy/paste from anaphora.asd
  
positive.code: 
    ;; The test framework used: ptester.
    
    (quicklisp:quickload :cl-base64-tests)
    
    (funcall (intern (symbol-name '#:do-tests)
  
negative.code: 
    ;; The test framework used: ptester.
  
    ;; Load puri first, because puri-tests
    ;; is defined in puri.asd which confuses
    ;; quicklisp (some versions of, see issue #1)
    (quicklisp:quickload :puri)
  
    (quicklisp:quickload :puri-tests)
    
    ;; copy/paste from puri.asd
  