1  /* { dg-do compile } */
       2  /* { dg-require-effective-target ppc_float128_sw } */
       3  /* { dg-require-effective-target longdouble128 } */
       4  /* { dg-options "-O2 -mabi=ibmlongdouble -Wno-psabi" } */
       5  
       6  /* When GCC is configured with an older library that does not support IEEE
       7     128-bit, it issues a warning if you change the long double type. We use
       8     -Wno-psabi to silence this warning.  Since this is a code generation test,
       9     it does not matter if the library has full IEEE 128-bit support.
      10  
      11     We also need to require that the default long double is 128-bits, otherwise
      12     the TC/TF modes might not be available.  */
      13  
      14  /* Check that complex multiply generates the right call for __ibm128 when long
      15     double is IBM 128-bit floating point.  */
      16  
      17  typedef _Complex long double c_ibm128_t __attribute__((mode(__TC__)));
      18  
      19  void
      20  multiply (c_ibm128_t *p, c_ibm128_t *q, c_ibm128_t *r)
      21  {
      22    *p = *q * *r;
      23  }
      24  
      25  /* { dg-final { scan-assembler {\mbl .*__multc3\M} } } */