Skip to content
体验新版
项目
组织
正在加载...
登录
切换导航
打开侧边栏
dotNET Platform
fsharp
提交
aacb7966
F
fsharp
项目概览
dotNET Platform
/
fsharp
12 个月 前同步成功
通知
0
Star
1
Fork
0
代码
文件
提交
分支
Tags
贡献者
分支图
Diff
Issue
0
列表
看板
标记
里程碑
合并请求
0
DevOps
流水线
流水线任务
计划
Wiki
0
Wiki
分析
仓库
DevOps
项目成员
Pages
F
fsharp
项目概览
项目概览
详情
发布
仓库
仓库
文件
提交
分支
标签
贡献者
分支图
比较
Issue
0
Issue
0
列表
看板
标记
里程碑
合并请求
0
合并请求
0
Pages
DevOps
DevOps
流水线
流水线任务
计划
分析
分析
仓库分析
DevOps
Wiki
0
Wiki
成员
成员
收起侧边栏
关闭侧边栏
动态
分支图
创建新Issue
流水线任务
提交
Issue看板
体验新版 GitCode,发现更多精彩内容 >>
提交
aacb7966
编写于
10月 25, 2017
作者:
V
Vasily Kirichenko
浏览文件
操作
浏览文件
下载
电子邮件补丁
差异文件
fix tests
上级
f3d67ffd
变更
2
隐藏空白更改
内联
并排
Showing
2 changed file
with
39 addition
and
35 deletion
+39
-35
tests/service/EditorTests.fs
tests/service/EditorTests.fs
+12
-9
tests/service/ProjectAnalysisTests.fs
tests/service/ProjectAnalysisTests.fs
+27
-26
未找到文件。
tests/service/EditorTests.fs
浏览文件 @
aacb7966
...
...
@@ -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
>]
...
...
tests/service/ProjectAnalysisTests.fs
浏览文件 @
aacb7966
...
...
@@ -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.
先完成此消息的编辑!
取消
想要评论请
注册
或
登录