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