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

	* cls-test-{2,5,6}.cs: Improved tests for CLS-compliant

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

diff --git a/mcs/tests/ChangeLog b/mcs/tests/ChangeLog
index af7c1387e817206a42f37933acbd76a8264d5ee6..3db3f32b7e9f1e91f83769147f1e6f75c2688f63 100755 (executable)
--- a/mcs/tests/ChangeLog
+++ b/mcs/tests/ChangeLog
@@ -1,3 +1,7 @@
+2004-02-17 Marek Safar <marek.safar@seznam.cz>
+
+       * cls-test-{2,5,6}.cs: Improved tests for CLS-compliant
+
 2004-02-16 Marek Safar <marek.safar@seznam.cz>
 
        * test-230.cs: test for module attributes.

diff --git a/mcs/tests/cls-test-2.cs b/mcs/tests/cls-test-2.cs
index f6bd20ac5faf039cfbbeb2c3cf206095accc55db..3be78b28ec53205932c2036cf0d007751997990a 100644 (file)
--- a/mcs/tests/cls-test-2.cs
+++ b/mcs/tests/cls-test-2.cs
@@ -25,4 +25,12 @@ public class CLSClass {
 
         public static void Main() {
        }
+}
+public class InnerTypeClasss {
+    public struct Struct {
+    }
+    
+    public Struct Method () {
+        return new Struct ();
+    }
 }
\ No newline at end of file

diff --git a/mcs/tests/cls-test-5.cs b/mcs/tests/cls-test-5.cs
index 27001fb7f53d36b86242e1e63dd1b0eb43ad09ec..ddd135d9547d5191542707e318d548764ef2adc4 100644 (file)
--- a/mcs/tests/cls-test-5.cs
+++ b/mcs/tests/cls-test-5.cs
@@ -67,4 +67,35 @@ namespace B {
 }
 
 public class c1 {
+}
+// Test
+[System.CLSCompliant (false)]
+public interface I1 {
+}
+
+public interface i1 {
+}
+
+// Test
+enum AB {
+}
+
+[CLSCompliant (false)]
+public enum aB {
+}
+
+public interface ab {
+}
+
+// Test
+public class CLSClass_2 {
+        [CLSCompliant (false)]
+        public void Method () {}
+        public void method () {}
+}
+
+// Test
+namespace System {
+    public class sByte {
+    }
 }
\ No newline at end of file

diff --git a/mcs/tests/cls-test-6.cs b/mcs/tests/cls-test-6.cs
index f850048610658b441470d6dd5b9e21dc05301509..7232127667e9fd2a7307c97070d9dddfdabf95cc 100644 (file)
--- a/mcs/tests/cls-test-6.cs
+++ b/mcs/tests/cls-test-6.cs
@@ -35,4 +35,13 @@ public class CLSClass {
         public delegate uint MyDelegate();    
     
         public static void Main() {}
-}
\ No newline at end of file
+}
+public class CLSClass_2 {
+    [CLSCompliant (false)]
+    public CLSClass_2(int[,,] b) {
+    }
+
+    public CLSClass_2(int[,] b) {
+    }
+
+}