1  /* { dg-do compile { target { powerpc*-*-* } } } */
       2  /* { dg-require-effective-target powerpc_p8vector_ok } */
       3  /* { dg-require-effective-target longdouble128 } */
       4  /* { dg-options "-O2 -mpower8-vector -mabi=ibmlongdouble -Wno-psabi" } */
       5  
       6  /* Check that complex multiply generates the right call when long double is
       7     IBM extended double floating point.  */
       8  
       9  typedef _Complex long double cld_t;
      10  
      11  void
      12  multiply (cld_t *p, cld_t *q, cld_t *r)
      13  {
      14    *p = *q * *r;
      15  }
      16  
      17  /* { dg-final { scan-assembler "bl __multc3" } } */