anchor.diff:  
   
   module Utils =
  -    /// Create hard link at dest with source
  +    /// Create hard link at dest with source.
       let CreateHardLink dest source =
           Kernel32.CreateHardLink(dest, source, IntPtr.Zero)
       
  -    /// get all transformed files of a sequence of directories by extension
  +    /// Get all transformed files of a sequence of directories by extension.
       let GetFilesTransformed transform caseSensitive ext dirs =
           dirs |> Seq.collect (Directory.GetFilesTransformed transform caseSensitive ext) |> Array.ofSeq
   
  -    /// get FileInfo of all files of a sequence of directories by extension
  +    /// Get FileInfo of all files of a sequence of directories by extension.
       let GetFileInfos caseSensitive ext dirs = 
           GetFilesTransformed (fun x -> new FileInfo(x)) caseSensitive ext dirs
   
  -    /// get FullName of all files of a sequence of directories by extension
  +    /// Get FullName of all files of a sequence of directories by extension.
       let GetFiles caseSensitive ext dirs = 
           GetFilesTransformed id caseSensitive ext dirs
   
  
positive.code:     let ``Utils.GetFilesGroupedBySHA1``() =
          hashedMultiFilesSHA1  
  
      let Run() =
          ``Kernel32.Create hard link``()
          ``Utils.GetFile``() |> printfn "%d"
  
negative.code:             with _ -> None
          files |> Array.map hashedFile |> Array.choose id
  
      /// Get SHA1-hashes with label and elapsed calculation time for each given file.
      let GetFileSHA1 verbose files = 
          files
          |> GetFilesHashedDiagnostic verbose [|"SHA1", HashAlgorithm.Create("SHA1")|] 
  