Capturing broken QuickTips for hidden methods in test - references #50

forki · Jan 21, 2015 · 5f27136 · 5f27136
1 parent 438eae2
commit 5f27136
Showing 1 changed file with 21 additions and 0 deletions.
diff --git a/vsintegration/src/unittests/Tests.LanguageService.QuickInfo.fs b/vsintegration/src/unittests/Tests.LanguageService.QuickInfo.fs
@@ -165,6 +165,27 @@ type QuickInfoTests() =
             f = (fun ((text, _), _) -> printfn "actual %s" text; Assert.IsTrue(text.Contains "tooltip for operator"))
             )
 
+    [<Test>]
+    member public this.``QuickInfo.HiddenMember``() =
+        // Tooltips showed hidden members - #50
+        let source = """
+            open System.ComponentModel
+
+            type TypeU = { Element : string }
+                with
+                  [<EditorBrowsableAttribute(EditorBrowsableState.Never)>] 
+                  [<CompilerMessageAttribute("This method is intended for use in generated code only.", 10001, IsHidden=true, IsError=false)>] 
+                  member x._Print = x.Element.ToString() 
+
+            let u = { Element = "abc" }
+            """
+        this.CheckTooltip(
+            code = source,
+            marker = "ypeU =",
+            atStart = true,
+            f = (fun ((text, _), _) -> printfn "actual %s" text; Assert.IsFalse(text.Contains "member _Print"))
+            )
+
     [<Test>]
     member public this.``QuickInfo.OverriddenMethods``() =
         let source = """