Added failsafe catch until FCS updates

VincentDondain · Feb 27, 2015 · 089ae53 · 089ae53
1 parent 645411f
commit 089ae53
Showing 1 changed file with 4 additions and 1 deletion.
diff --git a/monodevelop/MonoDevelop.FSharpBinding/FSharpSymbolHelper.fs b/monodevelop/MonoDevelop.FSharpBinding/FSharpSymbolHelper.fs
@@ -285,7 +285,10 @@ module SymbolTooltips =
             |> Seq.map Seq.toList 
             |> Seq.toList 
 
-        let retType =  asType UserType (escapeText(func.ReturnParameter.Type.Format displayContext))
+        let retType = 
+            try
+                asType UserType (escapeText(func.ReturnParameter.Type.Format displayContext))
+            with _ex -> "Unknown"
 
         let padLength = 
             let allLengths = argInfos |> List.concat |> List.map (fun p -> p.DisplayName.Length)