Cleanup

safesparrow · safesparrow · commit e4643f2b89f0 · 2022-11-09T01:31:05.000Z
diff --git a/tests/ParallelTypeCheckingTests/ParallelTypeCheckingTests.fsproj b/tests/ParallelTypeCheckingTests/ParallelTypeCheckingTests.fsproj
@@ -49,6 +49,7 @@
     <Content Include="Tests\FCS.args.txt" />
     <Content Include="Tests\FCS.prepare.ps1" />
     <Content Include="Tests\ComponentTests.args.txt" />
+    <Content Include="Tests\.gitignore" />
     <Compile Include="Program.fs" />
   <Content Include="Docs.md" />
   </ItemGroup>
diff --git a/tests/ParallelTypeCheckingTests/Tests/TestCompilationFromCmdlineArgs.fs b/tests/ParallelTypeCheckingTests/Tests/TestCompilationFromCmdlineArgs.fs
@@ -31,7 +31,7 @@ let internal setupParsed config =
     setupCompilationMethod method
         
     printfn $"WorkingDir = {workingDir}"
-    workingDir |> Option.iter (fun dir -> Environment.CurrentDirectory <- replaceCodeRoot dir)
+    workingDir |> Option.iter (fun dir -> Environment.CurrentDirectory <- dir)
     args
 
 let internal TestCompilerFromArgs (config : Args) : unit =
diff --git a/tests/ParallelTypeCheckingTests/Tests/Utils.fs b/tests/ParallelTypeCheckingTests/Tests/Utils.fs
@@ -11,9 +11,6 @@ open OpenTelemetry
 open OpenTelemetry.Resources
 open OpenTelemetry.Trace
 
-let CodeRoot =
-    @$"{__SOURCE_DIRECTORY__}\.checkouts\fcs"
-let replaceCodeRoot (s : string) = s.Replace("$CODE_ROOT$", CodeRoot)
 let packages =
     // Here we assume that the NuGet packages are located in a certain user folder,
     // and that the projects being compiled use that global package cache
@@ -22,7 +19,6 @@ let packages =
     Environment.ExpandEnvironmentVariables(pathWithEnv);
 let replacePaths (s : string) =
     s
-    |> replaceCodeRoot
     |> fun s -> s.Replace("$PACKAGES$", packages)
 
 [<Struct>]
