anchor.diff:  
   /// Represents a file in blob storage.
   [<AbstractClass>]
  -type BlobFile internal (defaultConnectionString, container, path, getBlobRef : _ -> ICloudBlob) =
  -    let getBlobRef connectionString = getBlobRef (defaultArg connectionString defaultConnectionString, container, path)
  +type BlobFile internal (defaultConnectionString, container, file, getBlobRef : _ -> ICloudBlob) =
  +    let getBlobRef connectionString = getBlobRef (defaultArg connectionString defaultConnectionString, container, file)
       let blobProperties =
           lazy
               let blobRef = getBlobRef None
  
positive.code:         PageBlobFile(connectionString, containerName, path)
  
  /// Represents a pseudo-folder in blob storage.
  type BlobFolder internal (defaultConnectionString, container, path) = 
      /// Downloads the entire folder contents to the local file system asynchronously.
      member __.Download(path, ?connectionString) =
          let connectionDetails = defaultArg connectionString defaultConnectionString, container, path
          downloadFolder (connectionDetails, path)
  
      /// The Path of the current folder
      member __.Path = path
  
      /// Lists all blobs contained in this folder
      member __.ListBlobs(?includeSubfolders) = 
          let includeSubfolders = defaultArg includeSubfolders false
          let container = getContainerRef (defaultConnectionString, container)
          
          listBlobs includeSubfolders container path
          |> Seq.choose (function
              | Blob(path, _, blobType, _) -> 
                  match blobType with
  
negative.code: 
      override this.ToString() = this.Name
  
  type BlockBlobFile internal (defaultConnectionString, container, file) =
      inherit BlobFile(defaultConnectionString, container, file, (getBlockBlobRef >> fun x -> x :> ICloudBlob))
      let getBlobRef connectionString = getBlockBlobRef(defaultArg connectionString defaultConnectionString, container, file)
  
      /// Gets a handle to the Azure SDK client for this blob.
      member __.AsCloudBlockBlob(?connectionString) = getBlobRef connectionString
  