[thirdparty/gcc.git] / libgfortran / fmain.c

/* Note that this file is not used as of GFortran 4.5, and exists here
   only for backwards compatibility.  */

#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[])
{
  /* 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;
}
Commit	Line	Data
0942c722 JB	1	/* Note that this file is not used as of GFortran 4.5, and exists here
	2	only for backwards compatibility. */
	3
6de9cd9a DN	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. */
fa10ccb2	16	set_args (argc, argv);
868d75db	17
6de9cd9a DN	18	/* Call the Fortran main program. Internally this is a function
	19	called MAIN__ */
	20	MAIN__ ();
	21
	22	/* Bye-bye! */
	23	return 0;
	24	}