提交 aacb7966 编写于 作者: V Vasily Kirichenko

fix tests

上级 f3d67ffd
......@@ -634,15 +634,18 @@ let _ =
let r = su.RangeAlternate
su.Symbol.ToString(), (r.StartLine, r.StartColumn, r.EndLine, r.EndColumn))
|> shouldEqual
[|("System", (2, 5, 2, 11))
("ConsoleKey", (5, 10, 5, 20))
("field Tab", (5, 10, 5, 24))
("ConsoleKey", (6, 6, 6, 16))
("field OemClear", (6, 6, 6, 25))
("ConsoleKey", (6, 29, 6, 39))
("field A", (6, 29, 6, 41))
("ConsoleKey", (7, 11, 7, 21))
("field B", (7, 11, 7, 23))
// note: these "System" sysbol uses are not duplications because each of them corresponts to different namespaces
[|("System", (2, 5, 2, 11)); ("System", (2, 5, 2, 11));
("System", (2, 5, 2, 11)); ("System", (2, 5, 2, 11));
("System", (2, 5, 2, 11)); ("System", (2, 5, 2, 11));
("System", (2, 5, 2, 11)); ("System", (2, 5, 2, 11));
("System", (2, 5, 2, 11)); ("System", (2, 5, 2, 11));
("System", (2, 5, 2, 11)); ("System", (2, 5, 2, 11));
("System", (2, 5, 2, 11)); ("System", (2, 5, 2, 11));
("ConsoleKey", (5, 10, 5, 20)); ("field Tab", (5, 10, 5, 24));
("ConsoleKey", (6, 6, 6, 16)); ("field OemClear", (6, 6, 6, 25));
("ConsoleKey", (6, 29, 6, 39)); ("field A", (6, 29, 6, 41));
("ConsoleKey", (7, 11, 7, 21)); ("field B", (7, 11, 7, 23));
("Test", (1, 0, 1, 0))|]
[<Test>]
......
......@@ -3688,32 +3688,33 @@ let ``Test Project25 symbol uses of type-provided members`` () =
allUses |> shouldEqual
[|("FSharp.Data", "file1", ((3, 5), (3, 16)), ["namespace"; "provided"]);
("FSharp.Data.XmlProvider", "file1", ((4, 15), (4, 26)),
["class"; "provided"; "erased"]);
("FSharp.Data.XmlProvider", "file1", ((4, 15), (4, 26)),
["class"; "provided"; "erased"]);
("FSharp.Data.XmlProvider", "file1", ((4, 15), (4, 26)),
["class"; "provided"; "erased"]);
("FSharp.Data.XmlProvider", "file1", ((4, 15), (4, 26)),
["class"; "provided"; "erased"]);
("TypeProviderTests.Project", "file1", ((4, 5), (4, 12)), ["abbrev"]);
("TypeProviderTests.Project", "file1", ((5, 8), (5, 15)), ["abbrev"]);
("FSharp.Data.XmlProvider<...>.GetSample", "file1", ((5, 8), (5, 25)),
["member"]);
("Microsoft.FSharp.Core.int", "file1", ((7, 23), (7, 26)), ["abbrev"]);
("Microsoft.FSharp.Core.int", "file1", ((7, 23), (7, 26)), ["abbrev"]);
("TypeProviderTests.Record.Field", "file1", ((7, 16), (7, 21)), ["field"]);
("TypeProviderTests.Record", "file1", ((7, 5), (7, 11)), ["record"]);
("TypeProviderTests.Record", "file1", ((8, 10), (8, 16)), ["record"]);
("TypeProviderTests.Record.Field", "file1", ((8, 17), (8, 22)), ["field"]);
("TypeProviderTests.r", "file1", ((8, 4), (8, 5)), ["val"]);
("FSharp.Data.XmlProvider", "file1", ((10, 8), (10, 19)),
["class"; "provided"; "erased"]);
("FSharp.Data.XmlProvider<...>", "file1", ((10, 8), (10, 68)),
["class"; "provided"; "staticinst"; "erased"]);
("FSharp.Data.XmlProvider<...>.GetSample", "file1", ((10, 8), (10, 78)),
["member"]); ("TypeProviderTests", "file1", ((2, 7), (2, 24)), ["module"])|]
[|("FSharp.Data", "file1", ((3, 5), (3, 16)), ["namespace"; "provided"]);
("Microsoft.FSharp.Data", "file1", ((3, 5), (3, 16)), ["namespace"]);
("FSharp.Data.XmlProvider", "file1", ((4, 15), (4, 26)),
["class"; "provided"; "erased"]);
("FSharp.Data.XmlProvider", "file1", ((4, 15), (4, 26)),
["class"; "provided"; "erased"]);
("FSharp.Data.XmlProvider", "file1", ((4, 15), (4, 26)),
["class"; "provided"; "erased"]);
("FSharp.Data.XmlProvider", "file1", ((4, 15), (4, 26)),
["class"; "provided"; "erased"]);
("TypeProviderTests.Project", "file1", ((4, 5), (4, 12)), ["abbrev"]);
("TypeProviderTests.Project", "file1", ((5, 8), (5, 15)), ["abbrev"]);
("FSharp.Data.XmlProvider<...>.GetSample", "file1", ((5, 8), (5, 25)),
["member"]);
("Microsoft.FSharp.Core.int", "file1", ((7, 23), (7, 26)), ["abbrev"]);
("Microsoft.FSharp.Core.int", "file1", ((7, 23), (7, 26)), ["abbrev"]);
("TypeProviderTests.Record.Field", "file1", ((7, 16), (7, 21)), ["field"]);
("TypeProviderTests.Record", "file1", ((7, 5), (7, 11)), ["record"]);
("TypeProviderTests.Record", "file1", ((8, 10), (8, 16)), ["record"]);
("TypeProviderTests.Record.Field", "file1", ((8, 17), (8, 22)), ["field"]);
("TypeProviderTests.r", "file1", ((8, 4), (8, 5)), ["val"]);
("FSharp.Data.XmlProvider", "file1", ((10, 8), (10, 19)),
["class"; "provided"; "erased"]);
("FSharp.Data.XmlProvider<...>", "file1", ((10, 8), (10, 68)),
["class"; "provided"; "staticinst"; "erased"]);
("FSharp.Data.XmlProvider<...>.GetSample", "file1", ((10, 8), (10, 78)),
["member"]); ("TypeProviderTests", "file1", ((2, 7), (2, 24)), ["module"])|]
let getSampleSymbolUseOpt =
backgroundTypedParse1.GetSymbolUseAtLocation(5,25,"",["GetSample"])
|> Async.RunSynchronously
......
Markdown is supported
0% .
You are about to add 0 people to the discussion. Proceed with caution.
先完成此消息的编辑!
想要评论请 注册