/* Ensure that IPA-ICF is disabled on OpenACC routines.  */

/* { dg-additional-options "-fopenacc -O2 -fdump-ipa-icf" }  */

#pragma acc routine gang
int
routine1 (int n)
{
  int i;

  #pragma acc loop
  for (i = 0; i < n; i++)
    ;

  return n + 1;
}

#pragma acc routine gang
int
routine2 (int n)
{
  int i;

  #pragma acc loop
  for (i = 0; i < n; i++)
    ;

  return n + 1;
}

int
main ()
{
  int i;

  #pragma acc parallel loop
  for (i = 0; i < 8; i++)
    ;

  #pragma acc parallel loop
  for (i = 0; i < 8; i++)
    ;

  return 0;
}

/* { dg-final { scan-ipa-dump-times "Not parsed function:" 4 "icf" } }  */
/* { dg-final { scan-ipa-dump "Parsed function:main" "icf" } }  */