ISATTY
— Whether a unit is a terminal device. ¶Determine whether a unit is connected to a terminal device.
GNU extension
Function
RESULT = ISATTY(UNIT)
UNIT | Shall be a scalar INTEGER . |
Returns .TRUE.
if the UNIT is connected to a terminal
device, .FALSE.
otherwise.
PROGRAM test_isatty INTEGER(kind=1) :: unit DO unit = 1, 10 write(*,*) isatty(unit=unit) END DO END PROGRAM