mono/tests/verifier/make_stobj_test.sh

   1 #! /bin/sh
   2
   3 TEST_NAME=$1
   4 TEST_VALIDITY=$2
   5 TEST_TYPE1=$3
   6 TEST_TYPE2=$4
   7 TEST_TYPE3=$5
   8 TEST_EXTRA_OPS=$6
   9
  10 ZZ=`echo $TEST_TYPE2 | grep "\&"`
  11 T2_REF=$?
  12
  13 LOCAL_INIT="";
  14 if [ "$T2_REF" == "0" ]; then
  15         T2_NO_REF=`echo $TEST_TYPE2 | cut -d '\' -f 1`
  16         INIT_LOCS=", $T2_NO_REF V_2"
  17         INIT_IL="ldloca.s 2\n\tstloc.1"
  18 fi
  19
  20 TEST_FILE=`echo ${TEST_VALIDITY}_${TEST_NAME} | sed -e 's/ /_/g' -e 's/\./_/g' -e 's/&/mp/g' -e 's/\[/_/g' -e 's/\]/_/g'`_generated.il
  21 echo $TEST_FILE
  22 sed -e "s/EXTRA_OPS/${TEST_EXTRA_OPS}/g" -e "s/TYPE1/${TEST_TYPE1}/g" -e "s/VALIDITY/${TEST_VALIDITY}/g" -e "s/TYPE2/${TEST_TYPE2}/g"  -e "s/TYPE3/${TEST_TYPE3}/g"  -e "s/INIT_LOCS/${INIT_LOCS}/g"  -e "s/INIT_IL/${INIT_IL}/g"> $TEST_FILE <<//EOF
  23
  24 .assembly extern mscorlib
  25 {
  26   .ver 2:0:0:0
  27   .publickeytoken = (B7 7A 5C 56 19 34 E0 89 ) // .z\V.4..
  28 }
  29
  30 .assembly 'stobj_test'
  31 {
  32   .hash algorithm 0x00008004
  33   .ver  0:0:0:0
  34 }
  35
  36 .module ldobj.exe
  37
  38
  39 .class Class extends [mscorlib]System.Object
  40 {
  41     .field public int32 valid
  42 }
  43
  44 .class public Template\`1<T>
  45         extends [mscorlib]System.Object
  46 {
  47 }
  48
  49 .class sealed public StructTemplate\`1<T>
  50         extends [mscorlib]System.ValueType
  51 {
  52         .field public !0 t
  53 }
  54
  55 .class sealed public StructTemplate2\`1<T>
  56         extends [mscorlib]System.ValueType
  57 {
  58         .field public !0 t
  59 }
  60
  61
  62 .class public auto ansi sealed MyStruct
  63         extends [mscorlib]System.ValueType
  64 {
  65         .field public int32 foo
  66 }
  67
  68
  69 .class public auto ansi sealed MyStruct2
  70         extends [mscorlib]System.ValueType
  71 {
  72         .field public int32 foo
  73 }
  74
  75 .method public static int32 Main ()
  76 {
  77         .entrypoint
  78         .maxstack 8
  79         .locals init (TYPE1 V_0, TYPE2 V_1 INIT_LOCS)
  80
  81         INIT_IL
  82
  83         ldloc.1
  84         ldloc.0
  85
  86         EXTRA_OPS
  87
  88         stobj TYPE3 // VALIDITY
  89
  90
  91         ldc.i4.0
  92         ret
  93 }
  94
  95 //EOF