anchor.diff:              let parArgs = getParamArgs argInfos
               match v.IsMember, v.IsInstanceMember, v.LogicalName, v.DisplayName with
               // Constructors
  -            | _, _, ".ctor", _ -> "new" + parArgs 
  +            | _, _, ".ctor", _ -> "new" + parArgs
               // Properties (skipping arguments)
               | _, true, _, name when v.IsProperty -> name
               // Ordinary instance members
  
positive.code:               if v.IsDispatchSlot then () ]
  
          let argInfos = 
              // It might be a bug in FCS
              try v.CurriedParameterGroups |> Seq.map Seq.toList |> Seq.toList 
              with _ -> 
                  Debug.WriteLine("FSharpMemberFunctionOrValue.CurriedParameterGroups throws an exception.")
                  [[]]
  
          let retType =
              try Some v.ReturnParameter.Type 
              with _ -> 
                  Debug.WriteLine("FSharpMemberFunctionOrValue.ReturnParameter throws an exception.")
                  None
  
          let argInfos, retType = 
              match argInfos, v.IsGetterMethod, v.IsSetterMethod with
              | [ AllAndLast(args, last) ], _, true -> [ args ], Some last.Type
              | _, _, true -> argInfos, None
              | [[]], true, _ -> [], retType
              | _, _, _ -> argInfos, retType
  
          let retType = defaultArg (Option.map (formatType ctx) retType) "unit"
          let usage = buildUsage argInfos
      
          ctx.Writer.WriteLine("")
          ctx.Writer.Write("member ")
          for modifier in modifiers do
              ctx.Writer.Write("{0} ", modifier)
          ctx.Writer.Write("{0}.", ctx.ObjectIdent)
          
          if v.IsSetterMethod then
              ctx.Writer.WriteLine(usage)
              ctx.Writer.Indent ctx.Indentation
              ctx.Writer.WriteLine("with set (v: {0}): unit = ", retType)
              ctx.Writer.Indent ctx.Indentation
              for line in ctx.MethodBody do
                  ctx.Writer.WriteLine(line)
              ctx.Writer.Unindent ctx.Indentation
  
              ctx.Writer.Unindent ctx.Indentation
          else
              ctx.Writer.Write(usage)
  
negative.code:             for iface in e.DeclaredInterfaces do
                  yield! getInterfaceMembers iface.TypeDefinition
              yield! e.MembersFunctionsAndValues |> Seq.filter (fun m -> 
                         // Use this hack when FCS doesn't return enough information on .NET properties
                         e.IsFSharp || not m.IsProperty)
           }
  
      let countInterfaceMembers e =
  