[UP]


Manual Reference Pages  - is_iostat_eor (3)

NAME

is_iostat_eor(3f) - [FORTRAN:INTRINSIC] Test for end-of-record value

SYNTAX

result = is_iostat_eor(i)

DESCRIPTION

is_iostat_eor tests whether an variable has the value of the I/O status "end of record". The function is equivalent to comparing the variable with the iostat_eor parameter of the intrinsic module [[iso_fortran_env]].

ARGUMENTS

I Shall be of the type INTEGER.

RETURN VALUE

Returns a LOGICAL of the default kind, which .true. if I has the value which indicates an end of file condition for iostat= specifiers, and is .false. otherwise.

EXAMPLE

Sample program:

    program demo_is_iostat_eor
      implicit none
      integer :: stat, i(50)
      open(88, file=’test.dat’, form=’unformatted’)
      read(88, iostat=stat) i
      if(is_iostat_eor(stat)) stop ’end of record’
    end program demo_is_iostat_eor

STANDARD

Fortran 2003 and later

CLASS

Elemental function


is_iostat_eor (3) March 11, 2021
Generated by manServer 1.08 from 26e9bbc2-a724-4d4e-bc99-4274c8777f95 using man macros.