8.90 FPUTC — Запись одного символа в режиме потока

Описание:

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

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

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

Стандарт:

Расширение GNU

Класс:

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

Синтаксис:

CALL FPUTC(UNIT, C [, STATUS])

STATUS = FPUTC(UNIT, C)

Аргументы:

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

Пример:

PROGRAM test_fputc
  CHARACTER(len=10) :: str = "gfortran"
  INTEGER :: fd = 42, i

  OPEN(UNIT = fd, FILE = "out", ACTION = "WRITE", STATUS="NEW")
  DO i = 1, len_trim(str)
    CALL fputc(fd, str(i:i))
  END DO
  CLOSE(fd)
END PROGRAM

См. также:

FPUT, FGET, FGETC