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)
5
using ICSharpCode.NRefactory.VB.Ast;
8
namespace ICSharpCode.NRefactory.VB.Tests.Ast
11
public class ConstructorDeclarationTests
15
public void VBNetConstructorDeclarationTest1()
17
string program = @"Sub New()
19
ConstructorDeclaration cd = ParseUtil.ParseTypeMember<ConstructorDeclaration>(program);
20
Assert.IsTrue(cd.ConstructorInitializer.IsNull);
24
public void VBNetConstructorDeclarationTest2()
26
ConstructorDeclaration cd = ParseUtil.ParseTypeMember<ConstructorDeclaration>("Sub New(x As Integer, Optional y As String) \nEnd Sub");
27
Assert.AreEqual(2, cd.Parameters.Count);
28
Assert.AreEqual("System.Int32", cd.Parameters[0].TypeReference.Type);
29
Assert.AreEqual("System.String", cd.Parameters[1].TypeReference.Type);
30
Assert.AreEqual(ParameterModifiers.Optional, cd.Parameters[1].ParamModifier & ParameterModifiers.Optional);