anchor.diff:  
       let getTomlReference (target : Target.Target) (reference : ProjectReference) =
           let path = reference.Include |> Path.GetFullPath
  +        let dir = Path.GetDirectoryName path
           let proj = FsToml.Parser.parse path
           let config = proj.Configurations |> Target.getConfig target
           let name = getName proj
  -        Path.Combine(path |> Path.GetDirectoryName, Configuration.getOutputPath config name)
  +        Path.Combine(path |> Path.GetDirectoryName, Configuration.getOutputPath config dir name)
   
       let getFsprojReference (target : Target.Target) (reference : ProjectReference) =
           let path = reference.Include |> Path.GetFullPath
  
positive.code: 
  let getCompilerParams (target : Target.Target) ((path,project) : string * FsTomlProject) =
      let p = System.IO.Directory.GetCurrentDirectory ()
      System.IO.Directory.SetCurrentDirectory(System.IO.Path.GetDirectoryName path)
      let name = getName project
      let cfg = project.Configurations |> Target.getConfig target |> Configuration.getCompilerParams target name
      let refs = project.References |> References.getCompilerParams target (project.FSharpCore.ToString())
      let files = project.Files |> Files.getCompilerParams
      let projRefs = project.ProjectReferences |> ProjectReferences.getCompilerParams target
      System.IO.Directory.SetCurrentDirectory p
  
      [|
          yield "--noframework"
          yield "--fullpaths"
          yield "--flaterrors"
          yield "--subsystemversion:6.00"
          yield "--highentropyva+"
  
negative.code:                     yield "-d:" + c
              yield "--debug" + debug
              yield "--optimize" + if cfg.Optimize |> Option.exists id then "+" else "-"
              yield "--platform:" + platofrm
              yield "--warn:" + string (defaultArg cfg.WarningLevel 3)
              yield "--out:" + outPath
              // yield "--doc:" + xmlPath
              match cfg.NoWarn with
              | None | Some [||] -> ()
              | Some nowarns -> yield "--nowarn:" + (nowarns |> Seq.map (string) |> String.concat ",")
  