Skip to content
体验新版
项目
组织
正在加载...
登录
切换导航
打开侧边栏
lwm1986
roslyn
提交
21ca5b72
R
roslyn
项目概览
lwm1986
/
roslyn
与 Fork 源项目一致
从无法访问的项目Fork
通知
1
Star
0
Fork
0
代码
文件
提交
分支
Tags
贡献者
分支图
Diff
Issue
0
列表
看板
标记
里程碑
合并请求
0
DevOps
流水线
流水线任务
计划
Wiki
0
Wiki
分析
仓库
DevOps
项目成员
Pages
R
roslyn
项目概览
项目概览
详情
发布
仓库
仓库
文件
提交
分支
标签
贡献者
分支图
比较
Issue
0
Issue
0
列表
看板
标记
里程碑
合并请求
0
合并请求
0
Pages
DevOps
DevOps
流水线
流水线任务
计划
分析
分析
仓库分析
DevOps
Wiki
0
Wiki
成员
成员
收起侧边栏
关闭侧边栏
动态
分支图
创建新Issue
流水线任务
提交
Issue看板
体验新版 GitCode,发现更多精彩内容 >>
提交
21ca5b72
编写于
10月 14, 2015
作者:
V
vsadov
浏览文件
操作
浏览文件
下载
电子邮件补丁
差异文件
Added a test with parameterized property
上级
bbcc6165
变更
1
隐藏空白更改
内联
并排
Showing
1 changed file
with
76 addition
and
0 deletion
+76
-0
src/Compilers/VisualBasic/Test/Emit/ExpressionTrees/CodeGenExprLambda.vb
...isualBasic/Test/Emit/ExpressionTrees/CodeGenExprLambda.vb
+76
-0
未找到文件。
src/Compilers/VisualBasic/Test/Emit/ExpressionTrees/CodeGenExprLambda.vb
浏览文件 @
21ca5b72
...
...
@@ -8056,6 +8056,82 @@ aa
]]
>
).
VerifyDiagnostics
()
End
Sub
<
Fact
,
WorkItem
(
4524
,
"https://github.com/dotnet/roslyn/issues/4524"
)
>
Public
Sub
PropertyAssignmentParameterized
()
Dim
source
=
<
compilation
>
<
file
name
=
"a.vb"
><
!
[
CDATA
[
Imports
System
Imports
System.Linq.Expressions
Module
Module1
Public
Interface
IAddress
Property
City
(
i
As
Integer
)
As
String
End
Interface
Public
Class
Address
Implements
IAddress
Private
c
As
String
Public
Property
City
(
i
As
Integer
)
As
String
Implements
IAddress
.
City
Get
Return
c
&
i
End
Get
Set
(
value
As
String
)
c
=
value
&
i
End
Set
End
Property
Public
Field
As
String
Public
Sub
Verify
(
expression
As
Expression
(
Of
Action
(
Of
Address
)))
Console
.
WriteLine
(
expression
.
ToString
())
expression
.
Compile
()(
Me
)
End
Sub
End
Class
Public
Class
Customer
Public
Property
Address
As
IAddress
Public
Sub
DoWork
(
newValue
As
String
)
Address
.
City
(
0
)
=
newValue
End
Sub
End
Class
Public
Function
ItIs
(
Of
TValue
)(
match
As
Expression
(
Of
Func
(
Of
TValue
,
Boolean
)))
As
TValue
End
Function
Sub
Main
()
Dim
a
As
New
Address
a
.
Verify
(
Sub
(
x
)
x
.
City
(
1
)
=
ItIs
(
Of
String
)(
Function
(
s
)
String
.
IsNullOrEmpty
(
s
)))
Dim
i
As
Integer
=
2
a
.
Verify
(
Sub
(
x
)
x
.
City
(
i
)
=
"aa"
)
System
.
Console
.
WriteLine
(
a
.
City
(
3
))
End
Sub
End
Module
]]
></
file
>
</
compilation
>
CompileAndVerify
(
source
,
additionalRefs
:
=
{
SystemCoreRef
},
options
:
=
TestOptions
.
ReleaseExe
,
expectedOutput
:
=<
!
[
CDATA
[
x
=>
x
.
set_City
(
1
,
ItIs
(
s
=>
IsNullOrEmpty
(
s
)))
x
=>
x
.
set_City
(
value
(
Module1
+
_Closure$__4
-
0
).
$
VB
$
Local_i
,
"aa"
)
aa23
]]
>
).
VerifyDiagnostics
()
End
Sub
<
Fact
,
WorkItem
(
4524
,
"https://github.com/dotnet/roslyn/issues/4524"
)
>
...
...
编辑
预览
Markdown
is supported
0%
请重试
或
添加新附件
.
添加附件
取消
You are about to add
0
people
to the discussion. Proceed with caution.
先完成此消息的编辑!
取消
想要评论请
注册
或
登录