anchor.diff:      (signals (invalid-uri-warning) (eval-read "#U%gg"))))
   
   
  +(def-suite variables :in expansions)
  +(in-suite expansions)
  +
  +
   (define-fixture some-variables ()
     (let ((baz 1)
           (bar "bar"))
  
positive.code: 
  
  (test variable-substitution
    "Test variable expansion"
    (is (string= "fredfredfred"
                 (let ((foo "fred"))
                   (parse-uri-template "{foo}{foo=}{foo=wilma}"))))
  
negative.code: (def-suite enabled-tests)
  
  
  (def-suite expansions :in enabled-tests)
  (in-suite expansions)
  
  
  (define-fixture uri-template-syntax ()
  