anchor.diff:      args.ToString()
   
   let TypeScriptCompiler parameters files = 
  +    let typeScriptCompilerPath = typeScriptCompilerPath parameters.ToolPath
       let callResults =
           files
           |> Seq.map (buildArguments parameters)
  -        |> Seq.map typeScriptCompilerProcess
  +        |> Seq.map (typeScriptCompilerProcess typeScriptCompilerPath)
   
       let errors = Seq.collect (fun x -> x.Errors) callResults
       if errors |> Seq.isEmpty |> not then Seq.iter traceError errors
  
positive.code:     ModuleGeneration = CommonJs;
      EmitSourceMaps = false;
      NoLib = false;
  }
  
  let private TypeScriptCompilerPath =  @"[ProgramFilesX86]\Microsoft SDKs\TypeScript\0.9\;[ProgramFiles]\Microsoft SDKs\TypeScript\0.9\"
  
  let typeScriptCompilerPath = 
      if isUnix then
          "tsc"
      else
          findPath "TypeScriptPath" TypeScriptCompilerPath "tsc.exe"   
  
  
  let private typeScriptCompilerProcess arguments  =
      let p = (fun (info:Diagnostics.ProcessStartInfo)-> 
          info.FileName <- typeScriptCompilerPath
          info.Arguments <- arguments )
      ExecProcessAndReturnMessages p TimeSpan.MaxValue
  
  
negative.code:     ModuleGeneration : ModuleGeneration;
      EmitSourceMaps : bool;
      NoLib : bool;
      ToolPath : string
  } 
  
  let TypeScriptDefaultParams = {
  