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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [libgfortran/] [fmain.c] - Rev 751

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

/* 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;
}
 

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.