4 void c_sub0(void (*sub
)(void));
5 void c_sub1(int (*func
)(int));
7 extern void abort(void);
9 int main(int argc
, char **argv
)
11 printf("hello from C main\n");
17 void c_sub0(void (*sub
)(void))
19 printf("hello from c_sub0\n");
25 void c_sub1(int (*func
)(int))
29 printf("hello from c_sub1\n");
34 fprintf(stderr
, "Fortran function did not return expected value!\n");