anchor.diff:      ()
   
   let fsc = fscTargetingHelper None
  -let fscTargeting target = fscTargetingHelper (Some(target))+let fscTargeting target = fscTargetingHelper (Some(target))
  
positive.code:     | NET40
      | NET35
      | PORTABLE_47
  
  
  let systemDllsTargeting (target:TargetFramework) =
  
negative.code:             "System.Core.dll"
          ]
  
      let searchPaths (paths:string list) =
          paths
              |> Seq.map (fun p-> Path.GetFullPath p)
              |> Seq.filter (fun p -> Directory.Exists p)
  
  
  
      let fsharpCore =
          searchPaths fsharpPaths
              |> Seq.map (fun p -> Path.Combine(p, "FSharp.Core.dll"))
              |> Seq.find File.Exists
  
      let dllPath dll =
          searchPaths allStdPaths
              |> Seq.map (fun p -> Path.Combine(p, dll))
              |> Seq.tryFind File.Exists
  
      systemDlls
          |> List.choose dllPath
          |> List.append [fsharpCore]
  
  let fscTargetingHelper (target:TargetFramework option) (args:string list) =
  
      let sysDlls =
          match target with
          | Some(t) -> systemDllsTargeting t
                          |> List.map (fun p-> sprintf "--reference:%s" p)
                          |> List.append ["--noframework"]
          | None -> []
  
      let compilerOpts = ["fsc.exe"] @ sysDlls @ args
      log (compilerOpts|> String.concat " ")
      let scs = SimpleSourceCodeServices()
  