anchor.diff:  (define-extension-inline *wiki-links* wiki-link
       (or quoted-wiki-link normal-wiki-link)
     (:character-rule wiki-link-extended-chars #\| #\' #\=)
  -  (:after 3bmd-grammar::emph))
  +  (:after 3bmd-grammar:emph))
   
   
   
  
positive.code:     (declare (ignore w nt a))
      (format stream "~a" formatted)))
  
  (defmethod print-tagged-element ((tag (eql :wiki-link)) stream rest)
    (destructuring-bind (&key label args) rest
      (let ((formatted (with-output-to-string (s)
                         (loop for i in label do (print-element i s))))
  
negative.code:                            "]]")
    (:destructure ([ label args ])
                  (declare (ignore [ ]))
                  (list 'wiki-link :label label :args (mapcar 'second args))))
  
  (defrule quoted-wiki-link (and #\'
                                 ;; would be nicer to just use wiki-link
  