new error tests

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

1 files changed, 28 insertions, 0 deletions

diff --git a/mcs/errors/cs0647-5.cs b/mcs/errors/cs0647-5.cs
new file mode 100644
index 00000000000..5c62d7e4181
--- /dev/null
+++ b/mcs/errors/cs0647-5.cs
@@ -0,0 +1,28 @@
+// cs0647.cs : Security custom attribute 'DebugPermission' attached to invalid parent
+// Line : 11
+
+using System;
+using System.Security;
+using System.Security.Permissions;
+
+public class Program {
+        public delegate int DisplayHandler (string msg);
+     
+	[DebugPermission (SecurityAction.RequestMinimum)]
+        public event DisplayHandler OnShow;
+}
+
+[AttributeUsage (AttributeTargets.All, AllowMultiple = true, Inherited = false)]
+[Serializable]
+public class DebugPermissionAttribute : CodeAccessSecurityAttribute {
+
+	public DebugPermissionAttribute (SecurityAction action)
+		: base (action)
+	{
+	}
+        
+	public override IPermission CreatePermission ()
+	{
+		return null;
+	}
+}