/NRefactory/ICSharpCode.NRefactory.VB.Tests/Parser/Expressions/ObjectCreateExpressionTests.cs

http://github.com/icsharpcode/ILSpy · C# · 114 lines · 92 code · 19 blank · 3 comment · 1 complexity · b6b33cc36902390045d25778f6cded1d MD5 · raw file

  1. // Copyright (c) AlphaSierraPapa for the SharpDevelop Team (for details please see \doc\copyright.txt)
  2. // This code is distributed under the GNU LGPL (for details please see \doc\license.txt)
  3. using System;
  4. using System.IO;
  5. using NUnit.Framework;
  6. using ICSharpCode.NRefactory.VB.Parser;
  7. using ICSharpCode.NRefactory.VB.Ast;
  8. namespace ICSharpCode.NRefactory.VB.Tests.Ast
  9. {
  10. [TestFixture]
  11. public class ObjectCreateExpressionTests
  12. {
  13. void CheckSimpleObjectCreateExpression(ObjectCreateExpression oce)
  14. {
  15. Assert.AreEqual("MyObject", oce.CreateType.Type);
  16. Assert.AreEqual(3, oce.Parameters.Count);
  17. Assert.IsTrue(oce.ObjectInitializer.IsNull);
  18. for (int i = 0; i < oce.Parameters.Count; ++i) {
  19. Assert.IsTrue(oce.Parameters[i] is PrimitiveExpression);
  20. }
  21. }
  22. Expression CheckPropertyInitializationExpression(Expression e, string name)
  23. {
  24. Assert.IsInstanceOf(typeof(MemberInitializerExpression), e);
  25. Assert.AreEqual(name, ((MemberInitializerExpression)e).Name);
  26. return ((MemberInitializerExpression)e).Expression;
  27. }
  28. [Test]
  29. public void VBNetAnonymousType()
  30. {
  31. ObjectCreateExpression oce = ParseUtil.ParseExpression<ObjectCreateExpression>(
  32. "New With {.Id = 1, .Name= \"Bill Gates\" }");
  33. Assert.IsTrue(oce.CreateType.IsNull);
  34. Assert.AreEqual(0, oce.Parameters.Count);
  35. Assert.AreEqual(2, oce.ObjectInitializer.CreateExpressions.Count);
  36. Assert.IsInstanceOf(typeof(PrimitiveExpression), CheckPropertyInitializationExpression(oce.ObjectInitializer.CreateExpressions[0], "Id"));
  37. Assert.IsInstanceOf(typeof(MemberInitializerExpression), oce.ObjectInitializer.CreateExpressions[1]);
  38. }
  39. [Test]
  40. public void VBNetAnonymousTypeWithoutProperty()
  41. {
  42. ObjectCreateExpression oce = ParseUtil.ParseExpression<ObjectCreateExpression>("New With { c }");
  43. Assert.IsTrue(oce.CreateType.IsNull);
  44. Assert.AreEqual(0, oce.Parameters.Count);
  45. Assert.AreEqual(1, oce.ObjectInitializer.CreateExpressions.Count);
  46. Assert.IsInstanceOf(typeof(SimpleNameExpression), oce.ObjectInitializer.CreateExpressions[0]);
  47. Assert.AreEqual("c", (oce.ObjectInitializer.CreateExpressions[0] as SimpleNameExpression).Identifier);
  48. }
  49. [Test]
  50. public void VBNetSimpleObjectCreateExpressionTest()
  51. {
  52. CheckSimpleObjectCreateExpression(ParseUtil.ParseExpression<ObjectCreateExpression>("New MyObject(1, 2, 3)"));
  53. }
  54. [Test]
  55. public void VBNetInvalidTypeArgumentListObjectCreateExpressionTest()
  56. {
  57. // this test was written because this bug caused the AbstractDomVisitor to crash
  58. InvocationExpression expr = ParseUtil.ParseExpression<InvocationExpression>("WriteLine(New SomeGenericType(Of Integer, )())", true);
  59. Assert.IsTrue(expr.TargetObject is SimpleNameExpression);
  60. Assert.AreEqual("WriteLine", ((SimpleNameExpression)expr.TargetObject).Identifier);
  61. Assert.AreEqual(1, expr.Arguments.Count); // here a second null parameter was added incorrectly
  62. Assert.IsTrue(expr.Arguments[0] is ObjectCreateExpression);
  63. TypeReference typeRef = ((ObjectCreateExpression)expr.Arguments[0]).CreateType;
  64. Assert.AreEqual("SomeGenericType", typeRef.Type);
  65. Assert.AreEqual(1, typeRef.GenericTypes.Count);
  66. Assert.AreEqual("System.Int32", typeRef.GenericTypes[0].Type);
  67. }
  68. [Test]
  69. public void VBNetMemberInitializationTest()
  70. {
  71. ObjectCreateExpression oce = ParseUtil.ParseExpression<ObjectCreateExpression>("new Contact() With { .FirstName = \"Bill\", .LastName = \"Gates\" }");
  72. Assert.AreEqual(2, oce.ObjectInitializer.CreateExpressions.Count);
  73. Assert.AreEqual("FirstName", ((MemberInitializerExpression)oce.ObjectInitializer.CreateExpressions[0]).Name);
  74. Assert.AreEqual("LastName", ((MemberInitializerExpression)oce.ObjectInitializer.CreateExpressions[1]).Name);
  75. Assert.IsInstanceOf(typeof(PrimitiveExpression), ((MemberInitializerExpression)oce.ObjectInitializer.CreateExpressions[0]).Expression);
  76. Assert.IsInstanceOf(typeof(PrimitiveExpression), ((MemberInitializerExpression)oce.ObjectInitializer.CreateExpressions[1]).Expression);
  77. }
  78. [Test]
  79. public void VBNetNullableObjectCreateExpressionTest()
  80. {
  81. ObjectCreateExpression oce = ParseUtil.ParseExpression<ObjectCreateExpression>("New Integer?");
  82. Assert.AreEqual("System.Nullable", oce.CreateType.Type);
  83. Assert.AreEqual(1, oce.CreateType.GenericTypes.Count);
  84. Assert.AreEqual("System.Int32", oce.CreateType.GenericTypes[0].Type);
  85. }
  86. [Test]
  87. public void VBNetNullableObjectArrayCreateExpressionTest()
  88. {
  89. ObjectCreateExpression oce = ParseUtil.ParseExpression<ObjectCreateExpression>("New Integer?()");
  90. Assert.AreEqual("System.Nullable", oce.CreateType.Type);
  91. Assert.AreEqual(1, oce.CreateType.GenericTypes.Count);
  92. Assert.AreEqual("System.Int32", oce.CreateType.GenericTypes[0].Type);
  93. }
  94. }
  95. }