New tests.

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

1 files changed, 38 insertions, 0 deletions

diff --git a/mcs/tests/test-771.cs b/mcs/tests/test-771.cs
new file mode 100644
index 00000000000..6deae7aa762
--- /dev/null
+++ b/mcs/tests/test-771.cs
@@ -0,0 +1,38 @@
+using System;
+
+namespace InternalAccess
+{
+	public abstract class Base
+	{
+		internal Base () { }
+		internal string Prop { get { return "A"; } }
+	}
+
+	public class DerivedInternalExample : Base
+	{
+		public DerivedInternalExample () { }
+		internal new string Prop { get { return "D"; } }
+	}
+
+	public class DerivedProtectedExample : Base
+	{
+		public DerivedProtectedExample () { }
+		protected new string Prop { get { return "E"; } }
+	}
+
+	class MainClass
+	{
+		public static int Main ()
+		{
+			DerivedInternalExample die = new DerivedInternalExample ();
+			if (die.Prop != "D")
+				return 1;
+
+			DerivedProtectedExample dpe = new DerivedProtectedExample ();
+			if (dpe.Prop != "A")
+				return 2;
+
+			return 0;
+		}
+	}
+}