(root)/
gcc-13.2.0/
gcc/
testsuite/
gfortran.dg/
iso_c_binding_rename_2_driver.c
       1  void sub2(int **);
       2  void sub3(int **);
       3  void sub4(int **);
       4  
       5  int main(int argc, char **argv)
       6  {
       7    int i = 1; 
       8    int *ptr;
       9  
      10    ptr = &i;
      11    sub2(&ptr);
      12    sub3(&ptr);
      13    sub4(&ptr);
      14  
      15    return 0;
      16  }