1 int i = 2;
2 void test_globals(void);
3
4 extern void abort(void);
5
6 int main(int argc, char **argv)
7 {
8 /* verify that i has been initialized by f90 */
9 if(i != 2)
10 abort();
11 test_globals();
12 return 0;
13 }/* end main() */