1  /* This used to fail due to bug in the On constraint causing a slgfi
       2     to be emitted with an immediate not fitting into 32bit.  */
       3  
       4  /* { dg-do compile } */
       5  /* { dg-options "-O3 -march=z9-109" } */
       6  
       7  long
       8  foo (long a)
       9  {
      10    return a - (1ULL << 32);
      11  }