tests/dtest-001.cs

   1 //
   2 // dynamic type attribute decoration
   3 //
   4
   5 using System;
   6
   7 class C
   8 {
   9         public C (dynamic d)
  10         {
  11         }
  12
  13         public dynamic a;
  14         public dynamic[] a2;
  15         public const dynamic c = default (dynamic);
  16
  17         public dynamic Prop { set; get; }
  18         public dynamic Prop2 { set {} }
  19
  20         public dynamic this [dynamic d] { set {} get { return 1; } }
  21
  22         public dynamic Method (dynamic d)
  23         {
  24                 return null;
  25         }
  26 }
  27
  28 delegate dynamic Del (dynamic d);
  29
  30 class Test
  31 {
  32         public static int Main ()
  33         {
  34                 Type t = typeof (C);
  35                 Type ca = typeof (System.Runtime.CompilerServices.DynamicAttribute);
  36
  37                 if (t.GetMember ("a")[0].GetCustomAttributes (ca, false).Length != 1)
  38                         return 1;
  39
  40                 // TODO: Why is it needed
  41                 //if (t.GetMember ("a2")[0].GetCustomAttributes (ca, false).Length != 1)
  42                 //      return 2;
  43
  44                 if (t.GetMember ("c")[0].GetCustomAttributes (ca, false).Length != 1)
  45                         return 3;
  46
  47                 if (t.GetMember ("Prop")[0].GetCustomAttributes (ca, false).Length != 1)
  48                         return 4;
  49
  50                 if (t.GetMember ("get_Prop")[0].GetCustomAttributes (ca, false).Length != 0)
  51                         return 5;
  52
  53                 if (t.GetMethod ("get_Prop").ReturnParameter.GetCustomAttributes (ca, false).Length != 1)
  54                         return 6;
  55
  56                 if (t.GetMember ("set_Prop")[0].GetCustomAttributes (ca, false).Length != 0)
  57                         return 7;
  58
  59                 if (t.GetMethod ("set_Prop").ReturnParameter.GetCustomAttributes (ca, false).Length != 0)
  60                         return 8;
  61
  62                 if (t.GetMethod ("set_Prop").GetParameters()[0].GetCustomAttributes (ca, false).Length != 1)
  63                         return 9;
  64
  65                 if (t.GetMember ("Prop2")[0].GetCustomAttributes (ca, false).Length != 1)
  66                         return 10;
  67
  68                 if (t.GetMember ("set_Prop2")[0].GetCustomAttributes (ca, false).Length != 0)
  69                         return 11;
  70
  71                 if (t.GetMember ("Item")[0].GetCustomAttributes (ca, false).Length != 1)
  72                         return 12;
  73
  74                 if (t.GetMethod ("get_Item").ReturnParameter.GetCustomAttributes (ca, false).Length != 1)
  75                         return 13;
  76
  77                 if (t.GetMethod ("get_Item").GetParameters()[0].GetCustomAttributes (ca, false).Length != 1)
  78                         return 14;
  79
  80                 if (t.GetMethod ("set_Item").ReturnParameter.GetCustomAttributes (ca, false).Length != 0)
  81                         return 15;
  82
  83                 if (t.GetMethod ("set_Item").GetParameters()[0].GetCustomAttributes (ca, false).Length != 1)
  84                         return 16;
  85
  86                 if (t.GetMethod ("set_Item").GetParameters()[1].GetCustomAttributes (ca, false).Length != 1)
  87                         return 17;
  88
  89                 if (t.GetMember ("Method")[0].GetCustomAttributes (ca, false).Length != 0)
  90                         return 18;
  91
  92                 if (t.GetMethod ("Method").GetParameters()[0].GetCustomAttributes (ca, false).Length != 1)
  93                         return 19;
  94
  95                 if (t.GetConstructors ()[0].GetParameters()[0].GetCustomAttributes (ca, false).Length != 1)
  96                         return 20;
  97
  98                 if (t.GetConstructors ()[0].GetCustomAttributes (ca, false).Length != 0)
  99                         return 21;
 100
 101
 102                 t = typeof (Del);
 103
 104                 if (t.GetMember ("Invoke")[0].GetCustomAttributes (ca, false).Length != 0)
 105                         return 100;
 106
 107                 if (t.GetMethod ("Invoke").GetParameters()[0].GetCustomAttributes (ca, false).Length != 1)
 108                         return 101;
 109
 110                 if (t.GetMethod ("Invoke").ReturnParameter.GetCustomAttributes (ca, false).Length != 1)
 111                         return 102;
 112
 113                 Console.WriteLine ("ok");
 114                 return 0;
 115         }
 116 }