anchor.diff:  
           writer.WriteLine ( marker + " " + headline)
   
  +    let renderInlines (writer:TextWriter) (items:Inline list) =
  +        writer.WriteLine ()
  +
  +        items
  +        |> Seq.map renderInline
  +        |> Seq.iter(fun x -> x.TrimEnd() >>= writer.WriteLine)
  +    
       let renderCRefDescriptions (writer:TextWriter) items =
           items 
           |> Seq.iter( fun x -> 
  
positive.code:             writer.WriteLine x.description
          )
  
      let processParameters (writer:TextWriter) headline (items:CRefDescription list) =
          headline "Parameters"
          items |> renderCRefDescriptions writer
  
      let processReturns (writer:TextWriter) headline (items:Inline list) =
          headline "Return value"
          items |> processInlines writer 
  
      let processExceptions (writer:TextWriter) headline (items:CRefDescription list) =
          headline "Exceptions"
          items |> renderCRefDescriptions writer
  
      let processRemarks (writer:TextWriter) headline (items:Inline list) =
          headline "Remarks"
          items |> processInlines writer 
  
      let processExample (writer:TextWriter) headline (items:Inline list) =
          headline "Example"
          items |> processInlines writer 
  
      let processPermissions (writer:TextWriter) headline (items:CRefDescription list) =
          headline "Permissions"
          items |> renderCRefDescriptions writer
  
      let processSeeAlso (writer:TextWriter) headline (doc:ApiDoc) =
          let seeAlso = [ doc.Summary
                          doc.Remarks
                          doc.Returns
  
negative.code:             )
  
      let renderApiDoc (writer:TextWriter) doc headline = 
          doc.Summary >>= renderInlines writer 
  
          let renderSection renderItems headlineText items =
              headline headlineText
              items |> renderItems writer 
  
          doc.Params >>= renderSection renderCRefDescriptions "Parameters"
          doc.Returns >>= renderSection renderInlines "Return value"
          doc.Exceptions >>= renderSection renderCRefDescriptions "Exceptions"
          doc.Remarks >>= renderSection renderInlines "Remarks"
          doc.Example >>= renderSection renderInlines "Example"
          doc.Permissions >>= renderSection renderCRefDescriptions "Permissions"
  
          doc |> renderSeeAlso writer headline
                    
      let renderMembersOfKind (writer:TextWriter) (headline : string) level members = 
          writer.WriteLine()
  