1  /* PR middle-end/98099 */
       2  /* Reported by G. Steinmetz <gscfq@t-online.de> */
       3  
       4  /* { dg-do compile { target { dfp && { be || le } } } } */
       5  /* { dg-options "-fsso-struct=big-endian" { target le } } */
       6  /* { dg-options "-fsso-struct=little-endian" { target be } } */
       7  
       8  struct S { _Decimal128 a; };
       9  
      10  _Decimal128 f (struct S x)
      11  {
      12    return x.a; /* { dg-message "sorry, unimplemented: reverse storage order" "" { target { ! int128 } } } */
      13  }