9.112 FPUT — Запись одного символа в потоковом режиме в stdout

Описание:

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

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

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

Стандарт:

Расширение GNU

Класс:

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

Синтаксис:

CALL FPUT(C [, STATUS])

STATUS = FPUT(C)

Аргументы:

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

Пример:

PROGRAM test_fput
  CHARACTER(len=10) :: str = "gfortran"
  INTEGER :: i
  DO i = 1, len_trim(str)
    CALL fput(str(i:i))
  END DO
END PROGRAM

См. также:

FPUTC, FGET, FGETC