mono/tests/cpblkTest.il

   1 .assembly extern mscorlib{}
   2 .assembly cpblkTest{}
   3 .module cpblkTest
   4
   5 .class private auto ansi test
   6        extends [mscorlib]System.Object {
   7
   8   .field private static valuetype DataType dataField at theData
   9
  10   .method public static int32  start() cil managed {
  11         .entrypoint
  12         .locals init(native int, unsigned int8)
  13
  14         //store data address
  15         ldsflda valuetype DataType test::dataField
  16         stloc.0
  17
  18         //copy 7 to first position
  19         ldloc.0         //dest
  20         ldloc.0
  21         ldc.i4.6
  22         add             //src
  23         ldc.i4.1        //size
  24         cpblk
  25
  26         //ldind value
  27         ldloc.0
  28         ldind.u1
  29
  30         //compare
  31         ldc.i4.7
  32         beq PASS
  33
  34   FAIL:
  35         ldc.i4.1
  36         ret
  37   PASS:
  38         ldc.i4.0
  39         ret
  40   }
  41
  42 }
  43
  44 .class public explicit ansi sealed DataType
  45        extends [mscorlib]System.ValueType
  46         {.pack 1 .size 10}
  47
  48 .data theData = bytearray (1 2 3 4 5 6 7 8 9 10)