/* { dg-do compile { target sqrt_insn } } */
/* { dg-options "-Ofast -fdump-tree-cplxlower1" } */
/* { dg-add-options sqrt_insn } */


double f(double a, double c)
{
  _Complex double b = a;
  b+= c;
  return __builtin_cabs(b);
}

double f1(double a, double c)
{
  _Complex double b = __builtin_complex(0.0, a);
  b+= __builtin_complex(0.0, c);
  return __builtin_cabs(b);
}

/* Check that cabs is expanded during complex lowering. */
/* { dg-final { scan-tree-dump-not "__builtin_cabs " "cplxlower1" } } */
/* { dg-final { scan-tree-dump-not "__builtin_sqrt " "cplxlower1" } } */
/* { dg-final { scan-tree-dump-times "ABS_EXPR <" 2 "cplxlower1" } } */