anchor.diff:  module Fake.ZipHelper
   
   open System.IO
  -open ICSharpCode.SharpZipLib.Checksums
   open ICSharpCode.SharpZipLib.Zip
   open System.Globalization
   open System
  -open ICSharpCode.SharpZipLib
   
   /// The default zip level
  -let DefaultZipLevel = 6
  +let DefaultZipLevel = 7
   
   /// Creates a zip file with the given files
   let CreateZip workingDir fileName comment level flatten files =
  -  let crc = new Crc32()
     let workingDir =
       let dir = new DirectoryInfo(workingDir)
       if not dir.Exists then failwithf "Directory not found: %s" dir.FullName
  
positive.code:   if not (String.IsNullOrEmpty comment) then      
      stream.SetComment comment
      
    let buffer = Array.create 32768 (byte 0)
  
    for item in files do      
      let info = new FileInfo(item)      
  
negative.code: /// Parameter 2: fileName - The fileName of the zip file.
  let Unzip target fileName =  
      let zip = new FastZip()
      zip.ExtractZip (fileName, target, "")