OSDN Git Service

2005-06-14 Frank Ch. Eigler <fche@redhat.com>
[pf3gnuchains/gcc-fork.git] / libgfortran / fmain.c
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 {
13   /* Set up the runtime environment.  */
14   set_args (argc, argv);
15
16   /* Call the Fortran main program.  Internally this is a function
17      called MAIN__ */
18   MAIN__ ();
19
20   /* Bye-bye!  */
21   return 0;
22 }