1  /* { dg-additional-options "-fdump-tree-gimple" } */
       2  int bar (int);
       3  int bar2 (int);
       4  
       5  void foobar()
       6  {
       7    int d[64], e[64], f[64];
       8  #pragma omp task affinity (d, e[bar(5)], f[4:10])
       9    ;
      10  }
      11  
      12  void
      13  foo (void)
      14  {
      15    int a[64];
      16  #pragma omp task affinity (iterator (j=bar(0):bar(1):bar(2))  : a[bar(j)])
      17    ;
      18  }
      19  void
      20  qux (void)
      21  {
      22    int a[64], b[64], c[64];
      23  #pragma omp task affinity (iterator (j=bar(0):bar(1):bar(2))  : a[bar(j+1)], b[bar(j+2)], c[bar(j+3)])
      24    ;
      25  }
      26  
      27  /* { dg-final { scan-tree-dump-times "= bar \\(5\\);" 1 "gimple" } }  */
      28  /* { dg-final { scan-tree-dump-times "= bar \\(0\\);" 2 "gimple" } }  */
      29  /* { dg-final { scan-tree-dump-times "= bar \\(1\\);" 2 "gimple" } }  */
      30  /* { dg-final { scan-tree-dump-times "= bar \\(2\\);" 2 "gimple" } }  */
      31  /* { dg-final { scan-tree-dump-times "= bar \\(j\\);" 1 "gimple" } }  */
      32  /* { dg-final { scan-tree-dump-times "= bar \\(_.\\);" 3 "gimple" } }  */