1 /* Ensure that IPA-ICF is disabled on OpenACC routines. */ 2 3 /* { dg-additional-options "-fopenacc -O2 -fdump-ipa-icf" } */ 4 5 #pragma acc routine gang 6 int routine1(int n)7routine1 (int n) 8 { 9 int i; 10 11 #pragma acc loop 12 for (i = 0; i < n; i++) 13 ; 14 15 return n + 1; 16 } 17 18 #pragma acc routine gang 19 int routine2(int n)20routine2 (int n) 21 { 22 int i; 23 24 #pragma acc loop 25 for (i = 0; i < n; i++) 26 ; 27 28 return n + 1; 29 } 30 31 int main()32main () 33 { 34 int i; 35 36 #pragma acc parallel loop 37 for (i = 0; i < 8; i++) 38 ; 39 40 #pragma acc parallel loop 41 for (i = 0; i < 8; i++) 42 ; 43 44 return 0; 45 } 46 47 /* { dg-final { scan-ipa-dump-times "Not parsed function:" 4 "icf" } } */ 48 /* { dg-final { scan-ipa-dump "Parsed function:main" "icf" } } */ 49 50