[corlib] ModuleBuilder pseudo-token lookup needs to use references insteads of logica...

[mono.git] / mcs / class / Mono.CSharp / Test / Evaluator / TypesTest.cs

diff --git a/mcs/class/Mono.CSharp/Test/Evaluator/TypesTest.cs b/mcs/class/Mono.CSharp/Test/Evaluator/TypesTest.cs
index 970aa33443d459a23509d782e18ede555c9b8ab1..97f9e047e6d543afa711984aed41eac9e3260ecb 100644 (file)
--- a/mcs/class/Mono.CSharp/Test/Evaluator/TypesTest.cs
+++ b/mcs/class/Mono.CSharp/Test/Evaluator/TypesTest.cs
@@ -104,7 +104,32 @@ namespace MonoTests.EvaluatorTest
                {
                        Evaluator.Run ("class A { class B { } }");
                        Evaluator.Run ("var x = new A ();");
+               }
+
+               [Test]
+               public void DelegateType ()
+               {
+                       Evaluator.Run ("public delegate int D();");
+                       Evaluator.Run ("D d = delegate () { return 7; };");
+                       object res = Evaluator.Evaluate ("d();");
+                       Assert.AreEqual (7, res);
+               }
+
+               [Test]
+               public void ClassWithAttribute ()
+               {
+                       Evaluator.Run ("public class A : System.Attribute { }");
+                       Evaluator.Run ("[A] public class B {}");
+                       Evaluator.Run ("var attr = new B().GetType().GetCustomAttributes(false)[0];");
+
+                       object res = Evaluator.Evaluate ("attr.GetType().Name;");
+                       Assert.AreEqual ("A", res);
+               }
 
+               [Test]
+               public void EnumType ()
+               {
+                       Evaluator.Run ("public class TestClass { private TestEnum _te; public string Get() { return _te.ToString(); } } public enum TestEnum { First, Second }");
                }
        }
 }
\ No newline at end of file