Movatterモバイル変換

[0]ホーム
URL:

Skip to content

Navigation Menu

Sign in
Appearance settings

Search code, repositories, users, issues, pull requests...

Provide feedback

We read every piece of feedback, and take your input very seriously.

Saved searches

Use saved searches to filter your results more quickly

 Sign up
Appearance settings

Commit6e38ed8

Browse files
committed
Added new test for completion provider for @ characters. Removed a test from old completion tests.
1 parent187674c commit6e38ed8

File tree

2 files changed

+21
-7
lines changed

2 files changed

+21
-7
lines changed

‎vsintegration/tests/unittests/CompletionProviderTests.fs‎

Lines changed: 21 additions & 6 deletions
Original file line numberDiff line numberDiff line change
@@ -83,19 +83,19 @@ let VerifyCompletionList(fileContents: string, marker: string, expected: string
8383
if hasExpectedNotFound|| hasUnexpectedFoundthen
8484
letexpectedNotFoundMsg=
8585
if hasExpectedNotFoundthen
86-
sprintf"Expected completions not found:%s"(formatCompletions expectedNotFound)
86+
sprintf"\nExpected completions not found:%s\n"(formatCompletions expectedNotFound)
8787
else
8888
String.Empty
8989

9090
letunexpectedFoundMsg=
9191
if hasUnexpectedFoundthen
92-
sprintf"Unexpected completions found:%s"(formatCompletions unexpectedFound)
92+
sprintf"\nUnexpected completions found:%s\n"(formatCompletions unexpectedFound)
9393
else
9494
String.Empty
9595

96-
letcompletionsMsg= sprintf"Completions:%s"(formatCompletions results)
96+
letcompletionsMsg= sprintf"\ninCompletions:%s"(formatCompletions results)
9797

98-
letmsg= sprintf"\n%s\n%s\n in%s" expectedNotFoundMsg unexpectedFoundMsg completionsMsg
98+
letmsg= sprintf"%s%s%s" expectedNotFoundMsg unexpectedFoundMsg completionsMsg
9999

100100
Assert.Fail(msg)
101101

@@ -295,7 +295,7 @@ x.
295295
"ToArray";"ToString";"TrimExcess";"TrueForAll"]
296296
VerifyCompletionListExactly(fileContents,"x.", expected)
297297

298-
[<Test>]
298+
[<Test;Ignore("Before this test can pass, the test below needs to pass. Related to: https://github.com/Microsoft/visualfsharp/issues/2973")>]
299299
let``Constructing a new class with object initializer syntax``()=
300300
letfileContents="""
301301
type A() =
@@ -310,7 +310,22 @@ let _ = new A(Setta
310310
letnotExpected=["NonSettableProperty"]
311311
VerifyCompletionList(fileContents,"(Setta", expected, notExpected)
312312

313-
[<Test>]
313+
[<Test;Ignore("https://github.com/Microsoft/visualfsharp/issues/2973")>]
314+
let``Constructing a new class with object initializer syntax and verifying'at' character doesn't exist.``()=
315+
letfileContents="""
316+
type A() =
317+
member val SettableProperty = 1 with get, set
318+
member val AnotherSettableProperty = 1 with get, set
319+
member val NonSettableProperty = 1
320+
321+
let _ = new A(Setta
322+
"""
323+
324+
letexpected=[]
325+
letnotExpected=["SettableProperty@";"AnotherSettableProperty@";"NonSettableProperty@"]
326+
VerifyCompletionList(fileContents,"(Setta", expected, notExpected)
327+
328+
[<Test;Ignore("https://github.com/Microsoft/visualfsharp/issues/3954")>]
314329
let``Constructing a new fully qualified class with object initializer syntax``()=
315330
letfileContents="""
316331
module M =

‎vsintegration/tests/unittests/Tests.LanguageService.Completion.fs‎

Lines changed: 0 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -596,7 +596,6 @@ a.
596596
AssertCtrlSpaceCompleteContains(typeDef3@["new M.A((**))"])"A((**)"["SettableProperty";"AnotherSettableProperty"]["NonSettableProperty"]
597597
AssertCtrlSpaceCompleteContains(typeDef3@["new M.A(S = 1)"])"A(S"["SettableProperty"]["NonSettableProperty"]
598598
AssertCtrlSpaceCompleteContains(typeDef3@["new M.A(S = 1)"])"A(S = 1"[]["NonSettableProperty";"SettableProperty"]// neg test
599-
AssertCtrlSpaceCompleteContains(typeDef3@["new M.A(S = 1,)"])"A(S = 1,"["AnotherSettableProperty"]["NonSettableProperty"]
600599

601600
lettypeDef4=
602601
[

0 commit comments

Comments
 (0)
[8]ページ先頭
©2009-2025 Movatter.jp