Welcome to mirror list, hosted at ThFree Co, Russian Federation.

github.com/mono/monodevelop.git - Unnamed repository; edit this file 'description' to name the repository.
summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
Diffstat (limited to 'main/external/fsharpbinding/MonoDevelop.FSharpBinding/FSharpSymbolHelper.fs')
-rw-r--r--main/external/fsharpbinding/MonoDevelop.FSharpBinding/FSharpSymbolHelper.fs8
1 files changed, 8 insertions, 0 deletions
diff --git a/main/external/fsharpbinding/MonoDevelop.FSharpBinding/FSharpSymbolHelper.fs b/main/external/fsharpbinding/MonoDevelop.FSharpBinding/FSharpSymbolHelper.fs
index eb50b4fe13..ec82b9f0b4 100644
--- a/main/external/fsharpbinding/MonoDevelop.FSharpBinding/FSharpSymbolHelper.fs
+++ b/main/external/fsharpbinding/MonoDevelop.FSharpBinding/FSharpSymbolHelper.fs
@@ -754,6 +754,14 @@ module SymbolTooltips =
match findVal with
| Some v -> v
| None -> apc.Group.OverallType.Format displayContext
+
+ let returnType (symbol:FSharpSymbolUse) =
+ match symbol with
+ | MemberFunctionOrValue m ->
+ LoggingService.logDebug "%s" m.DisplayName
+ Some m.ReturnParameter.Type
+ //| Entity c ->
+ | _ -> None
let footerForType (entity:FSharpSymbolUse) =
match entity with