8.113 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 — Чтение одного символа в потоковом режиме

© Free Software Foundation
Licensed under the GNU Free Documentation License, Version 1.3.
https://gcc.gnu.org/onlinedocs/gcc-13.3.0/gfortran/FPUTC.html