9.265 TTYNAM — Получить имя терминального устройства.

Описание:

Получить имя терминального устройства. Для получения дополнительной информации см. ttyname(3).

Этот внутренний модуль предоставляется как в форме подпрограммы, так и в форме функции; однако в любом данном программном блоке можно использовать только одну форму.

Стандарт:

Расширение GNU

Класс:

Подпрограмма, функция

Синтаксис:

CALL TTYNAM(UNIT, NAME)

NAME = TTYNAM(UNIT)

Аргументы:

UNIT	Должен быть скалярным INTEGER.
NAME	Должен быть типа CHARACTER.

Пример:

PROGRAM test_ttynam
  INTEGER :: unit
  DO unit = 1, 10
    IF (isatty(unit=unit)) write(*,*) ttynam(unit)
  END DO
END PROGRAM

См. также:

ISATTY