2005-01-07 Marek Safar <marek.safar@seznam.cz>
[mono.git] / mcs / mbas / Test / errors / NameSpaceC10.vb
1 'Author:
2 '   V. Sudharsan (vsudharsan@novell.com)
3 '
4 ' (C) 2003 Ximian, Inc.
5
6 REM LineNo: 24
7 REM ExpectedError: BC30456
8 REM ErrorMessage: 'C' is not a member of 'A'.
9
10 'To check if Importing is done properly... without ambiguity...
11
12 Imports A
13
14 Namespace A
15         Namespace A 
16                 Public Module C
17                         Public D as Integer=10
18                 End Module
19         End Namespace
20 End Namespace
21
22 Module NamespaceA       
23         Sub Main()
24                 if A.C.D<>10 Then
25                         Throw New System.Exception("Namespace Not working")
26                 End If
27         End Sub
28 End Module
29