anchor.diff:  
       interface ICodeGenerator with
           member x.GenerateAsync(applyTo: MemberDeclarationSyntax, document: Document, progress: IProgress<Diagnostic>, ct) =
  -//            System.AppDomain.CurrentDomain.GetAssemblies()
  -//            |> Seq.filter (fun asm -> not asm.IsDynamic)
  -//            |> Seq.map (fun asm -> sprintf "%s: %s" (asm.GetName().Name) asm.Location)
  -//            |> String.concat System.Environment.NewLine
  -//            |> Debug
  -//            |> Diagnostics.create (applyTo.GetLocation())
  -//            |> progress.Report
  -
               let parseSampleData =
                   JsonProviderArgs.create
                   >> JsonProviderBridge.parseDataType
  
positive.code: 
  type DiagnosticsType =
      | Debug of string
  
  [<AutoOpen>]
  module Diagnostics_ =
  
negative.code:                     description = null,
                      helpLinkUri = null
                  )
              | GeneralError (title, message) ->
                  DiagnosticDescriptor(
                      "TPCS002",
                      title,
                      message,
                      "",
                      DiagnosticSeverity.Error,
                      isEnabledByDefault = true,
                      description = null,
                      helpLinkUri = null
                  )
          let create location diagnosticsType = 
              Diagnostic.Create(toDescriptor diagnosticsType, location)
  
  