OSDN Git Service

Simplify handling of special files.
[pf3gnuchains/gcc-fork.git] / libgfortran / fmain.c
1 /* Note that this file is not used as of GFortran 4.5, and exists here
2    only for backwards compatibility.  */
3
4 #include "libgfortran.h"
5
6 /* The main Fortran program actually is a function, called MAIN__.
7    We call it from the main() function in this file.  */
8 void MAIN__ (void);
9
10 /* Main procedure for fortran programs.  All we do is set up the environment
11    for the Fortran program.  */
12 int
13 main (int argc, char *argv[])
14 {
15   /* Set up the runtime environment.  */
16   set_args (argc, argv);
17
18   /* Call the Fortran main program.  Internally this is a function
19      called MAIN__ */
20   MAIN__ ();
21
22   /* Bye-bye!  */
23   return 0;
24 }