diff options
Diffstat (limited to 'gcc/testsuite/gfortran.dg/iso_c_binding_rename_2_driver.c')
-rw-r--r-- | gcc/testsuite/gfortran.dg/iso_c_binding_rename_2_driver.c | 16 |
1 files changed, 16 insertions, 0 deletions
diff --git a/gcc/testsuite/gfortran.dg/iso_c_binding_rename_2_driver.c b/gcc/testsuite/gfortran.dg/iso_c_binding_rename_2_driver.c new file mode 100644 index 000000000..8be704c34 --- /dev/null +++ b/gcc/testsuite/gfortran.dg/iso_c_binding_rename_2_driver.c @@ -0,0 +1,16 @@ +void sub2(int **); +void sub3(int **); +void sub4(int **); + +int main(int argc, char **argv) +{ + int i = 1; + int *ptr; + + ptr = &i; + sub2(&ptr); + sub3(&ptr); + sub4(&ptr); + + return 0; +} |