anchor.diff:  open Microsoft.FSharp.Quotations
   open MongoDB.Bson
   open MongoDB.Bson.Serialization
  +open ProviderImplementation
   open ProviderImplementation.ProvidedTypes
   open BsonProvider.Runtime
   open BsonProvider.Runtime.IO
  
positive.code:               DefaultResolutionFolder = cfg.ResolutionFolder
                ResolutionFolder = resolutionFolder }
  
          [ createGetSamplesMember spec path resolver :> MethodInfo ]
  
negative.code:         m.AddXmlDoc "Returns the entire set of sample BSON documents"
          m
  
      /// Generates the static ReadAll() method
      let private createReadAllMember (spec:TypeProviderSpec) =
  
          let args = [ ProvidedParameter("stream", typeof<Stream>) ]
          let returnType = spec.RepresentationType.MakeArrayType()
          let m = ProvidedMethod("ReadAll", args, returnType, IsStaticMethod = true)
  
          m.InvokeCode <- fun (Singleton stream) ->
              stream |> Expr.Cast |> spec.CreateFromStream
  
          m.AddXmlDoc "Reads BSON from the specified stream"
          m
  
      let createAllMembers (cfg:TypeProviderConfig) (spec:TypeProviderSpec)
                           path resolutionFolder resource =
  
  