From 6eb8bcaf4fd7df704d56622de0fc20fd3e889487 Mon Sep 17 00:00:00 2001 From: Eugene Auduchinok Date: Tue, 6 Aug 2024 15:06:02 +0200 Subject: [PATCH] Fantomas --- src/Compiler/Service/ServiceInterfaceStubGenerator.fs | 9 +++++---- src/Compiler/Symbols/Symbols.fs | 2 +- 2 files changed, 6 insertions(+), 5 deletions(-) diff --git a/src/Compiler/Service/ServiceInterfaceStubGenerator.fs b/src/Compiler/Service/ServiceInterfaceStubGenerator.fs index fce448d27d0b..2d48b46fa009 100644 --- a/src/Compiler/Service/ServiceInterfaceStubGenerator.fs +++ b/src/Compiler/Service/ServiceInterfaceStubGenerator.fs @@ -352,10 +352,11 @@ module InterfaceStubGenerator = | _, true, _, name -> name + parArgs // Ordinary functions or values | false, _, _, name when - v.ApparentEnclosingEntity - |> Option.map _.HasAttribute() - |> Option.defaultValue false - |> not -> + v.ApparentEnclosingEntity + |> Option.map _.HasAttribute() + |> Option.defaultValue false + |> not + -> name + " " + parArgs // Ordinary static members or things (?) that require fully qualified access | _, _, _, name -> name + parArgs diff --git a/src/Compiler/Symbols/Symbols.fs b/src/Compiler/Symbols/Symbols.fs index b6f872c163c1..2e732994dd64 100644 --- a/src/Compiler/Symbols/Symbols.fs +++ b/src/Compiler/Symbols/Symbols.fs @@ -1702,7 +1702,7 @@ type FSharpMemberOrFunctionOrValue(cenv, d:FSharpMemberOrValData, item) = | Some v -> v | None -> failwith "DeclarationLocation property not available" - member _.DeclaringEntity: FSharpEntity option = + member _.DeclaringEntity: FSharpEntity option = checkIsResolved() match d with | E e -> FSharpEntity(cenv, e.DeclaringTyconRef) |> Some