9.100 FGETC — Чтение одного символа в режиме потока

Описание:

Читает один символ в режиме потока, минуя стандартный форматированный вывод. Ввод-вывод потоков не следует смешивать с обычным вводом-выводом, ориентированным на записи (форматированным или неформатированным), на одном устройстве; результаты будут непредсказуемыми.

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

Обратите внимание, что встроенный модуль FGET предоставляется для обратной совместимости с g77. GNU Fortran предоставляет возможность ввода-вывода потоков в соответствии с Fortran 2003. Разработчики должны учитывать использование новых функций ввода-вывода потоков в новом коде для будущей портативности. Смотрите также статус Fortran 2003.

Стандарт:

Расширение GNU

Класс:

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

Синтаксис:

CALL FGETC(UNIT, C [, STATUS])

STATUS = FGETC(UNIT, C)

Аргументы:

UNIT	Тип должен быть INTEGER.
C	Тип должен быть CHARACTER и иметь стандартный вид.
STATUS	(Необязательно) флаг состояния типа INTEGER. Возвращает 0 при успехе, -1 при конце файла и системный положительный код ошибки в противном случае.

Пример:

PROGRAM test_fgetc
  INTEGER :: fd = 42, status
  CHARACTER :: c

  OPEN(UNIT=fd, FILE="/etc/passwd", ACTION="READ", STATUS = "OLD")
  DO
    CALL fgetc(fd, c, status)
    IF (status /= 0) EXIT
    call fput(c)
  END DO
  CLOSE(UNIT=fd)
END PROGRAM

См. также:

FGET, FPUT, FPUTC