Author: mritvik
Date: 2005-04-20 04:04:47 -0400 (Wed, 20 Apr 2005)
New Revision: 43317
Added:
trunk/mcs/mbas/Test/errors/AttributeAssemblyCulture1.vb
trunk/mcs/mbas/Test/errors/AttributeAssemblyFlag1.vb
Modified:
trunk/mcs/mbas/Test/errors/ChangeLog
Log:
2005-04-20 Ritvik Mayank <[EMAIL PROTECTED]>
* AttributeAssemblyFlag1.vb
* AttributeAssemblyCulture1.vb
Added the above test cases
Added: trunk/mcs/mbas/Test/errors/AttributeAssemblyCulture1.vb
===================================================================
--- trunk/mcs/mbas/Test/errors/AttributeAssemblyCulture1.vb 2005-04-20
08:00:35 UTC (rev 43316)
+++ trunk/mcs/mbas/Test/errors/AttributeAssemblyCulture1.vb 2005-04-20
08:04:47 UTC (rev 43317)
@@ -0,0 +1,24 @@
+REM LineNo: 9
+REM ExpectedError: BC30129
+REM ErrorMessage: Assembly attribute
'System.Reflection.AssemblyCultureAttribute
+'is not valid: Executables cannot be localized, Culture should always be empty
+
+
+Imports System
+Imports System.Reflection
+Imports System.Runtime.CompilerServices
+
+<assembly: AssemblyCulture("de")>
+
+Module Test
+Sub Main()
+
+ dim asm as System.Reflection.Assembly
+ dim i as integer
+ asm = System.Reflection.Assembly.GetAssembly (GetType (Test))
+ dim att as object () = asm.GetCustomAttributes (true)
+ for i=0 to att.Length - 1
+ Console.WriteLine ("Arribute = {1}", i, att (i).ToString ())
+ next i
+End Sub
+End Module
Property changes on: trunk/mcs/mbas/Test/errors/AttributeAssemblyCulture1.vb
___________________________________________________________________
Name: svn:executable
+ *
Added: trunk/mcs/mbas/Test/errors/AttributeAssemblyFlag1.vb
===================================================================
--- trunk/mcs/mbas/Test/errors/AttributeAssemblyFlag1.vb 2005-04-20
08:00:35 UTC (rev 43316)
+++ trunk/mcs/mbas/Test/errors/AttributeAssemblyFlag1.vb 2005-04-20
08:04:47 UTC (rev 43317)
@@ -0,0 +1,23 @@
+REM LineNo: 9
+REM ExpectedError: BC30548
+REM ErrorMessage: Attribute 'FlagsAttribute' cannot be applied to an assembly.
<assembly: Flags>
+
+Imports System
+Imports System.Reflection
+Imports System.Runtime.CompilerServices
+
+<assembly: Flags>
+
+Module Test
+Sub Main()
+
+ dim asm as System.Reflection.Assembly
+ dim i as integer
+ asm = System.Reflection.Assembly.GetAssembly (GetType (Test))
+ dim att as object () = asm.GetCustomAttributes (false)
+ for i=0 to att.Length - 1
+ Console.WriteLine ("Arribute = {1}", i, att (i).ToString ())
+ next i
+End Sub
+End Module
+
Property changes on: trunk/mcs/mbas/Test/errors/AttributeAssemblyFlag1.vb
___________________________________________________________________
Name: svn:executable
+ *
Modified: trunk/mcs/mbas/Test/errors/ChangeLog
===================================================================
--- trunk/mcs/mbas/Test/errors/ChangeLog 2005-04-20 08:00:35 UTC (rev
43316)
+++ trunk/mcs/mbas/Test/errors/ChangeLog 2005-04-20 08:04:47 UTC (rev
43317)
@@ -1,3 +1,8 @@
+2005-04-20 Ritvik Mayank <[EMAIL PROTECTED]>
+ * AttributeAssemblyFlag1.vb
+ * AttributeAssemblyCulture1.vb
+ Added the above test cases
+
2005-04-05 Ritvik Mayank <[EMAIL PROTECTED]>
* AttributesMustInheritClassA1.vb
* AttributesClassC1.vb
_______________________________________________
Mono-patches maillist - [email protected]
http://lists.ximian.com/mailman/listinfo/mono-patches
