]>
Commit | Line | Data |
---|---|---|
6de9cd9a DN |
1 | #include "config.h" |
2 | #include "libgfortran.h" | |
3 | ||
4 | /* The main Fortran program actually is a function, called MAIN__. | |
5 | We call it from the main() function in this file. */ | |
6 | void MAIN__ (void); | |
7 | ||
8 | /* Main procedure for fortran programs. All we do is set up the environment | |
9 | for the Fortran program. */ | |
10 | int | |
11 | main (int argc, char *argv[]) | |
12 | { | |
868d75db FXC |
13 | /* Store the path of the executable file. */ |
14 | store_exe_path (argv[0]); | |
15 | ||
6de9cd9a DN |
16 | /* Set up the runtime environment. */ |
17 | set_args (argc, argv); | |
18 | ||
868d75db | 19 | |
6de9cd9a DN |
20 | /* Call the Fortran main program. Internally this is a function |
21 | called MAIN__ */ | |
22 | MAIN__ (); | |
23 | ||
24 | /* Bye-bye! */ | |
25 | return 0; | |
26 | } |