Skip to content
New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

More reactor queue dependency removal #11109

Merged
merged 10 commits into from
Feb 22, 2021
6 changes: 3 additions & 3 deletions src/fsharp/CompilerConfig.fs
Original file line number Diff line number Diff line change
Expand Up @@ -193,10 +193,10 @@ type TimeStampCache(defaultTimeStamp: DateTime) =
files.[fileName] <- v
v

member cache.GetProjectReferenceTimeStamp (pr: IProjectReference, ctok) =
member cache.GetProjectReferenceTimeStamp (pr: IProjectReference) =
let ok, v = projects.TryGetValue pr
if ok then v else
let v = defaultArg (pr.TryGetLogicalTimeStamp (cache, ctok)) defaultTimeStamp
let v = defaultArg (pr.TryGetLogicalTimeStamp (cache)) defaultTimeStamp
projects.[pr] <- v
v

Expand All @@ -215,7 +215,7 @@ and IProjectReference =
///
/// The operation returns None only if it is not possible to create an IncrementalBuilder for the project at all, e.g. if there
/// are fatal errors in the options for the project.
abstract TryGetLogicalTimeStamp: TimeStampCache * CompilationThreadToken -> System.DateTime option
abstract TryGetLogicalTimeStamp: TimeStampCache -> System.DateTime option

type AssemblyReference =
| AssemblyReference of range * string * IProjectReference option
Expand Down
4 changes: 2 additions & 2 deletions src/fsharp/CompilerConfig.fsi
Original file line number Diff line number Diff line change
Expand Up @@ -58,7 +58,7 @@ type IRawFSharpAssemblyData =
type TimeStampCache =
new: defaultTimeStamp: DateTime -> TimeStampCache
member GetFileTimeStamp: string -> DateTime
member GetProjectReferenceTimeStamp: IProjectReference * CompilationThreadToken -> DateTime
member GetProjectReferenceTimeStamp: IProjectReference -> DateTime

and IProjectReference =

Expand All @@ -76,7 +76,7 @@ and IProjectReference =
///
/// The operation returns None only if it is not possible to create an IncrementalBuilder for the project at all, e.g. if there
/// are fatal errors in the options for the project.
abstract TryGetLogicalTimeStamp: TimeStampCache * CompilationThreadToken -> System.DateTime option
abstract TryGetLogicalTimeStamp: TimeStampCache -> System.DateTime option

type AssemblyReference =
| AssemblyReference of range * string * IProjectReference option
Expand Down
Loading