for_rtl_init_, for_rtl_finish_ (3f)

initializes or cleans up Fortran run-time environment

C Syntax

  int argc;
  char **argv;
  void for_rtl_init_ (int *, char **);
  for_rtl_init_ ( &argc, argv );

  int io_status;
  int for_rtl_finish_( );
  io_status = for_rtl_finish_( );

Description

  The for_rtl_init_ and for_rtl_finish_ routines are useful when you have a
  main program written in C which calls Fortran subprograms.  The names have
  a trailing underscore, and are intended to be called from a C main program.

  The for_rtl_init_ subroutine initializes data in the DEC Fortran Run-Time
  Library, establishes signal handlers, and establishes Fortran floating-
  point exception handling so that the Fortran subroutines behave the same as
  when they are called from a Fortran main program.  The arguments to
  for_rtl_init_ are the command line description parameters passed to the
  main program that describe the argument count and actual arguments.

  The for_rtl_finish_ function cleans up the Fortran I/O system (for example,
  flushing buffers and closing files) and issues messages about floating-
  point exceptions (if necessary).

  Both of these routines are invoked by default in Fortran main programs.

Return Values

  The for_rtl_init_ subroutine does not return a value.

  The for_rtl_finish_ function returns an I/O status value.  I/O status
  values are defined in /usr/include/foriosdef.f.

See Also

  for_get_fpe(3f)