anchor.diff:    | List.DelimitedWith ['<'] ['>'] (tag, rest) ->
         yield! parseChars ('>'::(List.rev tag) @ '<' :: acc) rest
   
  -  // Recognize direct link [foo](http://bar) or indirect link [foo][bar] 
  +  // Recognize direct link [foo](http://bar) or indirect link [foo][bar] or auto link http://bar
     | DirectLink (body, link, rest) ->
         yield! accLiterals.Value
         let info = getLinkAndTitle (String(Array.ofList link))
  
positive.code:       Some(body, link, rest)
    | _ -> None
  
  /// Recognizes some form of emphasis using `**bold**` or `*italic*`
  /// (both can be also marked using underscore).
  /// TODO: This does not handle nested emphasis well.
  
negative.code:       yield! accLiterals.Value
        let key = if String.IsNullOrEmpty(link) then String(body |> Array.ofSeq) else link
        yield IndirectLink(parseChars [] body |> List.ofSeq, original, key)
        yield! parseChars [] rest
    | AutoLink (link, rest) ->
        yield! accLiterals.Value
        yield DirectLink([Literal link], (link, None))
        yield! parseChars [] rest
  
    // Recognize image - this is a link prefixed with the '!' symbol
  