anchor.diff:          output.Add("|===")
           output.Add("|Property Name | Description")
           output.Add("")
  -        generateTypeTable (t.Value, output)
  +        generateTypeTable (t.Key, t.Value, output)
           output.Add("|===")
  -
           let value = (typeof<FlexSearch.Api.AnalyzerProperties>.Assembly).GetTypes().First(fun x -> x.Name = t.Key)
  -        try
  +        try 
               let instance = Activator.CreateInstance(value)
               let json = JsonConvert.SerializeObject(instance, Formatting.Indented, jsonSettings)
               output.Add("""[source,javascript]
  
positive.code:                         typeMember.MemberType <- SimpleType(prop.PropertyType.Name)
                      else typeMember.MemberType <- ComplexType(prop.PropertyType.Name)
                      printfn "%s - %s" prop.Name (prop.PropertyType.Name)
                  if prop.PropertyType.IsEnum then
                      typeMember.ISEnum <- true
                  members.Add(typeMember)
              for con in typ.GetConstructors() do
                  if con.GetParameters().Count() <> 0 then 
  
negative.code: open Newtonsoft.Json
  open Newtonsoft.Json.Converters
  
  type System.String with
      member this.CamelCaseToSeparate() =
          System.Text.RegularExpressions.Regex.Replace(this, "([A-Z])", " $1")
  
  let GlossaryPath = "F:\SkyDrive\FlexSearch Documentation\source\docs\glossary"
  let GlossaryFilePath = "F:\SkyDrive\FlexSearch Documentation\source\docs\glossary\Glossary.txt"
  let ThriftFilePath = "F:\SkyDrive\FlexSearch Documentation\source\docs\glossary\Glossary.txt"
  let jsonSettings = new JsonSerializerSettings()
  
  jsonSettings.Converters.Add(new StringEnumConverter())
  
  let ParseGlossaryFile() = 
  