anchor.diff:    url (:sequence "http://" 
                    (:register hostname) 
                    (:greedy-repetition 
  -                  0 1 (:sequence #\/ (:register url-pathname)))
  +                  0 1 (:sequence
  +		       (:greedy-repetition 0 1 #\/)
  +		       (:register url-pathname
  +				      (:greedy-repetition 
  +				       0 1 (:sequence #\# url-pathname)))
  +		       ))
                    (:negative-lookbehind (:char-class #\. #\, #\? #\!))))
   
   (define-parse-tree-synonym
  
positive.code:    (:register
      (:sequence (:greedy-repetition 0 nil (:inverted-char-class #\_))))
     (:greedy-repetition 2 2 #\_)))
  (define-parse-tree-synonym
    strong-em-1
    (:sequence 
  
negative.code:    (:register
      (:sequence (:greedy-repetition 0 nil (:inverted-char-class #\*))))
     (:greedy-repetition 2 2 #\*)))
  
  (define-parse-tree-synonym
    strong-2 
    (:sequence 
  