2004-02-16 Marek Safar <marek.safar@seznam.cz>

	* test-230.cs: test for module attributes.

svn path=/trunk/mcs/; revision=23120

1 files changed, 24 insertions, 0 deletions

diff --git a/mcs/tests/test-230.cs b/mcs/tests/test-230.cs
new file mode 100644
index 00000000000..5b29a497e68
--- /dev/null
+++ b/mcs/tests/test-230.cs
@@ -0,0 +1,24 @@
+using System;
+using System.Reflection;
+using System.Diagnostics;
+
+[module: DebuggableAttribute (false, false)] 
+
+class TestClass {
+        static int Main()
+        {
+            Module[] moduleArray;
+            moduleArray = Assembly.GetExecutingAssembly().GetModules(false);
+
+            Module myModule = moduleArray[0];
+            object[] attributes;
+            
+            attributes = myModule.GetCustomAttributes(typeof (DebuggableAttribute), false);
+            if (attributes[0] != null)
+            {
+                Console.WriteLine ("Succeeded");
+                return 0;
+            }
+            return 1;
+        }
+}