Skip to content
体验新版
项目
组织
正在加载...
登录
切换导航
打开侧边栏
dotNET Platform
fsharp
提交
e0596f3a
F
fsharp
项目概览
dotNET Platform
/
fsharp
11 个月 前同步成功
通知
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,发现更多精彩内容 >>
提交
e0596f3a
编写于
11月 20, 2017
作者:
V
Vasily Kirichenko
提交者:
Kevin Ransom (msft)
11月 19, 2017
浏览文件
操作
浏览文件
下载
电子邮件补丁
差异文件
fix error range of wrong namespace in open declaration (#3966)
上级
ae6f593d
变更
1
隐藏空白更改
内联
并排
Showing
1 changed file
with
6 addition
and
6 deletion
+6
-6
src/fsharp/NameResolution.fs
src/fsharp/NameResolution.fs
+6
-6
未找到文件。
src/fsharp/NameResolution.fs
浏览文件 @
e0596f3a
...
@@ -1767,11 +1767,11 @@ let rec ResolveLongIndentAsModuleOrNamespace atMostOne amap m fullyQualified (ne
...
@@ -1767,11 +1767,11 @@ let rec ResolveLongIndentAsModuleOrNamespace atMostOne amap m fullyQualified (ne
UndefinedName
(
0
,
FSComp
.
SR
.
undefinedNameNamespaceOrModule
,
id
,
suggestModulesAndNamespaces
))
UndefinedName
(
0
,
FSComp
.
SR
.
undefinedNameNamespaceOrModule
,
id
,
suggestModulesAndNamespaces
))
let
m
oduleNotFoundErrorCache
=
ref
None
let
m
utable
moduleNotFoundErrorCache
=
None
let
moduleNotFound
(
modref
:
ModuleOrNamespaceRef
)
(
mty
:
ModuleOrNamespaceType
)
id
depth
=
let
moduleNotFound
(
modref
:
ModuleOrNamespaceRef
)
(
mty
:
ModuleOrNamespaceType
)
(
id
:
Ident
)
depth
=
match
!
moduleNotFoundErrorCache
with
match
moduleNotFoundErrorCache
with
|
Some
error
->
error
|
Some
(
oldId
,
error
)
when
oldId
=
id
.
idRange
->
error
|
None
->
|
_
->
let
suggestNames
()
=
let
suggestNames
()
=
mty
.
ModulesAndNamespacesByDemangledName
mty
.
ModulesAndNamespacesByDemangledName
|>
Seq
.
filter
(
fun
kv
->
IsEntityAccessible
amap
m
ad
(
modref
.
NestedTyconRef
kv
.
Value
))
|>
Seq
.
filter
(
fun
kv
->
IsEntityAccessible
amap
m
ad
(
modref
.
NestedTyconRef
kv
.
Value
))
...
@@ -1779,7 +1779,7 @@ let rec ResolveLongIndentAsModuleOrNamespace atMostOne amap m fullyQualified (ne
...
@@ -1779,7 +1779,7 @@ let rec ResolveLongIndentAsModuleOrNamespace atMostOne amap m fullyQualified (ne
|>
HashSet
|>
HashSet
let
error
=
raze
(
UndefinedName
(
depth
,
FSComp
.
SR
.
undefinedNameNamespace
,
id
,
suggestNames
))
let
error
=
raze
(
UndefinedName
(
depth
,
FSComp
.
SR
.
undefinedNameNamespace
,
id
,
suggestNames
))
moduleNotFoundErrorCache
:=
Some
error
moduleNotFoundErrorCache
<-
Some
(
id
.
idRange
,
error
)
error
error
match
moduleOrNamespaces
.
TryFind
id
.
idText
with
match
moduleOrNamespaces
.
TryFind
id
.
idText
with
...
...
编辑
预览
Markdown
is supported
0%
请重试
或
添加新附件
.
添加附件
取消
You are about to add
0
people
to the discussion. Proceed with caution.
先完成此消息的编辑!
取消
想要评论请
注册
或
登录