From 24eefbe9a88d36d96d083952331bb5bc4f7dde62 Mon Sep 17 00:00:00 2001 From: Eugene Auduchinok Date: Fri, 20 Oct 2023 20:12:38 +0200 Subject: [PATCH 1/2] Checker: invalidate type check cache when clearing project --- src/Compiler/Service/service.fs | 9 ++++++++- 1 file changed, 8 insertions(+), 1 deletion(-) diff --git a/src/Compiler/Service/service.fs b/src/Compiler/Service/service.fs index f4ecaad9355..a5fb62c4aa4 100644 --- a/src/Compiler/Service/service.fs +++ b/src/Compiler/Service/service.fs @@ -1244,7 +1244,14 @@ type BackgroundCompiler lock gate (fun () -> options - |> Seq.iter (fun options -> incrementalBuildersCache.RemoveAnySimilar(AnyCallerThread, options))) + |> Seq.iter (fun options -> + incrementalBuildersCache.RemoveAnySimilar(AnyCallerThread, options) + + parseCacheLock.AcquireLock(fun ltok -> + for sourceFile in options.SourceFiles do + checkFileInProjectCache.RemoveAnySimilar(ltok, (sourceFile, 0L, options))) + ) + ) member _.NotifyProjectCleaned(options: FSharpProjectOptions, userOpName) = use _ = From 48374e4cedc053f245fc30c4735b7308992efe80 Mon Sep 17 00:00:00 2001 From: Eugene Auduchinok Date: Sat, 21 Oct 2023 10:23:37 +0200 Subject: [PATCH 2/2] Fantomas --- src/Compiler/Service/service.fs | 6 ++---- 1 file changed, 2 insertions(+), 4 deletions(-) diff --git a/src/Compiler/Service/service.fs b/src/Compiler/Service/service.fs index a5fb62c4aa4..615b7458691 100644 --- a/src/Compiler/Service/service.fs +++ b/src/Compiler/Service/service.fs @@ -1246,12 +1246,10 @@ type BackgroundCompiler options |> Seq.iter (fun options -> incrementalBuildersCache.RemoveAnySimilar(AnyCallerThread, options) - + parseCacheLock.AcquireLock(fun ltok -> for sourceFile in options.SourceFiles do - checkFileInProjectCache.RemoveAnySimilar(ltok, (sourceFile, 0L, options))) - ) - ) + checkFileInProjectCache.RemoveAnySimilar(ltok, (sourceFile, 0L, options))))) member _.NotifyProjectCleaned(options: FSharpProjectOptions, userOpName) = use _ =