This module will contain part of a Fortran API to functions detailed in ISO/IEC 9945-1:1990 Portable Operating System Interface (POSIX) - Part 1: System Application Program Interface (API) [C Language].
In this release only the FLUSH
procedure is supported.
Users are advised to use the ONLY
clause when using this module, as it
will have further names added in later releases.
Error handling is described in F90_UNIX_ERRNO
.
Note that for procedures with an optional ERRNO
argument, if an error
occurs and ERRNO
is not present, the program will be terminated.
All procedures in this module are generic and may also be specific (this may change in a future release).
SUBROUTINE FLUSH(LUNIT,ERRNO) INTEGER(*),INTENT(IN) :: LUNIT INTEGER(ERROR_KIND),OPTIONAL,INTENT(OUT) :: ERRNOFlushes the output buffer of logical unit
LUNIT
.
The effect is similar to the Fortran 2003 FLUSH
statement,
except that the statement allows flushing a unit which is not connected but
the procedure does not.
If LUNIT
is not a valid unit number or is not connected to a file,
error EBADF
is raised (see F90_UNIX_ERRNO
).