1int i = 2;
2void test_globals(void);
3
4extern void abort(void);
5
6int 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() */
14