anchor.diff:  let loopFiles (dir : string) = Directory.EnumerateFiles(dir)
   let createDir (dir : string) = Directory.CreateDirectory(dir) |> ignore
   let (!>) (content : string) = printfn "%s" content |> ignore
  -let (!>>) (content : string) = printfn @"/t%s" content |> ignore
  +let (!>>) (content : string) = printfn "\t%s" content |> ignore
   let OK() = printfn "[SUCCESS]"
   let FAIL() = printfn "[FAILED]"
   
  
positive.code:                                          else if entry.FullName.StartsWith("META-INF") then entry.FullName :: acc
                                           else acc) [] archive.Entries
                                   toBeDeleted |> Seq.iter (fun res -> archive.GetEntry(res).Delete()))
  // Generate new meta data information
  loopDir TempDirectory |> Seq.iter (fun dir -> 
                               loopFiles dir |> Seq.iter (fun file -> 
                                                    let dirInfo = new DirectoryInfo(Path.GetDirectoryName(file))
                                                    let targetFileName = ConvertNamingConvention(dirInfo.Name)
                                                    let targetPath = ServicesDirectory <!!> targetFileName
                                                    File.AppendAllLines(targetPath, CreateServiceFile(file))))
  // Create meta data jar
  ZipFile.CreateFromDirectory(MetaDirectory, LuceneDirectory <!!> "Metadata.jar")
  loopFiles LibSrcDirectory |> Seq.iter (fun f -> File.Copy(f, LibTargetDirectory <!!> (Path.GetFileName(f))))
  
  let CreateFatJar() = 
      loopFiles LuceneDirectory |> Seq.iter (fun x -> ZipFile.ExtractToDirectory(x, MetaDirectory))
      ZipFile.CreateFromDirectory(MetaDirectory, WorkDirectory <!!> "FlexLucene.jar")
  
  !>"Execute ProGuard pass 1"
  !>"Move proguard.cfg to work directory"
  File.Copy(RootDirectory <!!> "proguard.cfg", WorkDirectory <!!> "proguard.cfg")
  cmdExec """-jar ProGuard.jar @work\proguard.cfg"""
  
  let GetIkvmBuildString() = 
      let sb = new System.Text.StringBuilder()
  
negative.code: #r "dll/Mono.Cecil.Rocks.dll"
  
  open Mono.Cecil
  open Mono.Cecil.Cil
  open System
  open System.ComponentModel
  open System.Diagnostics
  open System.IO
  open System.IO.Compression
  open System.Linq
  
  // Generic helpers
  let (<!!>) (path1 : string) (path2 : string) = Path.Combine([| path1; path2 |])
  