anchor.diff:  
       let commandLineSpecs =
           ["-f", ArgType.String (fun s -> feName := Some s), "Frontend name. Use -af to list available."
  -         "-af", ArgType.Unit (printItems "frontends" AddinFrontendNames !feName), "Available frontends"
  +         "-af", ArgType.Unit (printItems "frontends" addinFrontendNames !feName), "Available frontends"
            "-g", ArgType.String 
               (fun s -> 
                   match Array.toList (s.Split ' ') with
  
positive.code:     //        printfn "%A" <| ilTree
              let gen =
                  let _raise () = InvalidGenName generatorName |> raise
                  if Seq.exists (fun (elem : Generator) -> elem.Name = generatorName) AddinGenerator
                  then              
                      try
                          match Seq.tryFind (fun (elem : Generator) -> elem.Name = generatorName) AddinGenerator with
                          | Some gen -> gen
                          | None -> failwith "TreeDump is not found."
                      with
  
negative.code:     AddinManager.Initialize()
      AddinManager.Registry.Update(null)
  
      let addinFrontends = AddinManager.GetExtensionObjects (typeof<Frontend>) |> Seq.cast<Frontend> |> Seq.toArray
      let addinConversions = AddinManager.GetExtensionObjects (typeof<Conversion>) |> Seq.cast<Conversion> |> Seq.toArray
      let addinGenerators = AddinManager.GetExtensionObjects (typeof<Generator>) |> Seq.cast<Generator> |> Seq.toArray
      let addinFrontendNames = Seq.map (fun (elem : Frontend) -> elem.Name) addinFrontends |> Seq.toArray
      let addinConversionNames = Seq.map (fun (elem : Conversion) -> elem.Name) addinConversions |> Seq.toArray
      let addinGeneratorNames = Seq.map (fun (elem : Generator) -> elem.Name) addinGenerators |> Seq.toArray
  
      let userDefs = ref []
      let userDefsStr = ref ""
  
      feName := // Fill by default value
          if Array.exists (fun (elem : Frontend) -> elem.Name = "YardFrontend") addinFrontends
          then Some "YardFrontend"
          elif not <| Array.isEmpty addinFrontends
          then 
              let tmpName = addinFrontends.[0].Name
              Some tmpName
          else None
              
      generatorName :=
          if Array.exists (fun (elem : Generator) -> elem.Name = "RNGLRGenerator") addinGenerators
          then Some "RNGLRGenerator"
          elif not <| Array.isEmpty addinGenerators
          then 
              let tmpName = addinGenerators.[0].Name
              Some tmpName
          else None
  
      let generateSomething = ref true
  
  