anchor.diff:          inherit ClassificationFormatDefinition()
           
           do self.DisplayName <- SR.FSharpPropertiesClassificationType.Value
  -           self.ForegroundColor <- Nullable Colors.Black
positive.code:     [<Order(After = PredefinedClassificationTypeNames.Keyword)>]
      type internal FSharpFunctionTypeFormat() as self =
          inherit ClassificationFormatDefinition()
          
          do self.DisplayName <- SR.FSharpFunctionsOrMethodsClassificationType.Value
             self.ForegroundColor <- Nullable Colors.Black
  
      [<Export(typeof<EditorFormatDefinition>)>]
      [<ClassificationType(ClassificationTypeNames = FSharpClassificationTypes.MutableVar)>]
  
negative.code:         | SemanticClassificationType.Property -> Property
  
  module internal ClassificationDefinitions =
      [<Export; Name(FSharpClassificationTypes.Function); BaseDefinition(PredefinedClassificationTypeNames.FormalLanguage)>]
      let FSharpFunctionClassificationType : ClassificationTypeDefinition = null
  
      [<Export; Name(FSharpClassificationTypes.MutableVar); BaseDefinition(PredefinedClassificationTypeNames.FormalLanguage)>]
      let FSharpMutableVarClassificationType : ClassificationTypeDefinition = null
  
      [<Export; Name(FSharpClassificationTypes.Printf); BaseDefinition(PredefinedClassificationTypeNames.FormalLanguage)>]
      let FSharpPrintfClassificationType : ClassificationTypeDefinition = null
  
      [<Export; Name(FSharpClassificationTypes.Property); BaseDefinition(PredefinedClassificationTypeNames.FormalLanguage)>]
      let FSharpPropertyClassificationType : ClassificationTypeDefinition = null
  
      [<Export(typeof<EditorFormatDefinition>)>]
  