New test.

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

diff --git a/mcs/tests/dtest-error-01.cs b/mcs/tests/dtest-error-01.cs
new file mode 100644 (file)
index 0000000..52b3de6
--- /dev/null
+++ b/mcs/tests/dtest-error-01.cs
@@ -0,0 +1,69 @@
+// Compiler options: -unsafe
+
+using System;
+using System.Collections.Generic;
+using System.Linq;
+using System.Reflection;
+using Microsoft.CSharp.RuntimeBinder;
+
+class Helper
+{
+       public unsafe static int* Foo (int i)
+       {
+               return null;
+       }
+}
+
+class Tester
+{
+#pragma warning disable 169
+       void Unsafe_1 ()
+       {
+               dynamic d = 1;
+               AssertError (
+                       () => Helper.Foo (d),
+                       "Pointers and fixed size buffers cannot be used in a dynamic context");
+       }
+       
+#pragma warning restore 169
+       
+       static void AssertError (Action a, string msg)
+       {
+               try {
+                       a ();
+               } catch (RuntimeBinderException e) {
+                       if (e.Message != msg)
+                               throw;
+                       
+                       return;
+               }
+               
+               throw new ApplicationException ("Expected error");
+       }
+
+       static bool RunTest (MethodInfo test)
+       {
+               Console.Write ("Running test {0, -25}", test.Name);
+               try {
+                       test.Invoke (new Tester (), null);
+                       Console.WriteLine ("OK");
+                       return true;
+               } catch (Exception e) {
+                       Console.WriteLine ("FAILED");
+                       Console.WriteLine (e.InnerException.Message);
+                       return false;
+               }
+       }
+
+       public static int Main ()
+       {
+               var tests = from test in typeof (Tester).GetMethods (BindingFlags.Instance | BindingFlags.NonPublic | BindingFlags.DeclaredOnly)
+                                       where test.GetParameters ().Length == 0
+                                       orderby test.Name
+                                       select RunTest (test);
+
+               int failures = tests.Count (a => !a);
+               Console.WriteLine (failures + " tests failed");
+               return failures;
+       }
+}