@@ -1954,14 +1954,24 @@ type FSharpCheckFileResults(errors: FSharpErrorInfo[], scopeOptX: TypeCheckInfo
19541954member info.HasFullTypeCheckInfo = details.IsSome
19551955
19561956/// Intellisense autocompletions
1957- member info.GetDeclarationListInfo ( parseResultsOpt , line , colAtEndOfNamesAndResidue , lineStr , qualifyingNames , partialName , ? hasTextChangedSinceLastTypecheck ) =
1958- let hasTextChangedSinceLastTypecheck = defaultArg hasTextChangedSinceLastTypecheck( fun _ -> false )
1959- reactorOp" GetDeclarations" FSharpDeclarationListInfo.Empty( fun scope ->
1960- let sw = System.Diagnostics.Stopwatch.StartNew()
1961- let r = scope.GetDeclarations( parseResultsOpt, line, lineStr, colAtEndOfNamesAndResidue, qualifyingNames, partialName, hasTextChangedSinceLastTypecheck)
1962- System.IO.File.WriteAllText( @" e:\___3.txt" , sprintf" scope.GetDeclarations:%O " sw.Elapsed)
1963- r
1964- )
1957+ //member info.GetDeclarationListInfo(parseResultsOpt, line, colAtEndOfNamesAndResidue, lineStr, qualifyingNames, partialName, ?hasTextChangedSinceLastTypecheck) =
1958+ // let hasTextChangedSinceLastTypecheck = defaultArg hasTextChangedSinceLastTypecheck (fun _ -> false)
1959+ // reactorOp "GetDeclarations" FSharpDeclarationListInfo.Empty (fun scope ->
1960+ // let sw = System.Diagnostics.Stopwatch.StartNew()
1961+ // let r = scope.GetDeclarations(parseResultsOpt, line, lineStr, colAtEndOfNamesAndResidue, qualifyingNames, partialName, hasTextChangedSinceLastTypecheck)
1962+ // System.IO.File.WriteAllText(@"e:\___3.txt", sprintf "scope.GetDeclarations: %O" sw.Elapsed)
1963+ // r
1964+ // )
1965+
1966+ member info.GetDeclarationListInfo ( parseResultsOpt , line , colAtEndOfNamesAndResidue , lineStr , qualifyingNames , partialName , ? hasTextChangedSinceLastTypecheck ) =
1967+ async {
1968+ let hasTextChangedSinceLastTypecheck = defaultArg hasTextChangedSinceLastTypecheck( fun _ -> false )
1969+ return
1970+ threadSafeOp
1971+ ( fun () -> failwith" not available" )
1972+ ( fun ( scope , _builder , _reactor ) ->
1973+ scope.GetDeclarations( parseResultsOpt, line, lineStr, colAtEndOfNamesAndResidue, qualifyingNames, partialName, hasTextChangedSinceLastTypecheck))
1974+ }
19651975
19661976member info.GetDeclarationListSymbols ( parseResultsOpt , line , colAtEndOfNamesAndResidue , lineStr , qualifyingNames , partialName , ? hasTextChangedSinceLastTypecheck ) =
19671977let hasTextChangedSinceLastTypecheck = defaultArg hasTextChangedSinceLastTypecheck( fun _ -> false )