anchor.diff:      DisplayContext: FSharpDisplayContext
   }
   
  -let internal hasUnitOnlyParameter (mem: FSharpMemberFunctionOrValue) =
  +let private hasUnitOnlyParameter (mem: FSharpMemberFunctionOrValue) =
       mem.CurriedParameterGroups.Count = 1 && mem.CurriedParameterGroups.[0].Count = 0
   
  -let internal mustAppearAsAbstractMember (mem: FSharpMemberFunctionOrValue) =
  +let private mustAppearAsAbstractMember (mem: FSharpMemberFunctionOrValue) =
       let enclosingEntityIsFSharpClass = mem.EnclosingEntity.IsClass && mem.EnclosingEntity.IsFSharp
   
       if mem.IsDispatchSlot then
  
positive.code:     let valueName = formatValueOrMemberName value.LogicalName
  
      if value.FullType.IsFunctionType then
          let inlineSpecifier =
              match value.InlineAnnotation with
              | FSharpInlineAnnotation.AlwaysInline
              | FSharpInlineAnnotation.PseudoValue -> "inline "
              | _ -> ""
          ctx.Writer.WriteLine("val {0}{1} : {2}{3}", inlineSpecifier, valueName, generateSignature ctx value, constraints)
      else
          ctx.Writer.WriteLine("val {0} : {1}{2}", valueName, value.FullType.Format(ctx.DisplayContext), constraints)
  
negative.code:             else ""
  
          let inlineAnnotation =
              if needsInlineAnnotation mem then "inline " else ""
  
          let constraints = getConstraints ctx.DisplayContext mem.GenericParameters
  
  