void *start_gnat_main( void * argument ) { extern int gnat_main ( int argc, char **argv, char **envp ); (void) gnat_main ( 0, 0, 0 ); exit( 0 ); return 0; }
void *start_gnat_main( void * argument ) { extern int gnat_main ( int argc, char **argv, char **envp ); /* * This is scoped to match the Ada program. */ char command_line[ COMMAND_LINE_MAXIMUM ]; #if defined(MAIN_USE_REQUIRES_COMMAND_LINE) parse_arguments( command_line, COMMAND_LINE_MAXIMUM ); #endif (void) gnat_main ( argc, argv, 0 ); exit( 0 ); return 0; }