Merge pull request #735 from jindraivanek/ionide-issue-362

Workaround fix #734 - exception on DescriptionText
fsharp · Mar 28, 2017 · 1ee6af6 · 1ee6af6
2 parents 0c002b9 + 67bd819
commit 1ee6af6
Showing 1 changed file with 5 additions and 2 deletions.
diff --git a/src/fsharp/vs/ServiceDeclarations.fs b/src/fsharp/vs/ServiceDeclarations.fs
@@ -286,8 +286,11 @@ module internal ItemDescriptionsImpl =
             // Generalize to get a formal signature 
             let formalTypars = tcref.Typars(m)
             let formalTypeInst = generalizeTypars formalTypars
-            let formalTypeInfo = ILTypeInfo.FromType g (TType_app(tcref,formalTypeInst))
-            Some(nlref.Ccu.FileName,formalTypars,formalTypeInfo)
+            let ty = TType_app(tcref,formalTypeInst)
+            if isILAppTy g ty then
+                let formalTypeInfo = ILTypeInfo.FromType g ty
+                Some(nlref.Ccu.FileName,formalTypars,formalTypeInfo)
+            else None
 
     let mkXmlComment thing =
         match thing with