| #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; |
| } |