aboutsummaryrefslogtreecommitdiffstats
path: root/gcc-4.8/gcc/testsuite/gfortran.dg/c_funloc_tests_3_funcs.c
diff options
context:
space:
mode:
Diffstat (limited to 'gcc-4.8/gcc/testsuite/gfortran.dg/c_funloc_tests_3_funcs.c')
-rw-r--r--gcc-4.8/gcc/testsuite/gfortran.dg/c_funloc_tests_3_funcs.c25
1 files changed, 0 insertions, 25 deletions
diff --git a/gcc-4.8/gcc/testsuite/gfortran.dg/c_funloc_tests_3_funcs.c b/gcc-4.8/gcc/testsuite/gfortran.dg/c_funloc_tests_3_funcs.c
deleted file mode 100644
index 994da0a50..000000000
--- a/gcc-4.8/gcc/testsuite/gfortran.dg/c_funloc_tests_3_funcs.c
+++ /dev/null
@@ -1,25 +0,0 @@
-/* These functions support the test case c_funloc_tests_3. */
-#include <stdlib.h>
-#include <stdio.h>
-
-int printIntC(int i)
-{
- return 3*i;
-}
-
-int (*returnFunc(void))(int)
-{
- return &printIntC;
-}
-
-void callFunc(int(*func)(int), int pass, int compare)
-{
- int result = (*func)(pass);
- if(result != compare)
- {
- printf("FAILED: Got %d, expected %d\n", result, compare);
- abort();
- }
- else
- printf("SUCCESS: Got %d, expected %d\n", result, compare);
-}