anchor.diff:                   (destructuring-bind (&key x y z) '(:x 1 :y 2 :z 3)
                      (list x y z))))))
   
  -  (test local+macros
  +  (test internal-definitions+macros
       (is (equal '(x)
                  (local
                    (declaim (ignorable x))
  
positive.code:                    x)
                   (list a b)))))
  
    (test shadow-symbol-macro-in-symbol-macrolet
      (is (equal (local
                   (define-symbol-macro x 1)
                   (symbol-macrolet ((x 2))
  
negative.code: 
  (suite definitions
    
    (test internal-definitions
      (is (eql 2
               (local
                 (def x 1)
  