1/* The pfpo instruction generated by this code clobbers the r1 register while
2   it was still in use.  */
3
4/* { dg-do run } */
5/* { dg-options "-O0 -march=z10 -mzarch" } */
6
7int foo(int x)
8{
9  return x;
10}
11
12int bar(int i, float f)
13{
14  return i;
15}
16
17int main()
18{
19  _Decimal32 d = 7;
20  return bar(foo(0x10203040), (float)d) == 0x10203040 ? 0 : 1;
21}
22