1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
|
// Copyright (c) AlphaSierraPapa for the SharpDevelop Team (for details please see \doc\copyright.txt)
// This code is distributed under the GNU LGPL (for details please see \doc\license.txt)
using System;
using System.IO;
using NUnit.Framework;
using ICSharpCode.NRefactory.VB.Parser;
using ICSharpCode.NRefactory.VB.Ast;
namespace ICSharpCode.NRefactory.VB.Tests.Ast
{
[TestFixture]
public class MemberReferenceExpressionTests
{
#region VB.NET
[Test]
public void VBNetSimpleFieldReferenceExpressionTest()
{
MemberReferenceExpression fre = ParseUtil.ParseExpression<MemberReferenceExpression>("myTargetObject.myField");
Assert.AreEqual("myField", fre.MemberName);
Assert.IsTrue(fre.TargetObject is SimpleNameExpression);
Assert.AreEqual("myTargetObject", ((SimpleNameExpression)fre.TargetObject).Identifier);
}
[Test]
public void VBNetFieldReferenceExpressionWithoutTargetTest()
{
MemberReferenceExpression fre = ParseUtil.ParseExpression<MemberReferenceExpression>(".myField");
Assert.AreEqual("myField", fre.MemberName);
Assert.IsTrue(fre.TargetObject.IsNull);
}
[Test]
public void VBNetGenericFieldReferenceExpressionTest()
{
MemberReferenceExpression fre = ParseUtil.ParseExpression<MemberReferenceExpression>("SomeClass(of string).myField");
Assert.AreEqual("myField", fre.MemberName);
Assert.IsInstanceOf(typeof(SimpleNameExpression), fre.TargetObject);
TypeReference tr = ((SimpleNameExpression)fre.TargetObject).TypeArguments[0];
Assert.AreEqual("System.String", tr.Type);
}
[Test]
public void VBNetFullNamespaceGenericFieldReferenceExpressionTest()
{
MemberReferenceExpression fre = ParseUtil.ParseExpression<MemberReferenceExpression>("System.Subnamespace.SomeClass(of string).myField");
Assert.AreEqual("myField", fre.MemberName);
Assert.IsInstanceOf(typeof(MemberReferenceExpression), fre.TargetObject);
MemberReferenceExpression inner = (MemberReferenceExpression)fre.TargetObject;
Assert.AreEqual("SomeClass", inner.MemberName);
Assert.AreEqual(1, inner.TypeArguments.Count);
Assert.AreEqual("System.String", inner.TypeArguments[0].Type);
}
[Test]
public void VBNetGlobalFullNamespaceGenericFieldReferenceExpressionTest()
{
MemberReferenceExpression fre = ParseUtil.ParseExpression<MemberReferenceExpression>("Global.System.Subnamespace.SomeClass(of string).myField");
Assert.AreEqual("myField", fre.MemberName);
Assert.IsInstanceOf(typeof(MemberReferenceExpression), fre.TargetObject);
MemberReferenceExpression inner = (MemberReferenceExpression)fre.TargetObject;
Assert.AreEqual("SomeClass", inner.MemberName);
Assert.AreEqual(1, inner.TypeArguments.Count);
Assert.AreEqual("System.String", inner.TypeArguments[0].Type);
}
[Test]
public void VBNetNestedGenericFieldReferenceExpressionTest()
{
MemberReferenceExpression fre = ParseUtil.ParseExpression<MemberReferenceExpression>("MyType(of string).InnerClass(of integer).myField");
Assert.AreEqual("myField", fre.MemberName);
Assert.IsInstanceOf(typeof(MemberReferenceExpression), fre.TargetObject);
MemberReferenceExpression inner = (MemberReferenceExpression)fre.TargetObject;
Assert.AreEqual("InnerClass", inner.MemberName);
}
#endregion
}
}
|
