OpenCores
URL https://opencores.org/ocsvn/scarts/scarts/trunk

Subversion Repositories scarts

[/] [scarts/] [trunk/] [toolchain/] [scarts-gcc/] [gcc-4.1.1/] [libgfortran/] [fmain.c] - Rev 20

Go to most recent revision | Compare with Previous | Blame | View Log

#include "config.h"
#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;
}
 

Go to most recent revision | Compare with Previous | Blame | View Log

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.