gcc/libgfortran/fmain.c

26 lines
596 B
C
Raw Normal View History

#include "libgfortran.h"
/* The main Fortran program actually is a function, called MAIN__.
We call it from the main() function in this file. */
void MAIN__ (void);
/* Main procedure for fortran programs. All we do is set up the environment
for the Fortran program. */
int
main (int argc, char *argv[])
{
/* Store the path of the executable file. */
store_exe_path (argv[0]);
/* Set up the runtime environment. */
set_args (argc, argv);
/* Call the Fortran main program. Internally this is a function
called MAIN__ */
MAIN__ ();
/* Bye-bye! */
return 0;
}