gcc/testsuite/gcc.c-torture/compile/SFset.c

   1 /* { dg-require-effective-target int32plus } */
   2 /* { dg-skip-if "too many arguments in function call" { bpf-*-* } } */
   3 /* { dg-additional-options "-std=gnu89" } */
   4
   5 #define E0 ((type *)10000000)
   6 #define reg0 r0
   7 #define indreg0 (*p0)
   8 #define imm0 22
   9 #define limm0 ((type)(int)&glob0)
  10 #define adr0 (*E0)
  11 #define adrreg0 (p0[10000000])
  12 #define adrx0 (E0[x0])
  13 #define regx0 (p0[x0])
  14
  15 #define E1 ((type *)(11111111 & ~(__alignof__ (type) - 1)))
  16 #define reg1 r1
  17 #define indreg1 (*p1)
  18 #define imm1 33
  19 #define limm1 ((type)(int)&glob1)
  20 #define adr1 (*E1)
  21 #define adrreg1 (p1[1111111/4])
  22 #define adrx1 (E1[x1])
  23 #define regx1 (p1[x1])
  24
  25 int glob0, glob1;
  26
  27 #define type float
  28
  29 reg0reg1_set (r0, r1, x0, x1, p0, p1)
  30 type r0, r1;  type *p0, *p1;
  31 {reg0 = reg1;  }
  32
  33 reg0indreg1_set (r0, r1, x0, x1, p0, p1)
  34 type r0, r1;  type *p0, *p1;
  35 {reg0 = indreg1;  }
  36
  37 reg0imm1_set (r0, r1, x0, x1, p0, p1)
  38 type r0, r1;  type *p0, *p1;
  39 {reg0 = imm1;  }
  40
  41 reg0limm1_set (r0, r1, x0, x1, p0, p1)
  42 type r0, r1;  type *p0, *p1;
  43 {reg0 = limm1;  }
  44
  45 reg0adr1_set (r0, r1, x0, x1, p0, p1)
  46 type r0, r1;  type *p0, *p1;
  47 {reg0 = adr1;  }
  48
  49 reg0adrreg1_set (r0, r1, x0, x1, p0, p1)
  50 type r0, r1;  type *p0, *p1;
  51 {reg0 = adrreg1;  }
  52
  53 reg0adrx1_set (r0, r1, x0, x1, p0, p1)
  54 type r0, r1;  type *p0, *p1;
  55 {reg0 = adrx1;  }
  56
  57 reg0regx1_set (r0, r1, x0, x1, p0, p1)
  58 type r0, r1;  type *p0, *p1;
  59 {reg0 = regx1;  }
  60
  61 indreg0reg1_set (r0, r1, x0, x1, p0, p1)
  62 type r0, r1;  type *p0, *p1;
  63 {indreg0 = reg1;  }
  64
  65 indreg0indreg1_set (r0, r1, x0, x1, p0, p1)
  66 type r0, r1;  type *p0, *p1;
  67 {indreg0 = indreg1;  }
  68
  69 indreg0imm1_set (r0, r1, x0, x1, p0, p1)
  70 type r0, r1;  type *p0, *p1;
  71 {indreg0 = imm1;  }
  72
  73 indreg0limm1_set (r0, r1, x0, x1, p0, p1)
  74 type r0, r1;  type *p0, *p1;
  75 {indreg0 = limm1;  }
  76
  77 indreg0adr1_set (r0, r1, x0, x1, p0, p1)
  78 type r0, r1;  type *p0, *p1;
  79 {indreg0 = adr1;  }
  80
  81 indreg0adrreg1_set (r0, r1, x0, x1, p0, p1)
  82 type r0, r1;  type *p0, *p1;
  83 {indreg0 = adrreg1;  }
  84
  85 indreg0adrx1_set (r0, r1, x0, x1, p0, p1)
  86 type r0, r1;  type *p0, *p1;
  87 {indreg0 = adrx1;  }
  88
  89 indreg0regx1_set (r0, r1, x0, x1, p0, p1)
  90 type r0, r1;  type *p0, *p1;
  91 {indreg0 = regx1;  }
  92
  93 adr0reg1_set (r0, r1, x0, x1, p0, p1)
  94 type r0, r1;  type *p0, *p1;
  95 {adr0 = reg1;  }
  96
  97 adr0indreg1_set (r0, r1, x0, x1, p0, p1)
  98 type r0, r1;  type *p0, *p1;
  99 {adr0 = indreg1;  }
 100
 101 adr0imm1_set (r0, r1, x0, x1, p0, p1)
 102 type r0, r1;  type *p0, *p1;
 103 {adr0 = imm1;  }
 104
 105 adr0limm1_set (r0, r1, x0, x1, p0, p1)
 106 type r0, r1;  type *p0, *p1;
 107 {adr0 = limm1;  }
 108
 109 adr0adr1_set (r0, r1, x0, x1, p0, p1)
 110 type r0, r1;  type *p0, *p1;
 111 {adr0 = adr1;  }
 112
 113 adr0adrreg1_set (r0, r1, x0, x1, p0, p1)
 114 type r0, r1;  type *p0, *p1;
 115 {adr0 = adrreg1;  }
 116
 117 adr0adrx1_set (r0, r1, x0, x1, p0, p1)
 118 type r0, r1;  type *p0, *p1;
 119 {adr0 = adrx1;  }
 120
 121 adr0regx1_set (r0, r1, x0, x1, p0, p1)
 122 type r0, r1;  type *p0, *p1;
 123 {adr0 = regx1;  }
 124
 125 adrreg0reg1_set (r0, r1, x0, x1, p0, p1)
 126 type r0, r1;  type *p0, *p1;
 127 {adrreg0 = reg1;  }
 128
 129 adrreg0indreg1_set (r0, r1, x0, x1, p0, p1)
 130 type r0, r1;  type *p0, *p1;
 131 {adrreg0 = indreg1;  }
 132
 133 adrreg0imm1_set (r0, r1, x0, x1, p0, p1)
 134 type r0, r1;  type *p0, *p1;
 135 {adrreg0 = imm1;  }
 136
 137 adrreg0limm1_set (r0, r1, x0, x1, p0, p1)
 138 type r0, r1;  type *p0, *p1;
 139 {adrreg0 = limm1;  }
 140
 141 adrreg0adr1_set (r0, r1, x0, x1, p0, p1)
 142 type r0, r1;  type *p0, *p1;
 143 {adrreg0 = adr1;  }
 144
 145 adrreg0adrreg1_set (r0, r1, x0, x1, p0, p1)
 146 type r0, r1;  type *p0, *p1;
 147 {adrreg0 = adrreg1;  }
 148
 149 adrreg0adrx1_set (r0, r1, x0, x1, p0, p1)
 150 type r0, r1;  type *p0, *p1;
 151 {adrreg0 = adrx1;  }
 152
 153 adrreg0regx1_set (r0, r1, x0, x1, p0, p1)
 154 type r0, r1;  type *p0, *p1;
 155 {adrreg0 = regx1;  }
 156
 157 adrx0reg1_set (r0, r1, x0, x1, p0, p1)
 158 type r0, r1;  type *p0, *p1;
 159 {adrx0 = reg1;  }
 160
 161 adrx0indreg1_set (r0, r1, x0, x1, p0, p1)
 162 type r0, r1;  type *p0, *p1;
 163 {adrx0 = indreg1;  }
 164
 165 adrx0imm1_set (r0, r1, x0, x1, p0, p1)
 166 type r0, r1;  type *p0, *p1;
 167 {adrx0 = imm1;  }
 168
 169 adrx0limm1_set (r0, r1, x0, x1, p0, p1)
 170 type r0, r1;  type *p0, *p1;
 171 {adrx0 = limm1;  }
 172
 173 adrx0adr1_set (r0, r1, x0, x1, p0, p1)
 174 type r0, r1;  type *p0, *p1;
 175 {adrx0 = adr1;  }
 176
 177 adrx0adrreg1_set (r0, r1, x0, x1, p0, p1)
 178 type r0, r1;  type *p0, *p1;
 179 {adrx0 = adrreg1;  }
 180
 181 adrx0adrx1_set (r0, r1, x0, x1, p0, p1)
 182 type r0, r1;  type *p0, *p1;
 183 {adrx0 = adrx1;  }
 184
 185 adrx0regx1_set (r0, r1, x0, x1, p0, p1)
 186 type r0, r1;  type *p0, *p1;
 187 {adrx0 = regx1;  }
 188
 189 regx0reg1_set (r0, r1, x0, x1, p0, p1)
 190 type r0, r1;  type *p0, *p1;
 191 {regx0 = reg1;  }
 192
 193 regx0indreg1_set (r0, r1, x0, x1, p0, p1)
 194 type r0, r1;  type *p0, *p1;
 195 {regx0 = indreg1;  }
 196
 197 regx0imm1_set (r0, r1, x0, x1, p0, p1)
 198 type r0, r1;  type *p0, *p1;
 199 {regx0 = imm1;  }
 200
 201 regx0limm1_set (r0, r1, x0, x1, p0, p1)
 202 type r0, r1;  type *p0, *p1;
 203 {regx0 = limm1;  }
 204
 205 regx0adr1_set (r0, r1, x0, x1, p0, p1)
 206 type r0, r1;  type *p0, *p1;
 207 {regx0 = adr1;  }
 208
 209 regx0adrreg1_set (r0, r1, x0, x1, p0, p1)
 210 type r0, r1;  type *p0, *p1;
 211 {regx0 = adrreg1;  }
 212
 213 regx0adrx1_set (r0, r1, x0, x1, p0, p1)
 214 type r0, r1;  type *p0, *p1;
 215 {regx0 = adrx1;  }
 216
 217 regx0regx1_set (r0, r1, x0, x1, p0, p1)
 218 type r0, r1;  type *p0, *p1;
 219 {regx0 = regx1;  }
 220